[project @ 2001-02-27 10:03:22 by rrt]

Avoid types that lickle Windows doesn't understand aaahhhh. Why not just
avoid this whole file? Well, some of the types are widely used.

diff --git a/ghc/lib/std/PrelPosixTypes.hsc b/ghc/lib/std/PrelPosixTypes.hsc
index d5ed2e5..c1f61ce 100644 (file)
--- a/ghc/lib/std/PrelPosixTypes.hsc
+++ b/ghc/lib/std/PrelPosixTypes.hsc
@@ -1,5 +1,5 @@
 -----------------------------------------------------------------------------
--- $Id: PrelPosixTypes.hsc,v 1.2 2001/01/12 15:48:36 simonmar Exp $
+-- $Id: PrelPosixTypes.hsc,v 1.3 2001/02/27 10:03:22 rrt Exp $
 -- 
 -- (c) 2000
 -- 
@@ -11,19 +11,23 @@ import PrelWord
 import PrelInt
 
 #include <sys/types.h>
+#ifndef mingw32_TARGET_OS
 #include <termios.h>
+#endif
 
 data CDir    = CDir
 
 type CDev    = #type dev_t
-type CGid    = #type gid_t
 type CIno    = #type ino_t
 type CMode   = #type mode_t
-type CNlink  = #type nlink_t
 type COff    = #type off_t
 type CPid    = #type pid_t
+#ifndef mingw32_TARGET_OS
+type CGid    = #type gid_t
+type CNlink  = #type nlink_t
 type CSsize  = #type ssize_t
 type CUid    = #type uid_t
 type CCc     = #type cc_t
 type CSpeed  = #type speed_t
 type CTcflag = #type tcflag_t
+#endif
\ No newline at end of file