summaryrefslogtreecommitdiff
path: root/op.c
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2002-03-10 17:58:43 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2002-03-10 17:58:43 +0000
commitc4abd99f755789ee078506d35160ea537d188f22 (patch)
treec81449326413cc766a678178d21fa836d26cca9b /op.c
parent84356d6af35ac8d1a3411e21cbbbf513e3b57a91 (diff)
downloadperl-c4abd99f755789ee078506d35160ea537d188f22.tar.gz
Unused.
p4raw-id: //depot/perl@15147
Diffstat (limited to 'op.c')
-rw-r--r--op.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/op.c b/op.c
index 5b1156724c..d0d3103c33 100644
--- a/op.c
+++ b/op.c
@@ -925,9 +925,9 @@ S_cop_free(pTHX_ COP* cop)
SvREFCNT_dec(cop->cop_warnings);
if (! specialCopIO(cop->cop_io)) {
#ifdef USE_ITHREADS
+#if 0
STRLEN len;
char *s = SvPV(cop->cop_io,len);
-#if 0
Perl_warn(aTHX_ "io='%.*s'",(int) len,s); /* ??? --jhi */
#endif
#else