summaryrefslogtreecommitdiff
path: root/proto.h
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2001-04-29 02:04:46 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2001-04-29 02:04:46 +0000
commit3568d8383f3d0b22eb07927391114af2a91b06ed (patch)
tree66b4d1c9c931970f3de59a7b7191ce5347fa2105 /proto.h
parentf178ed66457a9ad627c33e14936605600f4c5690 (diff)
downloadperl-3568d8383f3d0b22eb07927391114af2a91b06ed.tar.gz
In character classes one couldn't have 0x80..0xff characters
at the left hand side if there were 0x100.. characters in the character class. p4raw-id: //depot/perl@9901
Diffstat (limited to 'proto.h')
-rw-r--r--proto.h2
1 files changed, 1 insertions, 1 deletions
diff --git a/proto.h b/proto.h
index 63fc5187f2..cc4050d86e 100644
--- a/proto.h
+++ b/proto.h
@@ -808,7 +808,7 @@ PERL_CALLCONV void Perl_sv_vcatpvfn(pTHX_ SV* sv, const char* pat, STRLEN patlen
PERL_CALLCONV void Perl_sv_vsetpvfn(pTHX_ SV* sv, const char* pat, STRLEN patlen, va_list* args, SV** svargs, I32 svmax, bool *maybe_tainted);
PERL_CALLCONV NV Perl_str_to_version(pTHX_ SV *sv);
PERL_CALLCONV SV* Perl_swash_init(pTHX_ char* pkg, char* name, SV* listsv, I32 minbits, I32 none);
-PERL_CALLCONV UV Perl_swash_fetch(pTHX_ SV *sv, U8 *ptr);
+PERL_CALLCONV UV Perl_swash_fetch(pTHX_ SV *sv, U8 *ptr, bool do_utf8);
PERL_CALLCONV void Perl_taint_env(pTHX);
PERL_CALLCONV void Perl_taint_proper(pTHX_ const char* f, const char* s);
PERL_CALLCONV UV Perl_to_utf8_lower(pTHX_ U8 *p);