diff options
author | Abhijit Menon-Sen <ams@wiw.org> | 2001-06-27 09:21:27 +0530 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-07-02 13:25:40 +0000 |
commit | 7fb3795116dd07b7f236652a03ac53946b1af7cf (patch) | |
tree | ddf0f84c3ced4f193c2e9b22e9372710806cd305 /gv.c | |
parent | fd90a50dd9dd98650b54e33f8b9a3e77bcbf54b8 (diff) | |
download | perl-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.c | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -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(); |