[Bps-public-commit] r12690 - pie/branches/named-params/lib/PIE

[clkao at bestpractical.com]

Author: clkao
Date: Mon May 26 09:02:27 2008
New Revision: 12690

Modified:
   pie/branches/named-params/lib/PIE/Expression.pm

Log:
quiet.

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	Mon May 26 09:02:27 2008
@@ -187,14 +187,12 @@
 
 sub evaluate {
     my ($self, $evaluator) = @_;
-    warn Dumper($self->args);use Data::Dumper;
     my $lambda = $self->args->{do}->evaluate($evaluator);
     die unless $lambda->isa("PIE::Lambda");
 
     my $binding = $self->args->{binding}->evaluate($evaluator);
     my $list = $self->args->{list}->evaluate($evaluator);
 
-    warn Dumper($list);
     die unless ref($list) eq 'PIE::EvaluatorResult::RunTime';
     my $nodes = $$list;