--- a/src/Pure/ROOT.ML Thu Dec 04 12:50:02 1997 +0100
+++ b/src/Pure/ROOT.ML Thu Dec 04 13:49:27 1997 +0100
@@ -46,6 +46,10 @@
use "axclass.ML";
(*Theory parser and loader*)
+
+(* FIXME tmp *)
+val global_names = ref false;
+
cd "Thy";
use "ROOT.ML";
cd "..";
--- a/src/Pure/Thy/thy_parse.ML Thu Dec 04 12:50:02 1997 +0100
+++ b/src/Pure/Thy/thy_parse.ML Thu Dec 04 13:49:27 1997 +0100
@@ -5,10 +5,6 @@
The parser for theory files.
*)
-(* FIXME tmp *)
-val global_names = ref false;
-
-
infix 5 -- --$$ $$-- ^^;
infix 3 >>;
infix 0 ||;