Duplicate definition bad.

[perl5.git] / op.c

diff --git a/op.c b/op.c
index c52f4fc..320ad03 100644 (file)
--- a/op.c
+++ b/op.c
@@ -6514,7 +6514,6 @@ const_sv_xsub(pTHX_ CV* cv)
 PerlIO*
 Perl_my_tmpfp(pTHX)
 {
-     dTHX;
      PerlIO *f = NULL;
      int fd = -1;
 #ifdef PERL_EXTERNAL_GLOB