avoid temporary files named 'tmp'
Gurusamy Sarathy [Sat, 8 May 1999 16:09:33 +0000 (16:09 +0000)]
p4raw-id: //depot/perl@3331

Makefile.SH
pp.c

index 206514e..1ba5e80 100644 (file)
@@ -279,8 +279,8 @@ miniperlmain$(OBJ_EXT): miniperlmain.c
        $(CCCMD) $(PLDLFLAGS) $*.c
 
 perlmain.c: miniperlmain.c config.sh $(FIRSTMAKEFILE)
-       sh writemain $(DYNALOADER) $(static_ext) > tmp
-       sh mv-if-diff tmp perlmain.c
+       sh writemain $(DYNALOADER) $(static_ext) > writemain.tmp
+       sh mv-if-diff writemain.tmp perlmain.c
 
 perlmain$(OBJ_EXT): perlmain.c
        $(CCCMD) $(PLDLFLAGS) $*.c
@@ -389,12 +389,12 @@ preplibrary: miniperl lib/Config.pm $(plextract)
 # (If trying to create a new port and having problems with the configpm script, 
 # try 'make minitest' and/or commenting out the tests at the end of configpm.)
 lib/Config.pm: config.sh miniperl configpm
-       $(LDLIBPTH) ./miniperl configpm tmp
-       sh mv-if-diff tmp $@
+       $(LDLIBPTH) ./miniperl configpm configpm.tmp
+       sh mv-if-diff configpm.tmp $@
 
 lib/ExtUtils/Miniperl.pm: miniperlmain.c miniperl minimod.pl lib/Config.pm
-       $(LDLIBPTH) ./miniperl minimod.pl > tmp
-       sh mv-if-diff tmp $@
+       $(LDLIBPTH) ./miniperl minimod.pl > minimod.tmp
+       sh mv-if-diff minimod.tmp $@
 
 lib/re.pm: ext/re/re.pm
        rm -f $@
diff --git a/pp.c b/pp.c
index e00b8c0..ae935de 100644 (file)
--- 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;