src/Pure/ML/ml_compiler2.ML
author wenzelm
Thu, 07 Apr 2016 16:53:43 +0200
changeset 62902 3c0f53eae166
parent 62817 744bfd770123
child 62944 3ee643c5ed00
permissions -rw-r--r--
more conventional theory syntax for ML bootstrap, with 'ML_file' instead of 'use'; avoid slowdown of Resources.loaded_files due to command name 'use' in Pure base syntax;

(*  Title:      Pure/ML/ml_compiler2.ML
    Author:     Makarius

Isabelle/ML file operations.
*)

val {ML_file, ML_file_debug, ML_file_no_debug} =
  ML_Compiler0.ML_file_operations (fn opt_debug => fn file =>
    let val flags = ML_Compiler.verbose true (ML_Compiler.debug_flags opt_debug) in
      ML_Context.eval_file flags (Path.explode file)
        handle ERROR msg => (writeln msg; error "ML error")
    end);