X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=embed.h;h=92debc8668c9d0162675e8e58fa13d223f03aee8;hb=85ca448a836bf0ba175d8874ee540094ff909f93;hp=787a045d1cb236490ab32f254805204f5e22e08b;hpb=ba7b4546c787dea31508e30b5d22f5f789d3d86f;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/embed.h b/embed.h
index 787a045..92debc8 100644
--- a/embed.h
+++ b/embed.h
@@ -1088,6 +1088,8 @@
 #define reghopmaybe		S_reghopmaybe
 #define reghopmaybe3		S_reghopmaybe3
 #define find_byclass		S_find_byclass
+#define to_utf8_substr		S_to_utf8_substr
+#define to_byte_substr		S_to_byte_substr
 #endif
 #if defined(PERL_IN_DUMP_C) || defined(PERL_DECL_PROT)
 #define deb_curcv		S_deb_curcv
@@ -1196,9 +1198,6 @@
 #define utf16_textfilter	S_utf16_textfilter
 #define utf16rev_textfilter	S_utf16rev_textfilter
 #endif
-#  if defined(CRIPPLED_CC)
-#define uni			S_uni
-#  endif
 #  if defined(PERL_CR_FILTER)
 #define cr_textfilter		S_cr_textfilter
 #  endif
@@ -2639,6 +2638,8 @@
 #define reghopmaybe(a,b)	S_reghopmaybe(aTHX_ a,b)
 #define reghopmaybe3(a,b,c)	S_reghopmaybe3(aTHX_ a,b,c)
 #define find_byclass(a,b,c,d,e,f)	S_find_byclass(aTHX_ a,b,c,d,e,f)
+#define to_utf8_substr(a)	S_to_utf8_substr(aTHX_ a)
+#define to_byte_substr(a)	S_to_byte_substr(aTHX_ a)
 #endif
 #if defined(PERL_IN_DUMP_C) || defined(PERL_DECL_PROT)
 #define deb_curcv(a)		S_deb_curcv(aTHX_ a)
@@ -2747,9 +2748,6 @@
 #define utf16_textfilter(a,b,c)	S_utf16_textfilter(aTHX_ a,b,c)
 #define utf16rev_textfilter(a,b,c)	S_utf16rev_textfilter(aTHX_ a,b,c)
 #endif
-#  if defined(CRIPPLED_CC)
-#define uni(a,b)		S_uni(aTHX_ a,b)
-#  endif
 #  if defined(PERL_CR_FILTER)
 #define cr_textfilter(a,b,c)	S_cr_textfilter(aTHX_ a,b,c)
 #  endif