Free proper variable for var lists in q2c.

diff --git a/src/language/lexer/ChangeLog b/src/language/lexer/ChangeLog
index 4a96aeb941a9479876c7386203e97d30fc102f8b..65198388f6d5289c3b9a66a0f975eb4f54e86d65 100644 (file)
--- a/src/language/lexer/ChangeLog
+++ b/src/language/lexer/ChangeLog
@@ -1,3 +1,9 @@
+Fri Mar 10 08:29:25 2006  Ben Pfaff  <blp@gnu.org>
+
+       * q2c.c: (dump_free) Free proper member for var list, instead of
+       hard-coding to v_variables.  Thanks to Jason Stover for reporting
+       this bug.
+
 Thu Mar  2 08:40:33 WST 2006 John Darrington <john@darrington.wattle.id.au>
        
        * Moved files from src directory

diff --git a/src/language/lexer/q2c.c b/src/language/lexer/q2c.c
index acf08db8f1d72ce61ea280e00a8fa8902343edcc..46255e34aa391b904c1d644ad268425e20e619ad 100644 (file)
--- a/src/language/lexer/q2c.c
+++ b/src/language/lexer/q2c.c
@@ -1942,7 +1942,7 @@ dump_free (int persistent)
          switch (sbc->type) 
            {
             case SBC_VARLIST:
-             dump (0, "free (p->v_variables);");
+             dump (0, "free (p->v_%s);", st_lower (sbc->name));
               break;
            case SBC_STRING:
              dump (0, "free (p->s_%s);", st_lower (sbc->name));