summaryrefslogtreecommitdiff
path: root/regcomp.c
diff options
context:
space:
mode:
authorKarl Williamson <public@khwilliamson.com>2011-12-23 08:42:17 -0700
committerKarl Williamson <public@khwilliamson.com>2012-01-19 11:58:17 -0700
commitd82f99444a5b81603cb066efa358862a46ce3275 (patch)
treef2b5b6d5d345245dfbfa4e8bee09b7991538909f /regcomp.c
parentc46d03cf70a58e85dfbfd7f78d6fdbb5244808c5 (diff)
downloadperl-d82f99444a5b81603cb066efa358862a46ce3275.tar.gz
regcomp.c: Save computed value in variable for later use
This will be used in future commits. Retrieving it via OP() doesn't work in pass1 of the regex compiler.
Diffstat (limited to 'regcomp.c')
-rw-r--r--regcomp.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/regcomp.c b/regcomp.c
index d3a150ed38..88d92186b7 100644
--- a/regcomp.c
+++ b/regcomp.c
@@ -9019,21 +9019,21 @@ tryagain:
STRLEN foldlen;
U8 tmpbuf[UTF8_MAXBYTES_CASE+1], *foldbuf;
regnode * orig_emit;
+ U8 node_type;
ender = 0;
orig_emit = RExC_emit; /* Save the original output node position in
case we need to output a different node
type */
- ret = reg_node(pRExC_state,
- (U8) ((! FOLD) ? EXACT
+ node_type = (U8) ((! FOLD) ? EXACT
: (LOC)
? EXACTFL
: (MORE_ASCII_RESTRICTED)
? EXACTFA
: (AT_LEAST_UNI_SEMANTICS)
? EXACTFU
- : EXACTF)
- );
+ : EXACTF);
+ ret = reg_node(pRExC_state, node_type);
s = STRING(ret);
for (len = 0, p = RExC_parse - 1;
len < 127 && p < RExC_end;