diff options
| author | Ben Gamari <ben@smart-cactus.org> | 2022-07-14 09:06:46 -0400 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2022-07-16 23:50:37 -0400 |
| commit | 1fd2f8516fa3902e42c97b56fbcf1b0269f0a60a (patch) | |
| tree | c805befdc9d23ad5e85afeb47d495c402a0ce7ae | |
| parent | 5f8203b86c312f61a4dff9b83d456d17fabc087f (diff) | |
| download | haskell-1fd2f8516fa3902e42c97b56fbcf1b0269f0a60a.tar.gz | |
rts/linker: Fix resolution of __dso_handle on Darwin
Darwin expects a leading underscore.
| -rw-r--r-- | rts/Linker.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/Linker.c b/rts/Linker.c index e3bcd5d795..0672873a2d 100644 --- a/rts/Linker.c +++ b/rts/Linker.c @@ -846,7 +846,7 @@ SymbolAddr* lookupDependentSymbol (SymbolName* lbl, ObjectCode *dependent, SymTy RtsSymbolInfo *pinfo; /* See Note [Resolving __dso_handle] */ - if (strcmp(lbl, "__dso_handle") == 0) { + if (strcmp(lbl, MAYBE_LEADING_UNDERSCORE_STR("__dso_handle")) == 0) { if (dependent) { return dependent->image; } else { |