develooper Front page | perl.cvs.parrot | Postings from December 2008

[svn:parrot] r33935 - trunk/t/compilers/pct

From:
particle
Date:
December 15, 2008 12:31
Subject:
[svn:parrot] r33935 - trunk/t/compilers/pct
Message ID:
20081215203024.3F4AFCBADF@x12.develooper.com
Author: particle
Date: Mon Dec 15 12:30:23 2008
New Revision: 33935

Modified:
   trunk/t/compilers/pct/complete_workflow.t

Log:
[t] whitespace cleanup

Modified: trunk/t/compilers/pct/complete_workflow.t
==============================================================================
--- trunk/t/compilers/pct/complete_workflow.t	(original)
+++ trunk/t/compilers/pct/complete_workflow.t	Mon Dec 15 12:30:23 2008
@@ -60,7 +60,7 @@
 thingy
 IN
 token TOP   { 'thingy' {*}  #= key_for_thingy
-            | 'stuff'  {*}  #= key_for_stuff  
+            | 'stuff'  {*}  #= key_for_stuff
             }
 GRAMMAR
 
@@ -158,15 +158,15 @@
 }
 token scope_a {
     <.INIT_SCOPE_A>
-    '<a>' 
+    '<a>'
     <thingy>
-    '</a>'  {*} 
+    '</a>'  {*}
 }
 token scope_b {
     <.INIT_SCOPE_B>
-    '<b>' 
+    '<b>'
     <thingy>
-    '</b>'  {*} 
+    '</b>'  {*}
 }
 token INIT_SCOPE_A {
   {*}
@@ -196,11 +196,11 @@
 }
 
 method INIT_SCOPE_A($/) {
-   our $?MY_OUR_VAR := 'scope a'; 
+   our $?MY_OUR_VAR := 'scope a';
 }
 
 method INIT_SCOPE_B($/) {
-   our $?MY_OUR_VAR := 'scope b'; 
+   our $?MY_OUR_VAR := 'scope b';
 }
 
 method thingy($/) {
@@ -229,23 +229,23 @@
 }
 token thingy_or_stuff {
       <THINGY> {*}  #= THINGY
-    | <STUFF>  {*}  #= STUFF  
+    | <STUFF>  {*}  #= STUFF
 }
 token THINGY {
     'thingy'
     {*}
-} 
+}
 token STUFF {
     'stuff'
     {*}
-} 
+}
 GRAMMAR
 
 method TOP($/) {
     my $past := PAST::Stmts.new();
     for $<thingy_or_stuff> {
         $past.push( $( $_ ) );
-    } 
+    }
 
     our $?MY_OUR_VAR;
     $past.unshift( $?MY_OUR_VAR );



nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About