[svn:parrot] r45349 - trunk/src/pmc

mikehh at svn.parrot.org mikehh at svn.parrot.org
Wed Mar 31 10:56:28 UTC 2010


Author: mikehh
Date: Wed Mar 31 10:56:27 2010
New Revision: 45349
URL: https://trac.parrot.org/parrot/changeset/45349

Log:
fix codetest failure - assert args - src/pmc/default.pmc

Modified:
   trunk/src/pmc/default.pmc

Modified: trunk/src/pmc/default.pmc
==============================================================================
--- trunk/src/pmc/default.pmc	Wed Mar 31 10:53:57 2010	(r45348)
+++ trunk/src/pmc/default.pmc	Wed Mar 31 10:56:27 2010	(r45349)
@@ -239,6 +239,8 @@
 static void
 propagate_std_props(PARROT_INTERP, ARGIN(PMC *self), ARGIN(PMC *prop_hash))
 {
+    ASSERT_ARGS(propagate_std_props)
+
     if (self->vtable->flags & (VTABLE_IS_CONST_FLAG | VTABLE_IS_READONLY_FLAG)){
         PMC * const pmc_true  = Parrot_pmc_new(interp, enum_class_Integer);
         VTABLE_set_integer_native(interp, pmc_true, 1);
@@ -284,6 +286,8 @@
 static PMC*
 check_get_std_props(PARROT_INTERP, ARGIN(const PMC *self), ARGIN(const STRING *key))
 {
+    ASSERT_ARGS(check_get_std_props)
+
     if ((self->vtable->flags & (VTABLE_IS_CONST_FLAG | VTABLE_IS_READONLY_FLAG))
        && Parrot_str_equal(interp, key, CONST_STRING(interp, "_ro"))) {
         PMC * const ret_val  = Parrot_pmc_new(interp, enum_class_Integer);


More information about the parrot-commits mailing list