diff options
author | Gisle Aas <gisle@aas.no> | 1998-10-16 18:33:12 +0200 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-10-25 05:07:42 +0000 |
commit | e3fdf9887934783dd5692982e11c048eb7c97265 (patch) | |
tree | 55fe2157c576fa4f940673716fe3667a84b80b3c /perlvars.h | |
parent | b03b9beb4aad24925326d26b7ad4ddf7ed2dbfea (diff) | |
download | perl-e3fdf9887934783dd5692982e11c048eb7c97265.tar.gz |
disallow 'x' in hex numbers (except leading '0x')
Message-ID: <m3n26wtw47.fsf@furu.g.aas.no>
Subject: Re: [PATCH 5.005_52] 'x' is not a legal hex digit
p4raw-id: //depot/perl@2054
Diffstat (limited to 'perlvars.h')
-rw-r--r-- | perlvars.h | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perlvars.h b/perlvars.h index c79c37de3e..d42353df51 100644 --- a/perlvars.h +++ b/perlvars.h @@ -194,7 +194,7 @@ PERLVAR(Glast_swash_slen, STRLEN) /* constants (these are not literals to facilitate pointer comparisons) */ PERLVARIC(GYes, char *, "1") PERLVARIC(GNo, char *, "") -PERLVARIC(Ghexdigit, char *, "0123456789abcdef0123456789ABCDEFx") +PERLVARIC(Ghexdigit, char *, "0123456789abcdef0123456789ABCDEF") PERLVARIC(Gpatleave, char *, "\\.^$@dDwWsSbB+*?|()-nrtfeaxc0123456789[{]}") PERLVAR(Gspecialsv_list[4],SV *) /* from byterun.h */ |