[svn:parrot] r42065 - trunk/compilers/pirc/src

mikehh at svn.parrot.org mikehh at svn.parrot.org
Sat Oct 24 03:24:23 UTC 2009


Author: mikehh
Date: Sat Oct 24 03:24:22 2009
New Revision: 42065
URL: https://trac.parrot.org/parrot/changeset/42065

Log:
fix codetest failures - trailing spaces and linelength

Modified:
   trunk/compilers/pirc/src/bcgen.c
   trunk/compilers/pirc/src/pirop.c

Modified: trunk/compilers/pirc/src/bcgen.c
==============================================================================
--- trunk/compilers/pirc/src/bcgen.c	Sat Oct 24 02:46:52 2009	(r42064)
+++ trunk/compilers/pirc/src/bcgen.c	Sat Oct 24 03:24:22 2009	(r42065)
@@ -481,7 +481,8 @@
 
     /* create segments */
     PARROT_ASSERT(filename != NULL);
-    interp->code = PF_create_default_segs(interp, Parrot_str_new(interp, filename, strlen(filename)), 1);
+    interp->code = PF_create_default_segs(interp, Parrot_str_new(interp, filename,
+                                                                 strlen(filename)), 1);
 
     /* add interpreter globals to bytecode. XXX Why is this? */
     self         = VTABLE_get_pmc_keyed_int(interp, interp->iglobals, IGLOBALS_INTERPRETER);
@@ -578,9 +579,9 @@
     bc->interp->code->annotations = (PackFile_Annotations*)
                                     PackFile_Segment_new_seg(bc->interp,
                                         bc->interp->code->base.dir,
-                                        PF_ANNOTATIONS_SEG, 
-                                        Parrot_str_new(bc->interp, segment_name, 
-                                            strlen(segment_name)), 
+                                        PF_ANNOTATIONS_SEG,
+                                        Parrot_str_new(bc->interp, segment_name,
+                                            strlen(segment_name)),
                                         1);
 
     bc->interp->code->annotations->code = bc->interp->code;

Modified: trunk/compilers/pirc/src/pirop.c
==============================================================================
--- trunk/compilers/pirc/src/pirop.c	Sat Oct 24 02:46:52 2009	(r42064)
+++ trunk/compilers/pirc/src/pirop.c	Sat Oct 24 03:24:22 2009	(r42065)
@@ -175,18 +175,17 @@
             *instr_writer++ = 'c';
             break;
         case EXPR_KEY:
-            
-                *instr_writer++ = 'p';
-                *instr_writer++ = 'c';   
-                
-                /* XXX figure out what signature is needed. I think 'pc' */ 
+            *instr_writer++ = 'p';
+            *instr_writer++ = 'c';
+
+            /* XXX figure out what signature is needed. I think 'pc' */
             /*
             else {
                 *instr_writer++ = 'k';
             }
             */
             /*instr_writer    = write_signature(iter->expr.k->head->expr, instr_writer);*/
-            
+
             /*
 
             switch (iter->expr.k->expr->type) {


More information about the parrot-commits mailing list