[svn:parrot] r43367 - branches/pmc_freeze_cleanup/src

plobsing at svn.parrot.org plobsing at svn.parrot.org
Sat Jan 2 04:03:22 UTC 2010


Author: plobsing
Date: Sat Jan  2 04:03:16 2010
New Revision: 43367
URL: https://trac.parrot.org/parrot/changeset/43367

Log:
remove code that used to handle prophashes

Modified:
   branches/pmc_freeze_cleanup/src/pmc_freeze.c

Modified: branches/pmc_freeze_cleanup/src/pmc_freeze.c
==============================================================================
--- branches/pmc_freeze_cleanup/src/pmc_freeze.c	Sat Jan  2 02:03:35 2010	(r43366)
+++ branches/pmc_freeze_cleanup/src/pmc_freeze.c	Sat Jan  2 04:03:16 2010	(r43367)
@@ -188,7 +188,6 @@
 enum {
     enum_PackID_normal     = 0,
     enum_PackID_seen       = 1,
-    enum_PackID_extra_info = 3
 };
 
 /*
@@ -593,14 +592,10 @@
     UINTVAL  id           = PackID_get_PMCID(n);
     int      packid_flags = PackID_get_FLAGS(n);
     PMC     *pmc          = PMCNULL;
-    int      is_prophash  = 0;
 
     PARROT_ASSERT(info->what == VISIT_THAW_NORMAL);
 
     switch (packid_flags) {
-      case enum_PackID_extra_info: /* pmc has extra data */
-        is_prophash = 1;
-        /* FALL THROUGH */
       case enum_PackID_seen:
         if (id) /* got a non-NULL PMC */
             pmc = id_list_get(interp, info, id);
@@ -661,10 +656,7 @@
         HashBucket * const b = parrot_hash_get_bucket(interp, hash, pmc);
         if (b) {
             id = (UINTVAL) b->value;
-            if (info->extra_flags)
-                packid_type = enum_PackID_extra_info;
-            else
-                packid_type = enum_PackID_seen;
+            packid_type = enum_PackID_seen;
         }
         else {
             info->id++; /* next id to freeze */


More information about the parrot-commits mailing list