diff options
Diffstat (limited to 'ext/PerlIO/Scalar/Scalar.xs')
| -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; } |