[svn:parrot] r43058 - in branches/pmc_freeze_cleanup: include/parrot src

[darbelo at svn.parrot.org]

Author: darbelo
Date: Tue Dec 15 00:33:57 2009
New Revision: 43058
URL: https://trac.parrot.org/parrot/changeset/43058

Log:
Add a dummy self-reference and a #define to the visit_info structure to preserve 
source-level backwards compatibility.  This lets decnum-dynpmcs build unmodified
on this branch and pass al freeze/thaw tests.  This should allow us to merge our
changes back to trunk without waiting for a deprecation boundary.

Modified:
   branches/pmc_freeze_cleanup/include/parrot/pmc_freeze.h
   branches/pmc_freeze_cleanup/src/pmc_freeze.c

Modified: branches/pmc_freeze_cleanup/include/parrot/pmc_freeze.h
==============================================================================
--- branches/pmc_freeze_cleanup/include/parrot/pmc_freeze.h	Tue Dec 15 00:16:57 2009	(r43057)
+++ branches/pmc_freeze_cleanup/include/parrot/pmc_freeze.h	Tue Dec 15 00:33:57 2009	(r43058)
@@ -69,8 +69,11 @@
     INTVAL              extra_flags;    /* concerning to extra */
     PMC                *thaw_result;    /* 1st thawed */
     const image_funcs *vtable;
+    struct _visit_info *image_io;       /* dummy backwards-compat pointer. */
 } visit_info;
 
+#define IMAGE_IO visit_info
+
 /*
  * public interfaces
  */

Modified: branches/pmc_freeze_cleanup/src/pmc_freeze.c
==============================================================================
--- branches/pmc_freeze_cleanup/src/pmc_freeze.c	Tue Dec 15 00:16:57 2009	(r43057)
+++ branches/pmc_freeze_cleanup/src/pmc_freeze.c	Tue Dec 15 00:33:57 2009	(r43058)
@@ -504,6 +504,8 @@
     info->seen = pmc_new(interp, enum_class_Hash);
     VTABLE_set_pointer(interp, info->seen, parrot_new_intval_hash(interp));
 
+    info->image_io = info; /* backwards-compat hack */
+
     info->vtable = &opcode_funcs;
 
     if (info->what == VISIT_FREEZE_NORMAL