Free the local symbol table at the end of the ocResolve_ phase; we
won't need it after that.
/* -----------------------------------------------------------------------------
/* -----------------------------------------------------------------------------
- * $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
*
*
* (c) The GHC Team, 2000
*
free(oc->fileName);
free(oc->symbols);
free(oc->sections);
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 the local symbol table; we won't need it again. */
+ freeHashTable(oc->lochash, NULL);
+ oc->lochash = NULL;
+