src/Pure/ML-Systems/mlworks.ML
changeset 4973 7420178bd2d9
parent 4430 b2c1cf960c53
child 4977 6cec2c0ffdbf
     1.1 --- a/src/Pure/ML-Systems/mlworks.ML	Wed May 27 12:23:45 1998 +0200
     1.2 +++ b/src/Pure/ML-Systems/mlworks.ML	Wed May 27 12:25:56 1998 +0200
     1.3 @@ -25,9 +25,6 @@
     1.4  
     1.5  (* Poly/ML emulation *)
     1.6  
     1.7 -(*just for versions of MLWorks that don't provide the Option structure*)
     1.8 -structure Option = General;
     1.9 -
    1.10  (*To exit the system with an exit code -- an alternative to ^D *)
    1.11  fun exit 0 = (OS.Process.exit OS.Process.success): unit
    1.12    | exit _ = OS.Process.exit OS.Process.failure;