[svn:parrot] r37798 - in trunk: runtime/parrot/library src/call src/pmc
Infinoid at svn.parrot.org
Infinoid at svn.parrot.org
Sat Mar 28 13:53:53 UTC 2009
Author: Infinoid
Date: Sat Mar 28 13:53:52 2009
New Revision: 37798
URL: https://trac.parrot.org/parrot/changeset/37798
Log:
[cage] Fix some codetest failures, mikehh++ for reporting.
Modified:
trunk/runtime/parrot/library/dumper.pir
trunk/src/call/pcc.c
trunk/src/pmc/class.pmc
Modified: trunk/runtime/parrot/library/dumper.pir
==============================================================================
--- trunk/runtime/parrot/library/dumper.pir Sat Mar 28 11:33:07 2009 (r37797)
+++ trunk/runtime/parrot/library/dumper.pir Sat Mar 28 13:53:52 2009 (r37798)
@@ -3,7 +3,7 @@
=head1 TITLE
-dumper.pir - PIR version of Perl 5's Data::Dumper module
+dumper.pir - PIR version of Perl 5's Data::Dumper module
=head1 VERSION
Modified: trunk/src/call/pcc.c
==============================================================================
--- trunk/src/call/pcc.c Sat Mar 28 11:33:07 2009 (r37797)
+++ trunk/src/call/pcc.c Sat Mar 28 13:53:52 2009 (r37798)
@@ -2972,7 +2972,7 @@
sigs, indexes, ctx, sig_obj);
/* Set up the context object for the function invokation */
- if(strncmp(signature, "Pi", 2) == 0) {
+ if (strncmp(signature, "Pi", 2) == 0) {
interp->current_object = VTABLE_get_pmc_keyed_int(interp, sig_obj, 0);
}
else {
Modified: trunk/src/pmc/class.pmc
==============================================================================
--- trunk/src/pmc/class.pmc Sat Mar 28 11:33:07 2009 (r37797)
+++ trunk/src/pmc/class.pmc Sat Mar 28 13:53:52 2009 (r37798)
@@ -335,8 +335,8 @@
meth = Parrot_oo_find_vtable_override_for_class(interp, parent, name);
if (!PMC_IS_NULL(meth)) {
- PMC *sig_obj = Parrot_pcc_build_sig_object_from_varargs(interp, object, "->", NULL);
- Parrot_pcc_invoke_from_sig_object(interp, meth, sig_obj);
+ PMC *sig_obj = Parrot_pcc_build_sig_object_from_varargs(interp, object, "->", NULL);
+ Parrot_pcc_invoke_from_sig_object(interp, meth, sig_obj);
gc_unregister_pmc(interp, sig_obj);
}
}
More information about the parrot-commits
mailing list