From c770cc2f062cdced907cbf2dbd5f3610edb17458 Mon Sep 17 00:00:00 2001
From: sewardj <unknown>
Date: Tue, 5 Jun 2001 16:21:25 +0000
Subject: [PATCH] [project @ 2001-06-05 16:21:25 by sewardj] Make c_read
 visible on Win32.

---
 ghc/lib/std/PrelPosix.hsc |    8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/ghc/lib/std/PrelPosix.hsc b/ghc/lib/std/PrelPosix.hsc
index 50268ed..665e17e 100644
--- a/ghc/lib/std/PrelPosix.hsc
+++ b/ghc/lib/std/PrelPosix.hsc
@@ -1,7 +1,7 @@
 {-# OPTIONS -fno-implicit-prelude -optc-DNON_POSIX_SOURCE #-}
 
 -- ---------------------------------------------------------------------------
--- $Id: PrelPosix.hsc,v 1.5 2001/05/30 16:39:22 sewardj Exp $
+-- $Id: PrelPosix.hsc,v 1.6 2001/06/05 16:21:25 sewardj Exp $
 --
 -- POSIX support layer for the standard libraries
 --
@@ -256,6 +256,9 @@ foreign import "lseek" unsafe
 foreign import "write" unsafe 
    c_write :: CInt -> Ptr CChar -> CSize -> IO CSsize
 
+foreign import "read" unsafe 
+   c_read :: CInt -> Ptr CChar -> CSize -> IO CSsize
+
 #ifndef mingw32_TARGET_OS
 foreign import "fcntl" unsafe
    fcntl_read  :: CInt -> CInt -> IO CInt
@@ -266,9 +269,6 @@ foreign import "fcntl" unsafe
 foreign import "fork" unsafe
    fork :: IO CPid 
 
-foreign import "read" unsafe 
-   c_read :: CInt -> Ptr CChar -> CSize -> IO CSsize
-
 foreign import "sigemptyset" unsafe
    c_sigemptyset :: Ptr CSigset -> IO ()
 
-- 
1.7.10.4