[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