diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-06-02 16:48:26 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-06-02 16:48:26 +0000 |
commit | 8fa7f3676ed75809365905727fbae97dc8767f29 (patch) | |
tree | 2c626750a9a8493a188833eb82d96b24e79fa03f /ext/PerlIO | |
parent | a126002e7fdcd66f0996dbe9b5b1c2d7960cf31b (diff) | |
download | perl-8fa7f3676ed75809365905727fbae97dc8767f29.tar.gz |
-Wall cleanup continues.
p4raw-id: //depot/perl@10392
Diffstat (limited to 'ext/PerlIO')
-rw-r--r-- | ext/PerlIO/Scalar/Scalar.xs | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/ext/PerlIO/Scalar/Scalar.xs b/ext/PerlIO/Scalar/Scalar.xs index e1e9349cd9..fb8b39abb6 100644 --- a/ext/PerlIO/Scalar/Scalar.xs +++ b/ext/PerlIO/Scalar/Scalar.xs @@ -67,7 +67,6 @@ PerlIOScalar_close(PerlIO *f) { dTHX; IV code = PerlIOBase_close(f); - PerlIOScalar *s = PerlIOSelf(f,PerlIOScalar); PerlIOBase(f)->flags &= ~(PERLIO_F_RDBUF|PERLIO_F_WRBUF); return code; } |