Message ID | 20101005100948.1836.16167@gimli.local |
---|---|
State | New |
Headers | show |
diff --git a/primary.c b/primary.c index f6ceae9..9d0deec 100644 --- a/primary.c +++ b/primary.c @@ -2164,6 +2164,7 @@ gfc_free_structure_ctor_component (gfc_structure_ctor_component *comp) { gfc_free (comp->name); gfc_free_expr (comp->val); + gfc_free (comp); }