From: simonmar <unknown>
Date: Wed, 21 Jan 2004 17:28:47 +0000 (+0000)
Subject: [project @ 2004-01-21 17:28:47 by simonmar]
X-Git-Tag: nhc98-1-18-release~404
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=abcc6295f998cd28bc4de3b3c8d7266dec462bac;p=ghc-base.git

[project @ 2004-01-21 17:28:47 by simonmar]
__hscore_set_errno() should return void, not int.
---

diff --git a/include/HsBase.h b/include/HsBase.h
index 9db6133..e3a8120 100644
--- a/include/HsBase.h
+++ b/include/HsBase.h
@@ -204,7 +204,7 @@ StgWord64 stg_integerToWord64 (StgInt sa, StgByteArray /* Really: mp_limb_t* */
 #endif
 
 INLINE int __hscore_get_errno(void) { return errno; }
-INLINE int __hscore_set_errno(int e) { errno = e; }
+INLINE void __hscore_set_errno(int e) { errno = e; }
 
 #if !defined(_MSC_VER)
 INLINE int __hscore_s_isreg(m)  { return S_ISREG(m);  }