do not change global_names flag;

--- a/src/Cube/ROOT.ML	Tue Oct 28 17:37:46 1997 +0100
+++ b/src/Cube/ROOT.ML	Tue Oct 28 17:41:15 1997 +0100
@@ -9,8 +9,6 @@
 val banner = "Barendregt's Lambda-Cube";
 writeln banner;
 
-reset global_names;
-
 print_depth 1;  
 
 use_thy "Cube";

--- a/src/FOL/ROOT.ML	Tue Oct 28 17:37:46 1997 +0100
+++ b/src/FOL/ROOT.ML	Tue Oct 28 17:41:15 1997 +0100
@@ -11,8 +11,6 @@
 
 writeln banner;
 
-reset global_names;
-
 print_depth 1;  
 
 use "../Provers/simplifier.ML";

--- a/src/FOLP/ROOT.ML	Tue Oct 28 17:37:46 1997 +0100
+++ b/src/FOLP/ROOT.ML	Tue Oct 28 17:41:15 1997 +0100
@@ -12,8 +12,6 @@
 
 writeln banner;
 
-reset global_names;
-
 print_depth 1;
 
 use_thy "IFOLP";

--- a/src/HOL/ROOT.ML	Tue Oct 28 17:37:46 1997 +0100
+++ b/src/HOL/ROOT.ML	Tue Oct 28 17:41:15 1997 +0100
@@ -10,8 +10,6 @@
 val banner = "Higher-Order Logic";
 writeln banner;
 
-reset global_names;
-
 print_depth 1;
 
 (* Add user sections *)

--- a/src/LCF/ROOT.ML	Tue Oct 28 17:37:46 1997 +0100
+++ b/src/LCF/ROOT.ML	Tue Oct 28 17:41:15 1997 +0100
@@ -11,8 +11,6 @@
 val banner = "Logic for Computable Functions (in FOL)";
 writeln banner;
 
-reset global_names;
-
 print_depth 1;
 use_thy "LCF";
 use"simpdata.ML";