diff options
| -rw-r--r-- | rts/Linker.c | 4 | ||||
| -rw-r--r-- | rts/LinkerInternals.h | 5 |
2 files changed, 1 insertions, 8 deletions
diff --git a/rts/Linker.c b/rts/Linker.c index f7ac748b20..b41bc1a641 100644 --- a/rts/Linker.c +++ b/rts/Linker.c @@ -1703,9 +1703,7 @@ void freeObjectCode (ObjectCode *oc) * Sets the initial status of a fresh ObjectCode */ static void setOcInitialStatus(ObjectCode* oc) { - if (oc->isImportLib == HS_BOOL_TRUE) { - oc->status = OBJECT_DONT_RESOLVE; - } else if (oc->archiveMemberName == NULL) { + if (oc->archiveMemberName == NULL) { oc->status = OBJECT_NEEDED; } else { oc->status = OBJECT_LOADED; diff --git a/rts/LinkerInternals.h b/rts/LinkerInternals.h index 5686863cbb..729cf1d792 100644 --- a/rts/LinkerInternals.h +++ b/rts/LinkerInternals.h @@ -160,11 +160,6 @@ typedef struct _ObjectCode { ForeignExportStablePtr *stable_ptrs; - /* Indicates whether if the .o file comes from - an import library. In which case we shouldn't - execute code from it. */ - HsBool isImportLib; - /* Holds the list of symbols in the .o file which require extra information.*/ HashTable *extraInfos; |