explicit use of universal.ML and dummy_thread.ML;

--- a/src/Pure/ML-Systems/polyml-4.1.3.ML	Sun Sep 07 17:46:41 2008 +0200
+++ b/src/Pure/ML-Systems/polyml-4.1.3.ML	Sun Sep 07 17:46:43 2008 +0200
@@ -5,6 +5,8 @@
 *)
 
 use "ML-Systems/polyml_old_basis.ML";
+use "ML-Systems/universal.ML";
+use "ML-Systems/thread_dummy.ML";
 use "ML-Systems/polyml_common.ML";
 use "ML-Systems/polyml_old_compiler4.ML";
 

--- a/src/Pure/ML-Systems/polyml-4.1.4.ML	Sun Sep 07 17:46:41 2008 +0200
+++ b/src/Pure/ML-Systems/polyml-4.1.4.ML	Sun Sep 07 17:46:43 2008 +0200
@@ -5,6 +5,8 @@
 *)
 
 use "ML-Systems/polyml_old_basis.ML";
+use "ML-Systems/universal.ML";
+use "ML-Systems/thread_dummy.ML";
 use "ML-Systems/polyml_common.ML";
 use "ML-Systems/polyml_old_compiler4.ML";
 

--- a/src/Pure/ML-Systems/polyml-4.2.0.ML	Sun Sep 07 17:46:41 2008 +0200
+++ b/src/Pure/ML-Systems/polyml-4.2.0.ML	Sun Sep 07 17:46:43 2008 +0200
@@ -4,6 +4,8 @@
 Compatibility wrapper for Poly/ML 4.2.0.
 *)
 
+use "ML-Systems/universal.ML";
+use "ML-Systems/thread_dummy.ML";
 use "ML-Systems/polyml_common.ML";
 use "ML-Systems/polyml_old_compiler4.ML";
 

--- a/src/Pure/ML-Systems/polyml-5.0.ML	Sun Sep 07 17:46:41 2008 +0200
+++ b/src/Pure/ML-Systems/polyml-5.0.ML	Sun Sep 07 17:46:43 2008 +0200
@@ -4,6 +4,8 @@
 Compatibility wrapper for Poly/ML 5.0.
 *)
 
+use "ML-Systems/universal.ML";
+use "ML-Systems/thread_dummy.ML";
 use "ML-Systems/polyml_common.ML";
 use "ML-Systems/polyml_old_compiler5.ML";
 

--- a/src/Pure/ML-Systems/polyml_common.ML	Sun Sep 07 17:46:41 2008 +0200
+++ b/src/Pure/ML-Systems/polyml_common.ML	Sun Sep 07 17:46:43 2008 +0200
@@ -5,8 +5,6 @@
 *)
 
 use "ML-Systems/exn.ML";
-if List.exists (fn s => s = "Universal") (PolyML.Compiler.structureNames ()) then ()
-else use "ML-Systems/universal.ML";
 use "ML-Systems/multithreading.ML";
 use "ML-Systems/time_limit.ML";
 use "ML-Systems/system_shell.ML";

--- a/src/Pure/ML-Systems/smlnj.ML	Sun Sep 07 17:46:41 2008 +0200
+++ b/src/Pure/ML-Systems/smlnj.ML	Sun Sep 07 17:46:43 2008 +0200
@@ -8,6 +8,7 @@
 use "ML-Systems/overloading_smlnj.ML";
 use "ML-Systems/exn.ML";
 use "ML-Systems/universal.ML";
+use "ML-Systems/thread_dummy.ML";
 use "ML-Systems/multithreading.ML";
 use "ML-Systems/system_shell.ML";