Fixed memory leak

diff --git a/lang/cem/cemcom.ansi/declar.g b/lang/cem/cemcom.ansi/declar.g
index 8224187..4a22814 100644 (file)
--- a/lang/cem/cemcom.ansi/declar.g
+++ b/lang/cem/cemcom.ansi/declar.g
@@ -639,6 +639,7 @@ parameter_decl(struct proto **plp;)
        {       add_proto(new, &Ds, &Dc, level);
                new->next = *plp;
                *plp = new;
+               remove_declarator(&Dc);
        }
 ;
 

diff --git a/lang/cem/cemcom.ansi/declar.str b/lang/cem/cemcom.ansi/declar.str
index ad812be..eb38fcf 100644 (file)
--- a/lang/cem/cemcom.ansi/declar.str
+++ b/lang/cem/cemcom.ansi/declar.str
@@ -11,7 +11,7 @@
 */
 
 struct declarator      {
-       struct declarator *next;
+       /* struct declarator *next; */
        struct idf *dc_idf;
        struct decl_unary *dc_decl_unary;
        struct formal *dc_formal;       /* params for function  */

diff --git a/lang/cem/cemcom.ansi/stack.str b/lang/cem/cemcom.ansi/stack.str
index 3c2447a..fd7e76d 100644 (file)
--- a/lang/cem/cemcom.ansi/stack.str
+++ b/lang/cem/cemcom.ansi/stack.str
@@ -11,7 +11,7 @@
 */
 
 struct stack_level     {
-       struct stack_level *next;
+       /* struct stack_level *next; */
        struct stack_level *sl_next;            /* upward link          */
        struct stack_level *sl_previous;        /* downward link        */
        struct stack_entry *sl_entry;           /* sideward link        */