src/Pure/ML/ml_file.ML
changeset 62868 61a691db1c4d
parent 62862 007c454d0d0f
child 62873 2f9c8a18f832
--- a/src/Pure/ML/ml_file.ML	Tue Apr 05 15:53:48 2016 +0200
+++ b/src/Pure/ML/ml_file.ML	Tue Apr 05 15:58:58 2016 +0200
@@ -8,7 +8,7 @@
 sig
   val ML: bool option -> (theory -> Token.file list) -> Toplevel.transition -> Toplevel.transition
   val SML: bool option -> (theory -> Token.file list) -> Toplevel.transition -> Toplevel.transition
-  val any: bool option -> (theory -> Token.file list) -> Toplevel.transition -> Toplevel.transition
+  val use: bool option -> (theory -> Token.file list) -> Toplevel.transition -> Toplevel.transition
 end;
 
 structure ML_File: ML_FILE =
@@ -32,7 +32,7 @@
 val ML = command (K false);
 val SML = command (K true);
 
-val any =
+val use =
   command (fn path =>
     (case try (#2 o Path.split_ext) path of
       SOME "ML" => false