diff options
| author | Ben Gamari <ben@smart-cactus.org> | 2022-08-15 15:01:32 -0400 |
|---|---|---|
| committer | Andreas Klebinger <klebinger.andreas@gmx.at> | 2022-10-12 22:49:00 +0000 |
| commit | bfc95d1feb0f91cbcd32f8c71e5dd32bec5a1e8e (patch) | |
| tree | 6f25c2ccb968e74839f5eea309a338d63276bf7b /rts/linker/InitFini.c | |
| parent | 5c50b5210c3c8fa1bd7ba98410d0ccfb010fe0fb (diff) | |
| download | haskell-wip/T21847.tar.gz | |
rts/linker: Add support for .fini sectionswip/T21847
Diffstat (limited to 'rts/linker/InitFini.c')
| -rw-r--r-- | rts/linker/InitFini.c | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/rts/linker/InitFini.c b/rts/linker/InitFini.c index 48a548e3cf..6c787fe552 100644 --- a/rts/linker/InitFini.c +++ b/rts/linker/InitFini.c @@ -120,6 +120,11 @@ static bool runInitFini(struct InitFiniList **head) (*init)(argc, argv, envv); break; } + case INITFINI_FINI: { + fini_t *fini = (fini_t*)section->start; + (*fini)(); + break; + } case INITFINI_CTORS: { uint8_t *init_startC = section->start; init_t *init_start = (init_t*)init_startC; |