This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
regexec.c: Allow for returning shared swash
authorKarl Williamson <public@khwilliamson.com>
Fri, 6 Jan 2012 04:10:28 +0000 (21:10 -0700)
committerKarl Williamson <public@khwilliamson.com>
Fri, 13 Jan 2012 16:58:39 +0000 (09:58 -0700)
commit6c6525b86477e0001fa63ee65eb355329aeef26a
treed97b303d08ea8da4572ab0f647d1ee60c95ee3de
parent0bd1039c7cc74c239c7d4974b36c261d7fe40bb3
regexec.c: Allow for returning shared swash

This changes the function that returns the swash associated with a
bracketed character class so that it returns the original swash and not
a copy.  The function is renamed and made accessible only from within
regexec.c, and a new wrapper function with the original name is created
that just calls the other one and returns a copy of the swash.

Thus, all access from outside regexec.c will use a copy which if
overwritten will not harm others; while the option exists from within
regexec.c to use a shared version.
embed.fnc
embed.h
proto.h
regexec.c