diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 1999-09-06 20:33:43 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 1999-09-06 20:33:43 +0000 |
commit | 15041a678a73e91c0e4cece2b3fd5f83d5128900 (patch) | |
tree | cd9546462d8091d12ae56cc28e5157e3b7afb234 /t/pragma/warn/util | |
parent | 1291a1920c36dc45039a0acbf53957ff30304657 (diff) | |
download | perl-15041a678a73e91c0e4cece2b3fd5f83d5128900.tar.gz |
Fix UV_SIZEOF to UVSIZE; change the overflow tests
so that they overflow also on 64-bit platforms.
p4raw-id: //depot/cfgperl@4093
Diffstat (limited to 't/pragma/warn/util')
-rw-r--r-- | t/pragma/warn/util | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/t/pragma/warn/util b/t/pragma/warn/util index 6d82d133b8..6c9bc8c696 100644 --- a/t/pragma/warn/util +++ b/t/pragma/warn/util @@ -49,9 +49,9 @@ Illegal binary digit '9' ignored at - line 3. ######## # util.c use warnings 'overflow' ; -my $a = oct "0b111111111111111111111111111111111111111111" ; +my $a = oct "0b11111111111111111111111111111111111111111111111111111111111111111"; no warnings 'overflow' ; -$a = oct "0b111111111111111111111111111111111111111111" ; +$a = oct "0b11111111111111111111111111111111111111111111111111111111111111111"; EXPECT Integer overflow in binary number at - line 3. ######## |