summaryrefslogtreecommitdiff
path: root/cv.h
diff options
context:
space:
mode:
authorFather Chrysostomos <sprout@cpan.org>2012-06-08 12:27:16 -0700
committerFather Chrysostomos <sprout@cpan.org>2012-06-08 16:17:03 -0700
commita2278b6a4df245dc9db4e52815cdd713a3799982 (patch)
tree87576ee42393baaa55c57765270154e2f369ae56 /cv.h
parente157a82b7da0adb94ee8eb516fa3b8da06977900 (diff)
downloadperl-a2278b6a4df245dc9db4e52815cdd713a3799982.tar.gz
cv.h: Add comments
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 448e20abe2..96308a2938 100644
--- a/cv.h
+++ b/cv.h
@@ -123,6 +123,7 @@ See L<perlguts/Autoloading with XSUBs>.
#define CvANON_on(cv) (CvFLAGS(cv) |= CVf_ANON)
#define CvANON_off(cv) (CvFLAGS(cv) &= ~CVf_ANON)
+/* CvEVAL or CvSPECIAL */
#define CvUNIQUE(cv) (CvFLAGS(cv) & CVf_UNIQUE)
#define CvUNIQUE_on(cv) (CvFLAGS(cv) |= CVf_UNIQUE)
#define CvUNIQUE_off(cv) (CvFLAGS(cv) &= ~CVf_UNIQUE)
@@ -139,6 +140,7 @@ See L<perlguts/Autoloading with XSUBs>.
#define CvLVALUE_on(cv) (CvFLAGS(cv) |= CVf_LVALUE)
#define CvLVALUE_off(cv) (CvFLAGS(cv) &= ~CVf_LVALUE)
+/* eval or PL_main_cv */
#define CvEVAL(cv) (CvUNIQUE(cv) && !SvFAKE(cv))
#define CvEVAL_on(cv) (CvUNIQUE_on(cv),SvFAKE_off(cv))
#define CvEVAL_off(cv) CvUNIQUE_off(cv)