src/Pure/Thy/thy_load.ML
changeset 22145 fedad292f738
parent 21950 e97fd6480091
child 23872 f449381e2caa
equal deleted inserted replaced
22144:c33450acd873 22145:fedad292f738
    90 (* load_file *)
    90 (* load_file *)
    91 
    91 
    92 fun load_file current raw_path =
    92 fun load_file current raw_path =
    93   (case check_file current raw_path of
    93   (case check_file current raw_path of
    94     NONE => error ("Could not find ML file " ^ quote (Path.implode raw_path))
    94     NONE => error ("Could not find ML file " ^ quote (Path.implode raw_path))
    95   | SOME (path, info) => (File.use path; (path, info)));
    95   | SOME (path, info) => (ML_Context.use path; (path, info)));
    96 
    96 
    97 
    97 
    98 (* datatype master *)
    98 (* datatype master *)
    99 
    99 
   100 datatype master = Master of (Path.T * File.info) * (Path.T * File.info) option;
   100 datatype master = Master of (Path.T * File.info) * (Path.T * File.info) option;