Add optional strict mode to grok_bslash_[xo]

This mode croaks on any iffy constructs that currently compile.  It is
not currently used; documentation of the error messages will be
delivered later.

1 files changed, 6 insertions, 2 deletions

diff --git a/toke.c b/toke.c
index 6cf5afc526..dbadf608f9 100644
--- a/toke.c
+++ b/toke.c
@@ -3290,7 +3290,9 @@ S_scan_const(pTHX_ char *start)
 		    const char* error;
 
 		    bool valid = grok_bslash_o(&s, &uv, &error,
-                                               TRUE); /* Output warning */
+                                               TRUE, /* Output warning */
+                                               FALSE, /* Not strict */
+                                               UTF);
 		    if (! valid) {
 			yyerror(error);
 			continue;
@@ -3304,7 +3306,9 @@ S_scan_const(pTHX_ char *start)
 		    const char* error;
 
 		    bool valid = grok_bslash_x(&s, &uv, &error,
-                                               TRUE); /* Output warning */
+                                               TRUE, /* Output warning */
+                                               FALSE, /* Not strict */
+                                               UTF);
 		    if (! valid) {
 			yyerror(error);
 			continue;