summaryrefslogtreecommitdiff
path: root/perlvars.h
diff options
context:
space:
mode:
authorGisle Aas <gisle@aas.no>1998-10-16 18:33:12 +0200
committerGurusamy Sarathy <gsar@cpan.org>1998-10-25 05:07:42 +0000
commite3fdf9887934783dd5692982e11c048eb7c97265 (patch)
tree55fe2157c576fa4f940673716fe3667a84b80b3c /perlvars.h
parentb03b9beb4aad24925326d26b7ad4ddf7ed2dbfea (diff)
downloadperl-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.h2
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 */