(free_type): free bignum integers
git-svn-id: svn://svn.h5l.se/heimdal/trunk/heimdal@15744 ec53bebd-3082-4978-b11e-865c3cabbd6b
This commit is contained in:
@@ -52,6 +52,10 @@ free_type (const char *name, const Type *t, int preserve)
|
|||||||
fprintf (codefile, "free_%s(%s);\n", t->symbol->gen_name, name);
|
fprintf (codefile, "free_%s(%s);\n", t->symbol->gen_name, name);
|
||||||
break;
|
break;
|
||||||
case TInteger:
|
case TInteger:
|
||||||
|
if (t->range == NULL && t->members == NULL) {
|
||||||
|
free_primitive ("heim_integer", name);
|
||||||
|
break;
|
||||||
|
}
|
||||||
case TBoolean:
|
case TBoolean:
|
||||||
case TEnumerated :
|
case TEnumerated :
|
||||||
case TNull:
|
case TNull:
|
||||||
|
Reference in New Issue
Block a user