summaryrefslogtreecommitdiff
path: root/cop.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 /cop.h
parent4c11337c0371dac743b0b266e8ebc6f347fa0cd9 (diff)
downloadperl-923e4eb5b872f0800559dcb72be02dea329298f2.tar.gz
Macrofy the compile/runtime test.
p4raw-id: //depot/perl@21297
Diffstat (limited to 'cop.h')
-rw-r--r--cop.h4
1 files changed, 4 insertions, 0 deletions
diff --git a/cop.h b/cop.h
index 04eb7c0c97..12eecdc5c1 100644
--- a/cop.h
+++ b/cop.h
@@ -572,3 +572,7 @@ typedef struct stackinfo PERL_SI;
POPSTACK; \
} \
} STMT_END
+
+#define IN_PERL_COMPILETIME (PL_curcop == &PL_compiling)
+#define IN_PERL_RUNTIME (PL_curcop != &PL_compiling)
+