summaryrefslogtreecommitdiff
path: root/perl.h
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2003-09-21 08:50:22 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2003-09-21 08:50:22 +0000
commit923e4eb5b872f0800559dcb72be02dea329298f2 (patch)
tree32c395e2e019be7fa91d52b767b98ab578d22149 /perl.h
parent4c11337c0371dac743b0b266e8ebc6f347fa0cd9 (diff)
downloadperl-923e4eb5b872f0800559dcb72be02dea329298f2.tar.gz
Macrofy the compile/runtime test.
p4raw-id: //depot/perl@21297
Diffstat (limited to 'perl.h')
-rw-r--r--perl.h2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl.h b/perl.h
index 01458d9b65..73aad3ccee 100644
--- a/perl.h
+++ b/perl.h
@@ -3852,7 +3852,7 @@ typedef struct am_table_short AMTS;
#define IN_LOCALE_COMPILETIME (PL_hints & HINT_LOCALE)
#define IN_LOCALE \
- (PL_curcop == &PL_compiling ? IN_LOCALE_COMPILETIME : IN_LOCALE_RUNTIME)
+ (IN_PERL_COMPILETIME ? IN_LOCALE_COMPILETIME : IN_LOCALE_RUNTIME)
#define STORE_NUMERIC_LOCAL_SET_STANDARD() \
bool was_local = PL_numeric_local && IN_LOCALE; \