src/Pure/Thy/present.ML
changeset 35010 d6e492cea6e4
parent 33957 e9afca2118d4
child 35588 f1429d5df3d2
equal deleted inserted replaced
35009:5408e5207131 35010:d6e492cea6e4
   326   let
   326   let
   327     val s = "\"$ISABELLE_TOOL\" document -c -o '" ^ format ^ "' \
   327     val s = "\"$ISABELLE_TOOL\" document -c -o '" ^ format ^ "' \
   328       \-n '" ^ name ^ "' -t '" ^ tags ^ "' " ^ File.shell_path path ^ " 2>&1";
   328       \-n '" ^ name ^ "' -t '" ^ tags ^ "' " ^ File.shell_path path ^ " 2>&1";
   329     val doc_path = Path.append result_path (Path.ext format (Path.basic name));
   329     val doc_path = Path.append result_path (Path.ext format (Path.basic name));
   330     val _ = if verbose then writeln s else ();
   330     val _ = if verbose then writeln s else ();
   331     val (out, rc) = system_out s;
   331     val (out, rc) = bash_output s;
   332     val _ =
   332     val _ =
   333       if not (File.exists doc_path) orelse rc <> 0 then
   333       if not (File.exists doc_path) orelse rc <> 0 then
   334         cat_error out ("Failed to build document " ^ quote (show_path doc_path))
   334         cat_error out ("Failed to build document " ^ quote (show_path doc_path))
   335       else if verbose then writeln out
   335       else if verbose then writeln out
   336       else ();
   336       else ();