src/Pure/pure_setup.ML
changeset 31433 12f5f6af3d2d
parent 30625 d53d1a16d5ee
child 31646 ef30cd0e41e5
--- a/src/Pure/pure_setup.ML	Thu Jun 04 18:00:47 2009 +0200
+++ b/src/Pure/pure_setup.ML	Thu Jun 04 19:15:54 2009 +0200
@@ -42,8 +42,8 @@
 toplevel_pp ["Path", "T"] "Pretty.str o quote o Path.implode";
 toplevel_pp ["File", "ident"] "Pretty.str o quote o File.rep_ident";
 
-if File.exists (Path.explode ("ML-Systems/install_pp_" ^ ml_system ^ ".ML"))
-then use ("ML-Systems/install_pp_" ^ ml_system ^ ".ML")
+if ml_system = "polyml-experimental"
+then use "ML-Systems/install_pp_polyml-5.3.ML"
 else if String.isPrefix "polyml" ml_system
 then use "ML-Systems/install_pp_polyml.ML"
 else ();