"Use of strings with code points over 0xFF as arguments to " \
"%s operator is not allowed"
#endif
-#if defined(PERL_IN_OP_C) || defined(PERL_IN_DOOP_C)
+#if defined(PERL_IN_OP_C) || defined(PERL_IN_DOOP_C) || defined(PERL_IN_PERL_C)
# define TR_UNMAPPED (UV)-1
# define TR_DELETE (UV)-2
# define TR_R_EMPTY (UV)-3 /* rhs (replacement) is empty */