load type_infer.ML early;

--- a/src/Pure/ROOT.ML	Sun Apr 15 14:31:51 2007 +0200
+++ b/src/Pure/ROOT.ML	Sun Apr 15 14:31:52 2007 +0200
@@ -29,6 +29,7 @@
 use "type.ML";
 use "context.ML";
 use "compress.ML";
+use "type_infer.ML";
 
 (*inner syntax module*)
 use "Syntax/lexicon.ML";
@@ -50,7 +51,6 @@
 structure Mixfix = Hidden;
 structure Printer = Hidden;
 
-use "type_infer.ML";
 use "General/ml_syntax.ML";
 
 (*core of tactical proof system*)