diff options
| author | Karl Williamson <khw@cpan.org> | 2016-02-23 14:04:19 -0700 |
|---|---|---|
| committer | Karl Williamson <khw@cpan.org> | 2016-02-23 23:59:31 -0700 |
| commit | accb4364d92e26c20e6a538fc04d1af52a8b94e2 (patch) | |
| tree | edf0a599fab750094017b7dd39a7a6aa8f35f020 /embed.h | |
| parent | f0c0c5adc5daeb0fbad1b23dca12ba5c46560a16 (diff) | |
| download | perl-accb4364d92e26c20e6a538fc04d1af52a8b94e2.tar.gz | |
Use less memory in compiling regexes
This is at least a partial patch for [perl #127392], cutting the maximum
memory used on my box from around 8600kB to 7800kB. For [perl #127568],
which has been merged into #127392, the savings are even larger, about
37%
Previously a large number of large mortal SVs could be created while
compiling a single regex pattern, and their accumulated memory quickly
added up. This changes things to not use so many mortals.
Diffstat (limited to 'embed.h')
| -rw-r--r-- | embed.h | 1 |
1 files changed, 1 insertions, 0 deletions
@@ -949,6 +949,7 @@ # if defined(PERL_IN_REGCOMP_C) #define get_invlist_previous_index_addr S_get_invlist_previous_index_addr #define invlist_previous_index S_invlist_previous_index +#define invlist_replace_list(a,b) S_invlist_replace_list(aTHX_ a,b) #define invlist_set_previous_index S_invlist_set_previous_index #define invlist_trim S_invlist_trim # endif |