diff options
| author | Christiaan Baaj <christiaan.baaij@gmail.com> | 2014-01-28 08:24:55 -0600 |
|---|---|---|
| committer | Austin Seipp <austin@well-typed.com> | 2014-01-28 08:24:55 -0600 |
| commit | f7be53ac9dac85b83e7fe5ecede01b98a572ba48 (patch) | |
| tree | ddf358efae5f9ba93ef9dd7e252311399417b00c /compiler/utils/Platform.hs | |
| parent | 943f22a4c959a2d0c0e47fc40c2163ef7760b6d9 (diff) | |
| download | haskell-f7be53ac9dac85b83e7fe5ecede01b98a572ba48.tar.gz | |
Fix inplace dynamic linking on OS X (#8266)
Signed-off-by: Austin Seipp <austin@well-typed.com>
Diffstat (limited to 'compiler/utils/Platform.hs')
| -rw-r--r-- | compiler/utils/Platform.hs | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/compiler/utils/Platform.hs b/compiler/utils/Platform.hs index f69bb4cdf6..ea1a3e5e93 100644 --- a/compiler/utils/Platform.hs +++ b/compiler/utils/Platform.hs @@ -12,6 +12,7 @@ module Platform ( target32Bit, isARM, osElfTarget, + osMachOTarget, platformUsesFrameworks, platformBinariesAreStaticLibs, ) @@ -129,6 +130,11 @@ osElfTarget OSUnknown = False -- portability, otherwise we have to answer this question for every -- new platform we compile on (even unreg). +-- | This predicate tells us whether the OS support Mach-O shared libraries. +osMachOTarget :: OS -> Bool +osMachOTarget OSDarwin = True +osMachOTarget _ = False + osUsesFrameworks :: OS -> Bool osUsesFrameworks OSDarwin = True osUsesFrameworks OSiOS = True |