src/Pure/ML-Systems/polyml-5.1.ML
author wenzelm
Tue, 27 Jan 2009 12:59:22 +0100
changeset 29638 1f8f3d26a2cf
parent 29564 f8b933a62151
child 30627 fb9e73c01603
permissions -rw-r--r--
added share_common_data -- reduces heap space, but takes long;
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
26381
509a1ca9d35c Compatibility wrapper for Poly/ML 5.1.
wenzelm
parents:
diff changeset
     1
(*  Title:      Pure/ML-Systems/polyml-5.1.ML
509a1ca9d35c Compatibility wrapper for Poly/ML 5.1.
wenzelm
parents:
diff changeset
     2
509a1ca9d35c Compatibility wrapper for Poly/ML 5.1.
wenzelm
parents:
diff changeset
     3
Compatibility wrapper for Poly/ML 5.1.
509a1ca9d35c Compatibility wrapper for Poly/ML 5.1.
wenzelm
parents:
diff changeset
     4
*)
509a1ca9d35c Compatibility wrapper for Poly/ML 5.1.
wenzelm
parents:
diff changeset
     5
28836
dd361ca41f69 disabled threads -- as advertized;
wenzelm
parents: 28254
diff changeset
     6
use "ML-Systems/thread_dummy.ML";
26381
509a1ca9d35c Compatibility wrapper for Poly/ML 5.1.
wenzelm
parents:
diff changeset
     7
use "ML-Systems/polyml_common.ML";
26389
3835c431e141 use polyml_old_compiler5.ML;
wenzelm
parents: 26381
diff changeset
     8
use "ML-Systems/polyml_old_compiler5.ML";
26381
509a1ca9d35c Compatibility wrapper for Poly/ML 5.1.
wenzelm
parents:
diff changeset
     9
509a1ca9d35c Compatibility wrapper for Poly/ML 5.1.
wenzelm
parents:
diff changeset
    10
val pointer_eq = PolyML.pointerEq;
29638
1f8f3d26a2cf added share_common_data -- reduces heap space, but takes long;
wenzelm
parents: 29564
diff changeset
    11
1f8f3d26a2cf added share_common_data -- reduces heap space, but takes long;
wenzelm
parents: 29564
diff changeset
    12
fun share_common_data () = PolyML.shareCommonData PolyML.rootFunction;
1f8f3d26a2cf added share_common_data -- reduces heap space, but takes long;
wenzelm
parents: 29564
diff changeset
    13