diff options
Diffstat (limited to 'universal.c')
-rw-r--r-- | universal.c | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/universal.c b/universal.c index 7e3e93b4f9..2b334ea116 100644 --- a/universal.c +++ b/universal.c @@ -903,6 +903,7 @@ XS(XS_re_regexp_pattern) { dXSARGS; REGEXP *re; + U8 const gimme = GIMME_V; EXTEND(SP, 2); SP -= items; @@ -925,7 +926,7 @@ XS(XS_re_regexp_pattern) /* Houston, we have a regex! */ SV *pattern; - if ( GIMME_V == G_ARRAY ) { + if ( gimme == G_ARRAY ) { STRLEN left = 0; char reflags[sizeof(INT_PAT_MODS) + MAX_CHARSET_NAME_LENGTH]; const char *fptr; @@ -977,7 +978,7 @@ XS(XS_re_regexp_pattern) } } else { /* It ain't a regexp folks */ - if ( GIMME_V == G_ARRAY ) { + if ( gimme == G_ARRAY ) { /* return the empty list */ XSRETURN_UNDEF; } else { |