diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2002-05-02 03:33:14 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-05-02 03:33:14 +0000 |
| commit | 2035c5e8eb03b194190a7ef87630a0e4cc7c6251 (patch) | |
| tree | fe4d44dc3bc9e8e9bed55d764d7ac46ffe51abff /gv.h | |
| parent | 7e2b0cd5b0db692085efbcbe1098082cbcb19f50 (diff) | |
| download | perl-2035c5e8eb03b194190a7ef87630a0e4cc7c6251.tar.gz | |
New try at the Class::DBI core dump at global cleanup.
p4raw-id: //depot/perl@16325
Diffstat (limited to 'gv.h')
| -rw-r--r-- | gv.h | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -42,7 +42,7 @@ Return the SV from the GV. #define GvSV(gv) (GvGP(gv)->gp_sv) #define GvREFCNT(gv) (GvGP(gv)->gp_refcnt) -#define GvIO(gv) ((gv) && SvTYPE((SV*)gv) == SVt_PVGV ? GvIOp(gv) : 0) +#define GvIO(gv) ((gv) && SvTYPE((SV*)gv) == SVt_PVGV && GvGP(gv) ? GvIOp(gv) : 0) #define GvIOp(gv) (GvGP(gv)->gp_io) #define GvIOn(gv) (GvIO(gv) ? GvIOp(gv) : GvIOp(gv_IOadd(gv))) |