diff options
| author | Simon Marlow <marlowsd@gmail.com> | 2013-09-22 13:08:01 +0100 |
|---|---|---|
| committer | Simon Marlow <marlowsd@gmail.com> | 2013-09-23 10:58:35 +0100 |
| commit | 1908195261ccf16b0f3d2e77ebd5cd40c9e29cbc (patch) | |
| tree | d0daabd85293a3a12749d7a277f2526576c851df /includes | |
| parent | f5879acd018494b84233f26fba828ce376d0f81d (diff) | |
| download | haskell-1908195261ccf16b0f3d2e77ebd5cd40c9e29cbc.tar.gz | |
Fix linker_unload now that we are running constructors in the linker (#8291)
See also #5435.
Now we have to remember the the StablePtrs that get created by the
module initializer so that we can free them again in unloadObj().
Diffstat (limited to 'includes')
| -rw-r--r-- | includes/rts/Linker.h | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/includes/rts/Linker.h b/includes/rts/Linker.h index 28f0a0e928..2e88fe4015 100644 --- a/includes/rts/Linker.h +++ b/includes/rts/Linker.h @@ -49,4 +49,7 @@ HsInt resolveObjs( void ); /* load a dynamic library */ const char *addDLL( pathchar* dll_name ); +/* called by the initialization code for a module, not a user API */ +StgStablePtr foreignExportStablePtr (StgPtr p); + #endif /* RTS_LINKER_H */ |