Use new regnodes for /[[:ascii:]]/

[perl5.git] / embed.h

diff --git a/embed.h b/embed.h
index 2f2f93a..9d061fb 100644 (file)
--- a/embed.h
+++ b/embed.h
@@ -1114,6 +1114,8 @@
 #define backup_one_SB(a,b,c)   S_backup_one_SB(aTHX_ a,b,c)
 #define backup_one_WB(a,b,c,d) S_backup_one_WB(aTHX_ a,b,c,d)
 #define find_byclass(a,b,c,d,e)        S_find_byclass(aTHX_ a,b,c,d,e)
+#define find_next_ascii                S_find_next_ascii
+#define find_next_non_ascii    S_find_next_non_ascii
 #define isFOO_utf8_lc(a,b)     S_isFOO_utf8_lc(aTHX_ a,b)
 #define isGCB(a,b,c,d,e)       S_isGCB(aTHX_ a,b,c,d,e)
 #define isLB(a,b,c,d,e,f)      S_isLB(aTHX_ a,b,c,d,e,f)