ans these do not get overloaded for older Perls:
use bigint;
isnt (ref(1), '', 'is in effect');
isnt (ref(2.0), '', 'is in effect');
isnt (ref(0x20), '', 'is in effect');
SKIP: {
skip ('Need at le
'', 'is not in effect');
is (ref(0x20), '', 'is not in effect');
isnt (ref(hex(9)), 'Math::BigInt', 'hex is not overloaded');
isnt (ref(oct(07)), 'Math::BigInt', 'oct is not overloaded');
}
ans these do not get overloaded for older Perls:
use bignum;
isnt (ref(1), '', 'is in effect');
isnt (ref(2.0), '', 'is in effect');
isnt (ref(0x20), '', 'is in effect');
SKIP: {
skip ('Need at le
, '', 'is not in effect');
is (ref(0x20), '', 'is not in effect');
isnt (ref(hex(9)), 'Math::BigInt', 'hex is not overloaded');
isnt (ref(oct(07)), 'Math::BigInt', 'oct is not overloaded');
}
ans these do not get overloaded for older Perls:
use bigrat;
isnt (ref(1), '', 'is in effect');
isnt (ref(2.0), '', 'is in effect');
isnt (ref(0x20), '', 'is in effect');
SKIP: {
skip ('Need at le
, '', 'is not in effect');
is (ref(0x20), '', 'is not in effect');
isnt (ref(hex(9)), 'Math::BigInt', 'hex is not overloaded');
isnt (ref(oct(07)), 'Math::BigInt', 'oct is not overloaded');
}
ns these do not get overloaded for older Perls:
use bigrat;
isnt(ref(1), '', 'is in effect');
isnt(ref(2.0), '', 'is in effect');
isnt(ref(0x20), '', 'is in effect');
SKIP: {
# Quote numbers
ns these do not get overloaded for older Perls:
use bignum;
isnt(ref(1), '', 'is in effect');
isnt(ref(2.0), '', 'is in effect');
isnt(ref(0x20), '', 'is in effect');
SKIP: {
# Quote numbers
these do not get overloaded for older Perls:
use bigfloat;
isnt(ref(1), '', 'is in effect');
isnt(ref(2.0), '', 'is in effect');
isnt(ref(0x20), '', 'is in effect');
SKIP: {
# Quote numbers
ns these do not get overloaded for older Perls:
use bigint;
isnt(ref(1), '', 'is in effect');
isnt(ref(2.0), '', 'is in effect');
isnt(ref(0x20), '', 'is in effect');
SKIP: {
# Quote numbers