From f26f1b9ce33a811c1a4ea00612a18101543a46fd Mon Sep 17 00:00:00 2001 From: Karl Williamson Date: Tue, 8 Nov 2011 22:20:37 -0700 Subject: [PATCH] regcomp.c: Change char used to force reading in fold swashes Future commits will change things so that a latin1 character no longer will go out to disk to load a swash. --- regcomp.c | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/regcomp.c b/regcomp.c index f9bf717..1d1bf27 100644 --- a/regcomp.c +++ b/regcomp.c @@ -10454,7 +10454,10 @@ parseit: if (! PL_utf8_tofold) { U8 dummy[UTF8_MAXBYTES+1]; STRLEN dummy_len; - to_utf8_fold((U8*) "A", dummy, &dummy_len); + + /* This particular string is above \xff in both UTF-8 and + * UTFEBCDIC */ + to_utf8_fold((U8*) "\xC8\x80", dummy, &dummy_len); assert(PL_utf8_tofold); /* Verify that worked */ } PL_utf8_foldclosures = _swash_inversion_hash(PL_utf8_tofold); -- 1.8.3.1