[project @ 2003-04-11 23:39:43 by ross]

[ghc-base.git] / Foreign / C / Error.hs

diff --git a/Foreign/C/Error.hs b/Foreign/C/Error.hs
index ddf8c9e..613dd1a 100644 (file)
--- a/Foreign/C/Error.hs
+++ b/Foreign/C/Error.hs
@@ -116,6 +116,10 @@ import System.IO           ( IOError, Handle, ioError )
 import System.IO.Unsafe                ( unsafePerformIO )
 #endif
 
+#ifdef __HUGS__
+{-# CBITS errno.c #-}
+#endif
+
 -- "errno" type
 -- ------------