[svn:parrot] r35789 - in trunk: docs/pdds languages/perl6 src

Author: infinoid
Date: Mon Jan 19 22:51:44 2009
New Revision: 35789

Modified:
   trunk/languages/perl6/Test.pm
   trunk/src/library.c

Changes in other areas also in this revision:
Modified:
   trunk/docs/pdds/pdd17_pmc.pod

Log:
[cage] Fix some codingstd failures.

Modified: trunk/languages/perl6/Test.pm
==============================================================================
--- trunk/languages/perl6/Test.pm	(original)
+++ trunk/languages/perl6/Test.pm	Mon Jan 19 22:51:44 2009
@@ -184,13 +184,13 @@
     my $have = $passed.WHAT eq any(<Match Exception Iterator>)
         ?? $passed
         !! $passed.perl;
-    return $passed 
-        ?? '' 
+    return $passed
+        ?? ''
         !! "# Expected a true value.\n# have: {$have}";
 }
 
 sub diag_bool_false($passed) {
-    return $passed 
+    return $passed
         ?? "# Expected a false value.\n# have: {$passed.perl}"
         !! '';
 }

Modified: trunk/src/library.c
==============================================================================
--- trunk/src/library.c	(original)
+++ trunk/src/library.c	Mon Jan 19 22:51:44 2009
@@ -170,7 +170,7 @@
     VTABLE_set_integer_native(interp, lib_paths, PARROT_LIB_PATH_SIZE);
     VTABLE_set_pmc_keyed_int(interp, iglobals,
             IGLOBALS_LIB_PATHS, lib_paths);
-    
+
     /* each is an array of strings */
     /* define include paths */
     paths = pmc_new(interp, enum_class_ResizableStringArray);