Andreas Klebinger pushed to branch wip/andreask/linker_fix at Glasgow Haskell Compiler / GHC
Commits:
-
3e1ed449
by Andreas Klebinger at 2025-08-11T15:35:54+02:00
1 changed file:
Changes:
| ... | ... | @@ -1441,7 +1441,11 @@ preloadObjectFile (pathchar *path) |
| 1441 | 1441 | /* FIXME (AP): =mapped= parameter unconditionally set to true */
|
| 1442 | 1442 | oc = mkOc(STATIC_OBJECT, path, image, fileSize, true, NULL, misalignment);
|
| 1443 | 1443 | |
| 1444 | - verifyAndInitOc(oc);
|
|
| 1444 | + if (!verifyAndInitOc(oc)) {
|
|
| 1445 | + freeObjectCode(oc);
|
|
| 1446 | + debugBelch("loadObj: Failed to verify oc.\n");
|
|
| 1447 | + return NULL;
|
|
| 1448 | + };
|
|
| 1445 | 1449 | return oc;
|
| 1446 | 1450 | }
|
| 1447 | 1451 |