Commit 06be5839 authored by Ömer Sinan Ağacan's avatar Ömer Sinan Ağacan

Update oc status on objectUnload

parent faad907a
Pipeline #20638 failed with stages
in 72 minutes and 19 seconds
......@@ -1779,6 +1779,8 @@ static HsInt unloadObj_ (pathchar *path, bool just_purge)
ObjectCode *prev = NULL;
for (ObjectCode *oc = loaded_objects; oc; oc = oc->next_loaded_object) {
if (pathcmp(oc->fileName,path) == 0) {
oc->status = OBJECT_UNLOADED;
// These are both idempotent, so in just_purge mode we can later
// call unloadObj() to really unload the object.
removeOcSymbols(oc);
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment