[svn:parrot] r37310 - in trunk: examples/languages/abc src/packfile

coke at svn.parrot.org coke at svn.parrot.org
Wed Mar 11 12:43:55 UTC 2009


Author: coke
Date: Wed Mar 11 12:43:54 2009
New Revision: 37310
URL: https://trac.parrot.org/parrot/changeset/37310

Log:
Fix 'make codetest'.
doughera++ for whitespace patch that I did by hand, sorry.

Modified:
   trunk/examples/languages/abc/Configure.pl   (contents, props changed)
   trunk/src/packfile/pf_items.c

Modified: trunk/examples/languages/abc/Configure.pl
==============================================================================
--- trunk/examples/languages/abc/Configure.pl	Wed Mar 11 12:22:58 2009	(r37309)
+++ trunk/examples/languages/abc/Configure.pl	Wed Mar 11 12:43:54 2009	(r37310)
@@ -1,4 +1,6 @@
 #! perl
+# Copyright (C) 2009, Parrot Foundation.
+# $Id$
 
 use strict;
 use warnings;

Modified: trunk/src/packfile/pf_items.c
==============================================================================
--- trunk/src/packfile/pf_items.c	Wed Mar 11 12:22:58 2009	(r37309)
+++ trunk/src/packfile/pf_items.c	Wed Mar 11 12:43:54 2009	(r37310)
@@ -1370,13 +1370,13 @@
         size_t i;
         mem_sys_memcopy(charcursor, s->strstart, s->bufused);
         charcursor += s->bufused;
-        /* Pad up to sizeof(opcode_t) boundary. */
-        while ( (unsigned long) (charcursor - (char *) cursor) % sizeof(opcode_t)) {
+        /* Pad up to sizeof (opcode_t) boundary. */
+        while ((unsigned long) (charcursor - (char *) cursor) % sizeof (opcode_t)) {
             *charcursor++ = 0;
         }
     }
-    PARROT_ASSERT(((unsigned long) (charcursor - (char *) cursor) % sizeof(opcode_t)) == 0);
-    cursor += (charcursor - (char *) cursor) / sizeof(opcode_t);
+    PARROT_ASSERT(((unsigned long) (charcursor - (char *) cursor) % sizeof (opcode_t)) == 0);
+    cursor += (charcursor - (char *) cursor) / sizeof (opcode_t);
 
     return cursor;
 }


More information about the parrot-commits mailing list