removed obsolete Posix/Signal compatibility wrappers;
authorwenzelm
Fri, 03 Oct 2008 21:06:38 +0200
changeset 28490 40c3f900c457
parent 28489 404649964f09
child 28491 c5420429a5aa
removed obsolete Posix/Signal compatibility wrappers;
src/Pure/ML-Systems/polyml_old_basis.ML
src/Pure/ML-Systems/proper_int.ML
--- a/src/Pure/ML-Systems/polyml_old_basis.ML	Fri Oct 03 21:06:37 2008 +0200
+++ b/src/Pure/ML-Systems/polyml_old_basis.ML	Fri Oct 03 21:06:38 2008 +0200
@@ -21,17 +21,6 @@
   val full = all;
 end;
 
-structure Posix =
-struct
-  open Posix;
-  structure IO =
-  struct
-    open IO;
-    val mkTextReader = mkReader;
-    val mkTextWriter = mkWriter;
-  end;
-end;
-
 structure TextIO =
 struct
   open TextIO;
--- a/src/Pure/ML-Systems/proper_int.ML	Fri Oct 03 21:06:37 2008 +0200
+++ b/src/Pure/ML-Systems/proper_int.ML	Fri Oct 03 21:06:38 2008 +0200
@@ -193,18 +193,3 @@
   fun fmt a b = Time.fmt (dest_int a) b;
 end;
 
-
-(* Posix *)
-
-structure Posix =
-struct
-  open Posix;
-  structure IO =
-  struct
-    open IO;
-    fun mkTextWriter {appendMode, chunkSize, fd, initBlkMode, name} =
-      IO.mkTextWriter {appendMode = appendMode, chunkSize = dest_int chunkSize,
-        fd = fd, initBlkMode = initBlkMode, name = name};
-  end;
-end;
-