diff options
| author | Andreas Klebinger <klebinger.andreas@gmx.at> | 2021-01-19 17:24:52 +0100 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2021-01-22 15:07:16 -0500 |
| commit | 5836efd76ea07f4d62004ee2847abb00adb938e0 (patch) | |
| tree | 40c7c6c3217d1fa8d400bf86b18e64b29e2d8bce | |
| parent | 13d876bab3615174eb825d7b8048a0dd74eaebb8 (diff) | |
| download | haskell-5836efd76ea07f4d62004ee2847abb00adb938e0.tar.gz | |
Force inlining of deRefStablePtr to silence warnings
| -rw-r--r-- | includes/rts/StablePtr.h | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/includes/rts/StablePtr.h b/includes/rts/StablePtr.h index 56113b9f81..73cd5bed4d 100644 --- a/includes/rts/StablePtr.h +++ b/includes/rts/StablePtr.h @@ -13,7 +13,7 @@ #pragma once -EXTERN_INLINE StgPtr deRefStablePtr (StgStablePtr stable_ptr); +ATTR_ALWAYS_INLINE EXTERN_INLINE StgPtr deRefStablePtr (StgStablePtr stable_ptr); StgStablePtr getStablePtr (StgPtr p); /* ----------------------------------------------------------------------------- @@ -28,7 +28,7 @@ typedef struct { extern DLL_IMPORT_RTS spEntry *stable_ptr_table; -EXTERN_INLINE +ATTR_ALWAYS_INLINE EXTERN_INLINE StgPtr deRefStablePtr(StgStablePtr sp) { // acquire load to ensure that we see the new SPT if it has been recently |