need to decont the Int value before isbig_I will work.

rakudo · Apr 14, 2013 · ee68af8 · ee68af8
1 parent 6e39296
commit ee68af8
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/Perl6/Optimizer.pm b/src/Perl6/Optimizer.pm
@@ -398,7 +398,7 @@ class Perl6::Optimizer {
                             }
                             # if it's an Int, we can create a Want from it witth an int value.
                             try {
-                                if nqp::istype($ret_value, self.find_in_setting("Int")) && !nqp::isbig_I($ret_value) {
+                                if nqp::istype($ret_value, self.find_in_setting("Int")) && !nqp::isbig_I(nqp::decont($ret_value)) {
                                     return QAST::Want.new($wval,
                                         "Ii", QAST::IVal.new(:value(nqp::unbox_i($ret_value))));
                                 }