Commit c770cc2f authored by sewardj's avatar sewardj
Browse files

[project @ 2001-06-05 16:21:25 by sewardj]

Make c_read visible on Win32.
parent f5364793
{-# 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 ()
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment