[Bps-public-commit] r13302 - in pie/branches/named-params: lib/PIE

[sartak at bestpractical.com]

Author: sartak
Date: Fri Jun 13 17:46:20 2008
New Revision: 13302

Modified:
   pie/branches/named-params/   (props changed)
   pie/branches/named-params/lib/PIE/Block.pm
   pie/branches/named-params/lib/PIE/Evaluator.pm
   pie/branches/named-params/lib/PIE/Expression.pm

Log:
 r62431 at onn:  sartak | 2008-06-13 17:45:22 -0400
 "outter" is spelled "outer


Modified: pie/branches/named-params/lib/PIE/Block.pm
==============================================================================
--- pie/branches/named-params/lib/PIE/Block.pm	(original)
+++ pie/branches/named-params/lib/PIE/Block.pm	Fri Jun 13 17:46:20 2008
@@ -9,7 +9,7 @@
                  default => sub { ++$BLOCK_IDS },
 );
 
-has outter_block => (
+has outer_block => (
                      is => 'rw',
                      weak_ref => 1,
                      default => sub { undef },
@@ -23,7 +23,7 @@
     $self->_walk( $self,
                   sub { my $block = shift;
                         return unless $block->does('PIE::Block');
-                        $block->outter_block($self);
+                        $block->outer_block($self);
                         return 1;
                     } );
 

Modified: pie/branches/named-params/lib/PIE/Evaluator.pm
==============================================================================
--- pie/branches/named-params/lib/PIE/Evaluator.pm	(original)
+++ pie/branches/named-params/lib/PIE/Evaluator.pm	Fri Jun 13 17:46:20 2008
@@ -101,7 +101,7 @@
         # if we find the variable, we can return it
 
         return $stack->{$name} if exists $stack->{$name};
-    } while ($block = $block->outter_block);
+    } while ($block = $block->outer_block);
 
     return;
 }

Modified: pie/branches/named-params/lib/PIE/Expression.pm
==============================================================================
--- pie/branches/named-params/lib/PIE/Expression.pm	(original)
+++ pie/branches/named-params/lib/PIE/Expression.pm	Fri Jun 13 17:46:20 2008
@@ -232,7 +232,7 @@
             progn     => PIE::Expression::ProgN->new( nodes => $self->nodes ),
             signature => $self->mk_signature,
             block_id => $self->block_id,
-            outter_block => $self->outter_block,
+            outer_block => $self->outer_block,
         );
     },
 );