--- a/src/Pure/ROOT.ML Fri Oct 24 17:06:45 1997 +0200
+++ b/src/Pure/ROOT.ML Fri Oct 24 17:07:34 1997 +0200
@@ -39,8 +39,9 @@
use "logic.ML";
use "theory.ML";
use "thm.ML";
+use "display.ML";
+use "pure_thy.ML";
use "deriv.ML";
-use "display.ML";
use "drule.ML";
use "tctical.ML";
use "search.ML";
@@ -48,9 +49,6 @@
use "goals.ML";
use "axclass.ML";
-structure Pure = struct val thy = Theory.pure end;
-structure CPure = struct val thy = Theory.cpure end;
-
(*Theory parser and loader*)
cd "Thy";
use "ROOT.ML";