cvs -q diff -u
Index: classes/eval.pmc
===================================================================
RCS file: /cvs/public/parrot/classes/eval.pmc,v
retrieving revision 1.32
diff -u -u -r1.32 eval.pmc
--- classes/eval.pmc	10 Nov 2004 15:01:15 -0000	1.32
+++ classes/eval.pmc	15 Nov 2004 21:38:15 -0000
@@ -67,8 +67,8 @@
         seg = (struct PackFile_Segment *)cur_cs->debugs;
         if (seg)
             PackFile_Segment_destroy(seg);
-        seg = (struct PackFile_Segment *)cur_cs->fixups;
-        PackFile_Segment_destroy(seg);
+        if (cur_cs->fixups)
+            PackFile_FixupTable_clear(cur_cs->fixups);
         seg = (struct PackFile_Segment *)cur_cs;
         PackFile_Segment_destroy(seg);
         sub_data->seg = NULL;