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

[NotFound at svn.parrot.org]

Author: NotFound
Date: Fri Nov 13 16:51:54 2009
New Revision: 42485
URL: https://trac.parrot.org/parrot/changeset/42485

Log:
[pmc] call to overrided object.invoke lacked a check for 0 positional arguments

Modified:
   trunk/src/pmc/object.pmc

Modified: trunk/src/pmc/object.pmc
==============================================================================
--- trunk/src/pmc/object.pmc	Fri Nov 13 16:29:38 2009	(r42484)
+++ trunk/src/pmc/object.pmc	Fri Nov 13 16:51:54 2009	(r42485)
@@ -620,7 +620,8 @@
                 /* Experimental code. See DEPRECATED.pod */
                 PMC *call_sig = Parrot_pcc_get_signature(interp, CURRENT_CONTEXT(interp));
                 if (PMC_IS_NULL(interp->current_object) &&
-                        VTABLE_get_pmc_keyed_int(interp, call_sig, 0) != SELF)
+                        (VTABLE_elements(interp, call_sig) == 0 ||
+                        VTABLE_get_pmc_keyed_int(interp, call_sig, 0) != SELF))
                     VTABLE_unshift_pmc(interp, call_sig, SELF);
 
                 return VTABLE_invoke(interp, meth, next);