| author | traytel | 
| Thu, 11 Mar 2021 10:25:04 +0100 | |
| changeset 73408 | be11fe268b33 | 
| parent 62944 | 3ee643c5ed00 | 
| child 74148 | a97d5356f1d9 | 
| permissions | -rw-r--r-- | 
| 62817 | 1 | (* Title: Pure/ML/ml_compiler2.ML | 
| 2 | Author: Makarius | |
| 3 | ||
| 62902 
3c0f53eae166
more conventional theory syntax for ML bootstrap, with 'ML_file' instead of 'use';
 wenzelm parents: 
62817diff
changeset | 4 | Isabelle/ML file operations. | 
| 62817 | 5 | *) | 
| 6 | ||
| 62902 
3c0f53eae166
more conventional theory syntax for ML bootstrap, with 'ML_file' instead of 'use';
 wenzelm parents: 
62817diff
changeset | 7 | val {ML_file, ML_file_debug, ML_file_no_debug} =
 | 
| 
3c0f53eae166
more conventional theory syntax for ML bootstrap, with 'ML_file' instead of 'use';
 wenzelm parents: 
62817diff
changeset | 8 | ML_Compiler0.ML_file_operations (fn opt_debug => fn file => | 
| 62817 | 9 | let val flags = ML_Compiler.verbose true (ML_Compiler.debug_flags opt_debug) in | 
| 10 | ML_Context.eval_file flags (Path.explode file) | |
| 11 | handle ERROR msg => (writeln msg; error "ML error") | |
| 12 | end); | |
| 62944 
3ee643c5ed00
more standard session build process, including browser_info;
 wenzelm parents: 
62902diff
changeset | 13 | |
| 
3ee643c5ed00
more standard session build process, including browser_info;
 wenzelm parents: 
62902diff
changeset | 14 | val use = ML_file; |