summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDario Bertini <berdario@google.com>2018-11-16 15:49:37 +0100
committerBen Gamari <ben@smart-cactus.org>2018-11-22 16:06:09 -0500
commit11fd7df565897fb98cda9273dab28ccc654a6d95 (patch)
treecbe04b3c9312007d21c9721903adf25258b5449e
parentb44caa05ad949519431059b07370615c0f513c9c (diff)
downloadhaskell-11fd7df565897fb98cda9273dab28ccc654a6d95.tar.gz
rts/MachO: Iterate through N (all) symbols, not M external symbols
Fixes #15105 (cherry picked from commit 254890855ee04762cc0392da19e0c42fc039a718)
-rw-r--r--rts/linker/MachO.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/linker/MachO.c b/rts/linker/MachO.c
index b5caa7b7a4..053a45de10 100644
--- a/rts/linker/MachO.c
+++ b/rts/linker/MachO.c
@@ -1660,7 +1660,7 @@ ocGetNames_MachO(ObjectCode* oc)
commonCounter = (unsigned long)commonStorage;
if (oc->info->symCmd) {
- for (int i = 0; i < oc->n_symbols; i++) {
+ for (size_t i = 0; i < oc->info->n_macho_symbols; i++) {
SymbolName* nm = oc->info->macho_symbols[i].name;
MachONList *nlist = &oc->info->nlist[i];
if((nlist->n_type & N_TYPE) == N_UNDF