This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Revert "regcomp.c: Use a weird value in a place where ignored"
[perl5.git] / regcomp.c
index 59ef468..9dac06c 100644 (file)
--- a/regcomp.c
+++ b/regcomp.c
@@ -14508,8 +14508,7 @@ S_regatom(pTHX_ RExC_state_t *pRExC_state, I32 *flagp, U32 depth)
 
                 }
 
-                alloc_maybe_populate_EXACT(pRExC_state, ret, flagp, len,
-                                           UV_MAX,  /* unused here */
+                alloc_maybe_populate_EXACT(pRExC_state, ret, flagp, len, ender,
                                            FALSE /* Don't look to see if could
                                                     be turned into an EXACT
                                                     node, as we have already