blob: 2c053e18d0351a024bbcd6e9a3ca6cadfd44ba99 (
about) (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
|
Fixes build with GCC 5 and later.
Patch from <https://aur.archlinux.org/cgit/aur.git/tree/hsbase_inline.patch?h=hugs>.
diff --git a/packages/base/include/HsBase.h b/packages/base/include/HsBase.h
index aa1a7fb..78d5b46 100644
--- a/packages/base/include/HsBase.h
+++ b/packages/base/include/HsBase.h
@@ -217,15 +217,7 @@ StgWord64 stg_integerToWord64 (StgInt sa, StgByteArray /* Really: mp_limb_t* */
when compiling to native code.
-------------------------------------------------------------------------- */
-#ifndef INLINE
-# if defined(_MSC_VER)
-# define INLINE extern __inline
-# elif defined(__GNUC__)
-# define INLINE extern inline
-# else
-# define INLINE inline
-# endif
-#endif
+#define INLINE inline
INLINE int __hscore_get_errno(void) { return errno; }
INLINE void __hscore_set_errno(int e) { errno = e; }
|
