src/Pure/ML-Systems/polyml-5.1.ML
author wenzelm
Tue, 14 Oct 2008 16:01:36 +0200
changeset 28592 824f8390aaa2
parent 28254 d67ba23e0277
child 28836 dd361ca41f69
permissions -rw-r--r--
renamed AtpThread to AtpWrapper;
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
    ID:         $Id$
509a1ca9d35c Compatibility wrapper for Poly/ML 5.1.
wenzelm
parents:
diff changeset
     3
509a1ca9d35c Compatibility wrapper for Poly/ML 5.1.
wenzelm
parents:
diff changeset
     4
Compatibility wrapper for Poly/ML 5.1.
509a1ca9d35c Compatibility wrapper for Poly/ML 5.1.
wenzelm
parents:
diff changeset
     5
*)
509a1ca9d35c Compatibility wrapper for Poly/ML 5.1.
wenzelm
parents:
diff changeset
     6
28152
c1277547d59f *** empty log message ***
wenzelm
parents: 28144
diff changeset
     7
open Thread;
26381
509a1ca9d35c Compatibility wrapper for Poly/ML 5.1.
wenzelm
parents:
diff changeset
     8
use "ML-Systems/polyml_common.ML";
26389
3835c431e141 use polyml_old_compiler5.ML;
wenzelm
parents: 26381
diff changeset
     9
use "ML-Systems/polyml_old_compiler5.ML";
26381
509a1ca9d35c Compatibility wrapper for Poly/ML 5.1.
wenzelm
parents:
diff changeset
    10
509a1ca9d35c Compatibility wrapper for Poly/ML 5.1.
wenzelm
parents:
diff changeset
    11
val pointer_eq = PolyML.pointerEq;