src/Tools/cache_io.ML
changeset 42127 8223e7f4b0da
parent 41954 fb94df4505a0
child 43850 7f2cbc713344
equal deleted inserted replaced
42126:12875677300b 42127:8223e7f4b0da
    43     val (out2, rc) = bash_output (make_cmd in_path out_path)
    43     val (out2, rc) = bash_output (make_cmd in_path out_path)
    44     val out1 = the_default [] (try (rev o File.fold_lines cons out_path) [])
    44     val out1 = the_default [] (try (rev o File.fold_lines cons out_path) [])
    45   in {output=split_lines out2, redirected_output=out1, return_code=rc} end
    45   in {output=split_lines out2, redirected_output=out1, return_code=rc} end
    46 
    46 
    47 fun run make_cmd str =
    47 fun run make_cmd str =
    48   Isabelle_System.with_tmp_file cache_io_prefix (fn in_path =>
    48   Isabelle_System.with_tmp_file cache_io_prefix "" (fn in_path =>
    49     Isabelle_System.with_tmp_file cache_io_prefix (fn out_path =>
    49     Isabelle_System.with_tmp_file cache_io_prefix "" (fn out_path =>
    50       raw_run make_cmd str in_path out_path))
    50       raw_run make_cmd str in_path out_path))
    51 
    51 
    52 
    52 
    53 (* cache *)
    53 (* cache *)
    54 
    54