author | wenzelm |
Sat, 15 Nov 2008 11:25:17 +0100 | |
changeset 28796 | 56cb4130177a |
parent 28795 | 6891e273c33b |
child 28797 | 9dcd32ee5dbe |
--- a/src/Pure/ML-Systems/polyml.ML Fri Nov 14 16:49:52 2008 +0100 +++ b/src/Pure/ML-Systems/polyml.ML Sat Nov 15 11:25:17 2008 +0100 @@ -7,7 +7,8 @@ open Thread; use "ML-Systems/polyml_common.ML"; -if ml_system = "polyml-5.2" then () +if ml_system = "polyml-5.2" +then use "ML-Systems/thread_dummy.ML" else use "ML-Systems/multithreading_polyml.ML"; val pointer_eq = PolyML.pointerEq;