diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 1999-08-09 20:35:13 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 1999-08-09 20:35:13 +0000 |
| commit | 627300f0f7d7170cc4e8db033fb6e61547324f64 (patch) | |
| tree | b6c2f014e433f15d8cd83fd36b49a80b48a79890 /t/pragma | |
| parent | 99c8744d9e2348bac7621dbb0b21a8b6eaddb7f4 (diff) | |
| download | perl-627300f0f7d7170cc4e8db033fb6e61547324f64.tar.gz | |
lexwarn maintenance: new warning class unsafe
subclasses 'overflow' and 'portable' created,
used by the recent integer overflow warnings.
Class syntax subclass 'octal' renamed to 'digit',
binary and hexadecimal parsing errors also 'digit' warnings.
p4raw-id: //depot/cfgperl@3942
Diffstat (limited to 't/pragma')
| -rw-r--r-- | t/pragma/warn/util | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/t/pragma/warn/util b/t/pragma/warn/util index 605b42a771..eebd9207e4 100644 --- a/t/pragma/warn/util +++ b/t/pragma/warn/util @@ -11,25 +11,25 @@ __END__ # util.c -use warning 'octal' ; +use warning 'digit' ; my $a = oct "029" ; -no warning 'octal' ; +no warning 'digit' ; my $a = oct "029" ; EXPECT Illegal octal digit '9' ignored at - line 3. ######## # util.c -use warning 'unsafe' ; +use warning 'digit' ; *a = hex "0xv9" ; -no warning 'unsafe' ; +no warning 'digit' ; *a = hex "0xv9" ; EXPECT Illegal hexadecimal digit 'v' ignored at - line 3. ######## # util.c -use warning 'unsafe' ; +use warning 'digit' ; *a = oct "0b9" ; -no warning 'unsafe' ; +no warning 'digit' ; *a = oct "0b9" ; EXPECT Illegal binary digit '9' ignored at - line 3. |