summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBen Gamari <ben@smart-cactus.org>2022-07-14 09:06:46 -0400
committerBen Gamari <ben@smart-cactus.org>2022-07-14 19:49:11 -0400
commitae428688426b9d4f432412b61045086cbefbbcc6 (patch)
tree101cb9110d92a88385c621c860778ecc74006c65
parent114b9bc4c9aceaa244739494000e67353c7b8819 (diff)
downloadhaskell-ae428688426b9d4f432412b61045086cbefbbcc6.tar.gz
rts/linker: Fix resolution of __dso_handle on Darwin
Darwin expects a leading underscore. (cherry picked from commit 1790cc8d6193ea08526b0ae556167aa4146f2cc4)
-rw-r--r--rts/Linker.c2
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 {