author | wenzelm |
Wed, 20 Dec 2000 11:54:58 +0100 | |
changeset 10708 | 1a6348a11489 |
parent 10707 | 9285b4d87d7d |
child 10709 | 7a29b71d6352 |
--- a/src/Pure/ML-Systems/polyml-4.0.ML Tue Dec 19 15:24:55 2000 +0100 +++ b/src/Pure/ML-Systems/polyml-4.0.ML Wed Dec 20 11:54:58 2000 +0100 @@ -21,10 +21,10 @@ (* restore old-style character / string functions *) -fun ord s = Char.ord (String.sub (s, 0)); -val chr = str o Char.chr; -val explode = (map str) o String.explode; -val implode = String.concat; +val ord = SML90.ord; +val chr = SML90.chr; +val explode = SML90.explode; +val implode = SML90.implode; (*Note start point for timing*)