Permalink
Browse files

RT #73238: 0xFFFFFFFFFFFFFFFF overflowed to -1

  • Loading branch information...
1 parent aa81a8b commit 0954436f1824d3e3bf18ea82f4ef27b01fd92e3b @moritz moritz committed Mar 30, 2012
Showing with 4 additions and 1 deletion.
  1. +4 −1 S02-types/num.t
View
@@ -4,7 +4,7 @@ use Test;
#L<S02/The C<Num> and C<Rat> Types/Perl 6 intrinsically supports big integers>
-plan 64;
+plan 65;
isa_ok( eval(1.Num.perl), Num, 'eval 1.Num.perl is Num' );
is_approx( eval(1.Num.perl), 1, 'eval 1.Num.perl is 1' );
@@ -174,4 +174,7 @@ is(4_2.0_1, 42.01, 'single underscores are ok');
is 0_1, 1, "0_1 is parsed as 0d1";
is +^1, -2, '+^1 == -2 as promised';
+# RT #73238
+ok 0xFFFFFFFFFFFFFFFF > 1, '0xFFFFFFFFFFFFFFFF is not -1';
+
# vim: ft=perl6

0 comments on commit 0954436

Please sign in to comment.