This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Missing ")" in CvFILEGV
authorPaul Marquess <paul.marquess@btinternet.com>
Sat, 22 Sep 2001 14:29:13 +0000 (15:29 +0100)
committerAbhijit Menon-Sen <ams@wiw.org>
Sat, 22 Sep 2001 12:28:48 +0000 (12:28 +0000)
Message-Id: <AIEAJICLCBDNAAOLLOKLAEGADAAA.Paul_Marquess@Yahoo.co.uk>

p4raw-id: //depot/perl@12128

cv.h

diff --git a/cv.h b/cv.h
index b6fd7e8..8e7cad6 100644 (file)
--- a/cv.h
+++ b/cv.h
@@ -60,7 +60,7 @@ Returns the stash of the CV.
 #else
 #  define CvFILE_set_from_cop(sv, cop) (CvFILE(sv) = CopFILE(cop))
 #endif
-#define CvFILEGV(sv)   (gv_fetchfile(CvFILE(sv))
+#define CvFILEGV(sv)   (gv_fetchfile(CvFILE(sv)))
 #define CvDEPTH(sv)    ((XPVCV*)SvANY(sv))->xcv_depth
 #define CvPADLIST(sv)  ((XPVCV*)SvANY(sv))->xcv_padlist
 #define CvOUTSIDE(sv)  ((XPVCV*)SvANY(sv))->xcv_outside