OpenE2K
/
gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Improve cleaning up. See hangeLog. 

From-SVN: r9554
This commit is contained in:
Per Bothner 1995-04-30 14:43:12 -07:00
parent 75410dc3a6
commit 896fc32209
1 changed files with 25 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

35
gcc/cpphash.c
View File

@ -123,18 +123,21 @@ delete_macro (hp)
if (hp == *hp->bucket_hdr)
*hp->bucket_hdr = hp->next;
#if 0
if (hp->type == T_MACRO) {
DEFINITION *d = hp->value.defn;
struct reflist *ap, *nextap;
if (hp->type == T_MACRO)
{
DEFINITION *d = hp->value.defn;
struct reflist *ap, *nextap;
for (ap = d->pattern; ap != NULL; ap = nextap) {
nextap = ap->next;
free (ap);
for (ap = d->pattern; ap != NULL; ap = nextap)
{
nextap = ap->next;
free (ap);
}
if (d->nargs >= 0)
free (d->args.argnames);
free (d);
}
free (d);
}
#endif
free (hp);
}
/*
@ -197,3 +200,15 @@ install (name, len, type, ivalue, value, hash)
hp->name[len] = 0;
return hp;
}
void
cpp_hash_cleanup (pfile)
cpp_reader *pfile;
{
register int i;
for (i = HASHSIZE; --i >= 0; )
{
while (hashtab[i])
delete_macro (hashtab[i]);
}
}