Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Tree: b7c968f958
Fetching contributors…

Cannot retrieve contributors at this time

16 lines (11 sloc) 0.368 kB
use strict;
use warnings;
use Test::More tests => 22;
use Math::BigRat;
my $x = Math::BigRat->new('3/7');
for my $op (qw(& | ^ << >> &= |= ^= <<= >>=)) {
ok !eval "my \$y = \$x $op 42; 1";
like $@, qr/^bitwise operation \Q$op\E not supported in Math::BigRat/;
}
ok !eval "my \$y = ~\$x; 1";
like $@, qr/^bitwise operation ~ not supported in Math::BigRat/;
Jump to Line
Something went wrong with that request. Please try again.