diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 1999-07-29 14:02:50 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 1999-07-29 14:02:50 +0000 |
commit | 9e24b6e2f422a9f67d0605cdea60de0c597868f3 (patch) | |
tree | a1d7aa4afcc1f20f6f872172f9f2673776d0e2f6 /proto.h | |
parent | 9429f27a525401f243c383770a5f171eef0929c3 (diff) | |
download | perl-9e24b6e2f422a9f67d0605cdea60de0c597868f3.tar.gz |
Repent and make overly large integerish
constants non-fatal. They are now promoted
to NVs, accompanied by an overflow warning that
is by default on.
p4raw-id: //depot/cfgperl@3832
Diffstat (limited to 'proto.h')
-rw-r--r-- | proto.h | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -536,10 +536,10 @@ VIRTUAL OP* Perl_scalar(pTHX_ OP* o); VIRTUAL OP* Perl_scalarkids(pTHX_ OP* o); VIRTUAL OP* Perl_scalarseq(pTHX_ OP* o); VIRTUAL OP* Perl_scalarvoid(pTHX_ OP* o); -VIRTUAL UV Perl_scan_bin(pTHX_ char* start, I32 len, I32* retlen); -VIRTUAL UV Perl_scan_hex(pTHX_ char* start, I32 len, I32* retlen); +VIRTUAL NV Perl_scan_bin(pTHX_ char* start, I32 len, I32* retlen); +VIRTUAL NV Perl_scan_hex(pTHX_ char* start, I32 len, I32* retlen); VIRTUAL char* Perl_scan_num(pTHX_ char* s); -VIRTUAL UV Perl_scan_oct(pTHX_ char* start, I32 len, I32* retlen); +VIRTUAL NV Perl_scan_oct(pTHX_ char* start, I32 len, I32* retlen); VIRTUAL OP* Perl_scope(pTHX_ OP* o); VIRTUAL char* Perl_screaminstr(pTHX_ SV* bigsv, SV* littlesv, I32 start_shift, I32 end_shift, I32 *state, I32 last); #if !defined(VMS) |