[svn:parrot] r38156 - trunk/tools/dev

fperrad at svn.parrot.org fperrad at svn.parrot.org
Thu Apr 16 12:14:04 UTC 2009


Author: fperrad
Date: Thu Apr 16 12:14:03 2009
New Revision: 38156
URL: https://trac.parrot.org/parrot/changeset/38156

Log:
[codingstd] remove cuddled else

Modified:
   trunk/tools/dev/create_language.pl

Modified: trunk/tools/dev/create_language.pl
==============================================================================
--- trunk/tools/dev/create_language.pl	Thu Apr 16 12:12:39 2009	(r38155)
+++ trunk/tools/dev/create_language.pl	Thu Apr 16 12:14:03 2009	(r38156)
@@ -553,7 +553,7 @@
     }
     %config;
 }
-    
+
 __ at lclang@.pir__
 =head1 TITLE
 
@@ -862,7 +862,8 @@
         $fn =~ s{/}{$slash}g;
         if ( -r $fn ) {
             push @files, $fn;
-        } else {
+        }
+        else {
             warn "Missing test file: $fn\n";
         }
     }
@@ -903,11 +904,13 @@
             my $currfile = File::Spec->catfile( $start, $file );
             if ( -d $currfile ) {
                 push( @hits, all_in( $currfile ) );
-            } else {
+            }
+            else {
                 push( @hits, $currfile ) if $currfile =~ /\.t$/;
             }
         }
-    } else {
+    }
+    else {
         warn "$start: $!\n";
     }
 


More information about the parrot-commits mailing list