Duplicate definition bad.

p4raw-id: //depot/perl@19659

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