summaryrefslogtreecommitdiff
path: root/gv.c
diff options
context:
space:
mode:
authorAbhijit Menon-Sen <ams@wiw.org>2001-06-27 09:21:27 +0530
committerJarkko Hietaniemi <jhi@iki.fi>2001-07-02 13:25:40 +0000
commit7fb3795116dd07b7f236652a03ac53946b1af7cf (patch)
treeddf0f84c3ced4f193c2e9b22e9372710806cd305 /gv.c
parentfd90a50dd9dd98650b54e33f8b9a3e77bcbf54b8 (diff)
downloadperl-7fb3795116dd07b7f236652a03ac53946b1af7cf.tar.gz
Re: [PATH] shared -> unique;
Message-ID: <20010627035127.A17623@lustre.lustre.dyn.wiw.org> p4raw-id: //depot/perl@11089
Diffstat (limited to 'gv.c')
-rw-r--r--gv.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/gv.c b/gv.c
index 1851f8bf57..e4951a076d 100644
--- a/gv.c
+++ b/gv.c
@@ -46,9 +46,9 @@ Perl_gv_IOadd(pTHX_ register GV *gv)
if (!gv || SvTYPE((SV*)gv) != SVt_PVGV)
Perl_croak(aTHX_ "Bad symbol for filehandle");
if (!GvIOp(gv)) {
-#ifdef GV_SHARED_CHECK
- if (GvSHARED(gv)) {
- Perl_croak(aTHX_ "Bad symbol for filehandle (GV is shared)");
+#ifdef GV_UNIQUE_CHECK
+ if (GvUNIQUE(gv)) {
+ Perl_croak(aTHX_ "Bad symbol for filehandle (GV is unique)");
}
#endif
GvIOp(gv) = newIO();