summaryrefslogtreecommitdiff
path: root/cv.h
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>1999-04-03 21:01:09 +0000
committerGurusamy Sarathy <gsar@cpan.org>1999-04-03 21:01:09 +0000
commit67caa1fef1ac64bae9d7c9deecbf100088307e6f (patch)
tree30866fdce7cc404aa0065c3f51eac0a92dae5562 /cv.h
parent6fc9266916f08dacf1850556174b6312eefb14e6 (diff)
downloadperl-67caa1fef1ac64bae9d7c9deecbf100088307e6f.tar.gz
scrounge and save three extra branches in pp_entersub()
p4raw-id: //depot/perl@3214
Diffstat (limited to 'cv.h')
-rw-r--r--cv.h2
1 files changed, 2 insertions, 0 deletions
diff --git a/cv.h b/cv.h
index 9605135ffc..cf5a7509d0 100644
--- a/cv.h
+++ b/cv.h
@@ -75,9 +75,11 @@ struct xpvcv {
#define CvANON_on(cv) (CvFLAGS(cv) |= CVf_ANON)
#define CvANON_off(cv) (CvFLAGS(cv) &= ~CVf_ANON)
+#ifdef PERL_XSUB_OLDSTYLE
#define CvOLDSTYLE(cv) (CvFLAGS(cv) & CVf_OLDSTYLE)
#define CvOLDSTYLE_on(cv) (CvFLAGS(cv) |= CVf_OLDSTYLE)
#define CvOLDSTYLE_off(cv) (CvFLAGS(cv) &= ~CVf_OLDSTYLE)
+#endif
#define CvUNIQUE(cv) (CvFLAGS(cv) & CVf_UNIQUE)
#define CvUNIQUE_on(cv) (CvFLAGS(cv) |= CVf_UNIQUE)