workaround C<"foo" "bar"> catenation-intolerant compilers

p4raw-id: //depot/perl@1587

1 files changed, 3 insertions, 2 deletions

diff --git a/regexec.c b/regexec.c
index 9e90699ec8..47ece6a14b 100644
--- a/regexec.c
+++ b/regexec.c
@@ -1188,8 +1188,9 @@ regmatch(regnode *prog)
 			if (PL_dowarn && n >= REG_INFTY 
 			    && !(PL_reg_flags & RF_warned)) {
 			    PL_reg_flags |= RF_warned;
-			    warn("Complex regular subexpression recursion "
-				 "limit (%d) exceeded", REG_INFTY - 1);
+			    warn("%s limit (%d) exceeded",
+				 "Complex regular subexpression recursion",
+				 REG_INFTY - 1);
 			}
 			sayNO;
 		    }