Dwarf3 support for ELF32

[platform/upstream/nasm.git] / mkdep.pl

diff --git a/mkdep.pl b/mkdep.pl
index d376287..9245b18 100755 (executable)
--- a/mkdep.pl
+++ b/mkdep.pl
@@ -84,7 +84,7 @@ sub insert_deps($) {
     my($file) = @_;
     $nexttemp++;               # Unique serial number for each temp file
     my($tmp) = File::Spec->catfile(dirname($file), 'tmp.'.$nexttemp);
-    
+
     sysopen(IN, $file, O_RDONLY)
        or die "$0: Cannot open input: $file\n";
     sysopen(OUT, $tmp, O_WRONLY|O_CREAT|O_TRUNC, 0666)
@@ -118,7 +118,8 @@ sub insert_deps($) {
     }
     close(IN);
 
-    my $e, %do_exclude;
+    my $e;
+    my %do_exclude = ();
     foreach $e (@exclude) {
        $do_exclude{$e} = 1;
     }
@@ -151,15 +152,15 @@ sub insert_deps($) {
        }
     }
     close(OUT);
-    
-    (unlink($file) && rename($tmp, $file)) 
+
+    (unlink($file) && rename($tmp, $file))
        or die "$0: Failed to change $tmp -> $file\n";
 }
 
 #
 # Main program
 #
-    
+
 %deps = ();
 @files = ();
 @mkfiles = ();