[svn:parrot] r41766 - in trunk: include/parrot src

[bacek at svn.parrot.org]

Author: bacek
Date: Thu Oct  8 10:29:53 2009
New Revision: 41766
URL: https://trac.parrot.org/parrot/changeset/41766

Log:
[cage][core] Remove unused (assigned only) PackFile_FixupEntry.seg field

Modified:
   trunk/include/parrot/packfile.h
   trunk/src/packfile.c
   trunk/src/pbc_merge.c

Modified: trunk/include/parrot/packfile.h
==============================================================================
--- trunk/include/parrot/packfile.h	Thu Oct  8 10:17:10 2009	(r41765)
+++ trunk/include/parrot/packfile.h	Thu Oct  8 10:29:53 2009	(r41766)
@@ -217,7 +217,6 @@
     opcode_t                  type;     /* who knows what fixups we need? */
     char                     *name;     /* name of the label */
     opcode_t                  offset;   /* location of the item */
-    PackFile_ByteCode        *seg;
 } PackFile_FixupEntry;
 
 typedef enum {

Modified: trunk/src/packfile.c
==============================================================================
--- trunk/src/packfile.c	Thu Oct  8 10:17:10 2009	(r41765)
+++ trunk/src/packfile.c	Thu Oct  8 10:29:53 2009	(r41766)
@@ -943,10 +943,6 @@
 
                 break;
             }
-            case enum_fixup_label:
-                /* fill in current bytecode seg */
-                ft->fixups[i]->seg = self;
-                break;
             default:
                 break;
         }
@@ -3533,7 +3529,6 @@
     self->fixups[i]->type   = type;
     self->fixups[i]->name   = mem_sys_strdup(label);
     self->fixups[i]->offset = offs;
-    self->fixups[i]->seg    = self->code;
 }
 
 
@@ -3562,7 +3557,6 @@
     for (i = 0; i < ft->fixup_count; i++) {
         if ((INTVAL)((enum_fixup_t)ft->fixups[i]->type) == type
         &&  STREQ(ft->fixups[i]->name, name)) {
-            ft->fixups[i]->seg = ft->code;
             return ft->fixups[i];
         }
     }

Modified: trunk/src/pbc_merge.c
==============================================================================
--- trunk/src/pbc_merge.c	Thu Oct  8 10:17:10 2009	(r41765)
+++ trunk/src/pbc_merge.c	Thu Oct  8 10:29:53 2009	(r41766)
@@ -548,8 +548,6 @@
                     Parrot_exit(interp, 1);
             }
 
-            copy->seg = bc;
-
             /* Slot it into the list. */
             fixups[cursor] = copy;
             cursor++;