File.use;

--- a/src/Pure/Isar/session.ML	Fri Nov 09 00:16:52 2001 +0100
+++ b/src/Pure/Isar/session.ML	Fri Nov 09 00:17:09 2001 +0100
@@ -84,7 +84,7 @@
       (init reset parent name;
        Present.init build info doc doc_graph (path ()) name
          (if dump = "" then None else Some (Path.unpack dump)) (get_rpath rpath_str) verbose;
-       File.symbol_use root_file;
+       File.use root_file;
        finish ()))) ()
   handle exn => (writeln (Toplevel.exn_message exn); exit 1);
 

--- a/src/Pure/Thy/thy_load.ML	Fri Nov 09 00:16:52 2001 +0100
+++ b/src/Pure/Thy/thy_load.ML	Fri Nov 09 00:17:09 2001 +0100
@@ -88,7 +88,7 @@
 fun load_file raw_path =
   (case check_file raw_path of
     None => error ("Could not find ML file " ^ quote (Path.pack raw_path))
-  | Some (path, info) => (File.symbol_use path; (path, info)));
+  | Some (path, info) => (File.use path; (path, info)));
 
 
 (* datatype master *)

--- a/src/Pure/Thy/thy_syn.ML	Fri Nov 09 00:16:52 2001 +0100
+++ b/src/Pure/Thy/thy_syn.ML	Fri Nov 09 00:17:09 2001 +0100
@@ -56,7 +56,7 @@
     val txt_out = ThyParse.parse_thy (! syntax) chs;
   in
     File.write tmp_path txt_out;
-    File.symbol_use tmp_path;
+    File.use tmp_path;
     if ! delete_tmpfiles then File.rm tmp_path else ()
   end;