diff options
author | Karl Williamson <public@khwilliamson.com> | 2012-02-03 22:01:03 -0700 |
---|---|---|
committer | Karl Williamson <public@khwilliamson.com> | 2012-02-09 10:13:57 -0700 |
commit | a3e1f3a6180fe54649735a678cb15de8aaacf5e9 (patch) | |
tree | 84ac04a68e651e7c81e3ead7ea1e9fc7cca31fa2 /sv.c | |
parent | 9d9177bec752277fb0bb090203f47d85c3aba878 (diff) | |
download | perl-a3e1f3a6180fe54649735a678cb15de8aaacf5e9.tar.gz |
regcomp.c: Use compile-time invlists
This creates three simple compile-time inversion lists from the data
that has been generated in a previous commit, and uses two of them.
Three PL_ variables are used to store them.
Diffstat (limited to 'sv.c')
-rw-r--r-- | sv.c | 3 |
1 files changed, 3 insertions, 0 deletions
@@ -13414,6 +13414,9 @@ perl_clone_using(PerlInterpreter *proto_perl, UV flags, PL_utf8_idcont = sv_dup_inc(proto_perl->Iutf8_idcont, param); PL_utf8_xidcont = sv_dup_inc(proto_perl->Iutf8_xidcont, param); PL_utf8_foldable = sv_dup_inc(proto_perl->Iutf8_foldable, param); + PL_ASCII = sv_dup_inc(proto_perl->IASCII, param); + PL_AboveLatin1 = sv_dup_inc(proto_perl->IAboveLatin1, param); + PL_Latin1 = sv_dup_inc(proto_perl->ILatin1, param); if (proto_perl->Ipsig_pend) { |