[svn:parrot] r49524 - branches/generational_gc/src/call

bacek at svn.parrot.org bacek at svn.parrot.org
Wed Oct 13 12:02:24 UTC 2010


Author: bacek
Date: Wed Oct 13 12:02:24 2010
New Revision: 49524
URL: https://trac.parrot.org/parrot/changeset/49524

Log:
Add more write barriers when we are poking into CallContext directly

Modified:
   branches/generational_gc/src/call/args.c

Modified: branches/generational_gc/src/call/args.c
==============================================================================
--- branches/generational_gc/src/call/args.c	Wed Oct 13 12:01:47 2010	(r49523)
+++ branches/generational_gc/src/call/args.c	Wed Oct 13 12:02:24 2010	(r49524)
@@ -321,6 +321,7 @@
     }
 
     /* this macro is much, much faster than the VTABLE STRING comparisons */
+    Parrot_gc_write_barrier(interp, call_object);
     SETATTR_CallContext_arg_flags(interp, call_object, raw_sig);
     GETATTR_FixedIntegerArray_size(interp, raw_sig, arg_count);
     GETATTR_FixedIntegerArray_int_array(interp, raw_sig, int_array);
@@ -1539,6 +1540,7 @@
 
         /* Store raw signature */
         GETATTR_CallContext_return_flags(interp, parent, return_flags);
+        Parrot_gc_write_barrier(interp, tailcall);
         SETATTR_CallContext_return_flags(interp, tailcall, return_flags);
 
     }


More information about the parrot-commits mailing list