Re: [perl #31197] literal.t

[mAsterdam]

Hm.... I should have run the test before I replied.
I removed the negatives.
Unfortunately the uppercased literals yield 0 instead of 42.

use Parrot::Test tests => 1;

output_is(<<'CODE', <<'OUTPUT', "integer literals");
        print 0x2A
        print "\n"
        print 0X2A
        print "\n"
        print 0b101010
        print "\n"
        print 0B101010
        print "\n"
        end
CODE
42
42
42
42
OUTPUT