avoid temporary files named 'tmp'

p4raw-id: //depot/perl@3331

1 files changed, 0 insertions, 1 deletions

diff --git a/pp.c b/pp.c
index e00b8c0910..ae935de67a 100644
--- a/pp.c
+++ b/pp.c
@@ -655,7 +655,6 @@ PP(pp_gelem)
 PP(pp_study)
 {
     djSP; dPOPss;
-    register UNOP *unop = cUNOP;
     register unsigned char *s;
     register I32 pos;
     register I32 ch;