document what chdir() without an argument does (from Mark-Jason

[perl5.git] / utf8.h

diff --git a/utf8.h b/utf8.h
index 698c687..e71264c 100644 (file)
--- a/utf8.h
+++ b/utf8.h
@@ -27,5 +27,6 @@ EXTCONST unsigned char PL_utf8skip[];
 END_EXTERN_C
 
 #define IN_UTF8 (PL_curcop->op_private & HINT_UTF8)
+#define IN_BYTE (PL_curcop->op_private & HINT_BYTE)
 
 #define UTF8SKIP(s) PL_utf8skip[*(U8*)s]