Commit 07fd0a12 authored by sewardj's avatar sewardj
Browse files

[project @ 2001-02-12 16:40:34 by sewardj]

Free the local symbol table at the end of the ocResolve_ phase; we
won't need it after that.
parent aec615ad
/* -----------------------------------------------------------------------------
* $Id: Linker.c,v 1.25 2001/02/12 13:30:15 sewardj Exp $
* $Id: Linker.c,v 1.26 2001/02/12 16:40:34 sewardj Exp $
*
* (c) The GHC Team, 2000
*
......@@ -463,7 +463,9 @@ unloadObj( char *path )
free(oc->fileName);
free(oc->symbols);
free(oc->sections);
freeHashTable(oc->lochash, NULL);
/* The local hash table should have been freed at the end
of the ocResolve_ call on it. */
ASSERT(oc->lochash == NULL);
free(oc);
return 1;
}
......@@ -1611,6 +1613,10 @@ ocResolve_ELF ( ObjectCode* oc )
}
}
/* Free the local symbol table; we won't need it again. */
freeHashTable(oc->lochash, NULL);
oc->lochash = NULL;
return 1;
}
......
Supports Markdown
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