summaryrefslogtreecommitdiff
path: root/perl.h
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2014-11-11 22:25:37 -0700
committerKarl Williamson <khw@cpan.org>2014-11-20 21:45:17 -0700
commit47e13f24847018e7947377141de64798abfa1ce9 (patch)
treedb1ff966fdee5975456f1c95707f9210b8473551 /perl.h
parentdd90e537d39b34eadaee8ce4df4561bd428f0f9d (diff)
downloadperl-47e13f24847018e7947377141de64798abfa1ce9.tar.gz
Make testing for PL_encoding into a macro
This is in preparation for making the test more complicated.
Diffstat (limited to 'perl.h')
-rw-r--r--perl.h3
1 files changed, 3 insertions, 0 deletions
diff --git a/perl.h b/perl.h
index 580ad6a5ff..9056e0a55d 100644
--- a/perl.h
+++ b/perl.h
@@ -767,6 +767,9 @@
# endif
#endif /* !NO_LOCALE && HAS_SETLOCALE */
+/* Are we under the encoding pragma? */
+#define IN_ENCODING UNLIKELY(PL_encoding)
+
#include <setjmp.h>
#ifdef I_SYS_PARAM