diff options
| author | Simon Marlow <marlowsd@gmail.com> | 2013-10-08 16:58:24 +0100 |
|---|---|---|
| committer | Simon Marlow <marlowsd@gmail.com> | 2013-10-11 10:37:01 +0100 |
| commit | b9c6fd72cd8a00e7c3604567fc4170a3f6421d71 (patch) | |
| tree | 92fc9e9da7944dd4189ac4dbd3bf2e1241f5a1aa /includes | |
| parent | 996206b15aa1d4e6d203934484b9076c4c8e1032 (diff) | |
| download | haskell-b9c6fd72cd8a00e7c3604567fc4170a3f6421d71.tar.gz | |
Use dynamic linking only if the GHC package is compiled with -dynamic (#8376)
Diffstat (limited to 'includes')
| -rw-r--r-- | includes/Rts.h | 10 | ||||
| -rw-r--r-- | includes/rts/prof/CCS.h | 3 |
2 files changed, 10 insertions, 3 deletions
diff --git a/includes/Rts.h b/includes/Rts.h index 86555147ab..96dc6a5c30 100644 --- a/includes/Rts.h +++ b/includes/Rts.h @@ -259,6 +259,16 @@ int stg_sig_install (int, int, void *); #endif /* ----------------------------------------------------------------------------- + Ways + -------------------------------------------------------------------------- */ + +// Returns non-zero if the RTS is a profiling version +int rts_isProfiled(void); + +// Returns non-zero if the RTS is a dynamically-linked version +int rts_isDynamic(void); + +/* ----------------------------------------------------------------------------- RTS Exit codes -------------------------------------------------------------------------- */ diff --git a/includes/rts/prof/CCS.h b/includes/rts/prof/CCS.h index dbd0717d4d..b121b0361e 100644 --- a/includes/rts/prof/CCS.h +++ b/includes/rts/prof/CCS.h @@ -14,9 +14,6 @@ #ifndef RTS_PROF_CCS_H #define RTS_PROF_CCS_H -// Returns non-zero if the RTS is a profiling version -int rts_isProfiled(void); - /* ----------------------------------------------------------------------------- * Data Structures * ---------------------------------------------------------------------------*/ |