diff options
| author | Ben Gamari <ben@smart-cactus.org> | 2022-07-12 12:44:25 -0400 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2022-07-16 23:50:36 -0400 |
| commit | f17912e4db9a104b30b956ae61d17329d0a5f601 (patch) | |
| tree | cdfc10af31d4146c0680cb0123b6c8d09a4d5482 /rts/Linker.c | |
| parent | 033580bc35451e49ed021ae5391da8e199d58c8d (diff) | |
| download | haskell-f17912e4db9a104b30b956ae61d17329d0a5f601.tar.gz | |
rts/linker/PEi386: Add finalization support
This implements #20494 for the PEi386 linker.
Happily, this also appears to fix `T9405`, resolving #21361.
Diffstat (limited to 'rts/Linker.c')
| -rw-r--r-- | rts/Linker.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/rts/Linker.c b/rts/Linker.c index cd469b4f2d..7bbeb49f9c 100644 --- a/rts/Linker.c +++ b/rts/Linker.c @@ -1143,6 +1143,8 @@ void freeObjectCode (ObjectCode *oc) // happens when we resolve the object. #if defined(OBJFORMAT_ELF) ocRunFini_ELF(oc); +#elif defined(OBJFORMAT_PEi386) + ocRunFini_PEi386(oc); #endif } |