[svn:parrot] r47374 - branches/gsoc_past_optimization/runtime/parrot/library/PAST
tcurtis at svn.parrot.org
tcurtis at svn.parrot.org
Sat Jun 5 03:10:19 UTC 2010
Author: tcurtis
Date: Sat Jun 5 03:10:19 2010
New Revision: 47374
URL: https://trac.parrot.org/parrot/changeset/47374
Log:
Remove some debugging output statements I forgot to remove.
Modified:
branches/gsoc_past_optimization/runtime/parrot/library/PAST/Pattern.nqp
Modified: branches/gsoc_past_optimization/runtime/parrot/library/PAST/Pattern.nqp
==============================================================================
--- branches/gsoc_past_optimization/runtime/parrot/library/PAST/Pattern.nqp Sat Jun 5 02:27:21 2010 (r47373)
+++ branches/gsoc_past_optimization/runtime/parrot/library/PAST/Pattern.nqp Sat Jun 5 03:10:19 2010 (r47374)
@@ -66,12 +66,9 @@
}
sub check ($patt, $val) {
- pir::load_bytecode('Data/Dumper.pbc');
- my $dumper := pir::new__PP(Data::Dumper);
my $result := 1;
if (pir::defined__IP($patt)) {
if (!pir::defined__IP($val)) {
- say("bar");
$result := 0;
}
elsif (pir::can__IPs($patt, "ACCEPTS")) {
@@ -86,9 +83,6 @@
}
}
}
- $dumper.dumper($patt);
- $dumper.dumper($val);
- say($result);
$result;
}
More information about the parrot-commits
mailing list