TODO test for 120535

[perl5.git] / embed.h

diff --git a/embed.h b/embed.h
index 29ce7b9..c042eab 100644 (file)
--- a/embed.h
+++ b/embed.h
@@ -1648,7 +1648,7 @@
 #define scan_ident(a,b,c,d)    S_scan_ident(aTHX_ a,b,c,d)
 #define scan_inputsymbol(a)    S_scan_inputsymbol(aTHX_ a)
 #define scan_pat(a,b)          S_scan_pat(aTHX_ a,b)
-#define scan_str(a,b,c,d,e)    S_scan_str(aTHX_ a,b,c,d,e)
+#define scan_str(a,b,c,d,e,f)  S_scan_str(aTHX_ a,b,c,d,e,f)
 #define scan_subst(a)          S_scan_subst(aTHX_ a)
 #define scan_trans(a)          S_scan_trans(aTHX_ a)
 #define scan_word(a,b,c,d,e)   S_scan_word(aTHX_ a,b,c,d,e)