From: simonmar <unknown>
Date: Tue, 31 Jul 2001 12:59:30 +0000 (+0000)
Subject: [project @ 2001-07-31 12:59:30 by simonmar]
X-Git-Tag: nhc98-1-18-release~1204
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=d6a751fe82a7b606ece980f8a14210649883f59e;p=haskell-directory.git

[project @ 2001-07-31 12:59:30 by simonmar]
merge ghc/lib/std/PrelCError.lhs rev. 1.10
---

diff --git a/Foreign/C/Error.hs b/Foreign/C/Error.hs
index d7c7b6d..71a05ac 100644
--- a/Foreign/C/Error.hs
+++ b/Foreign/C/Error.hs
@@ -9,7 +9,7 @@
 -- Stability   :  provisional
 -- Portability :  portable
 --
--- $Id: Error.hs,v 1.2 2001/07/03 11:37:50 simonmar Exp $
+-- $Id: Error.hs,v 1.3 2001/07/31 12:59:30 simonmar Exp $
 --
 -- C-specific Marshalling support: Handling of C "errno" error codes
 --
@@ -118,7 +118,8 @@ import System.IO		( IOError, Handle, ioError )
 -- ------------
 
 -- import of C function that gives address of errno
---
+-- This function exists because errno is a variable on some systems, but on
+-- Windows it is a macro for a function...
 foreign import "ghcErrno" unsafe _errno :: Ptr CInt
 
 -- Haskell representation for "errno" values