recovered polyml-5.2 -- need to reload ML-Systems/multithreading.ML after overriding Thread structures;
--- a/src/Pure/ML-Systems/polyml.ML Thu Jul 30 23:37:53 2009 +0200
+++ b/src/Pure/ML-Systems/polyml.ML Thu Jul 30 23:50:11 2009 +0200
@@ -17,7 +17,7 @@
use "ML-Systems/polyml_common.ML";
if ml_system = "polyml-5.2"
-then use "ML-Systems/thread_dummy.ML"
+then (use "ML-Systems/thread_dummy.ML"; use "ML-Systems/multithreading.ML")
else use "ML-Systems/multithreading_polyml.ML";
val pointer_eq = PolyML.pointerEq;