diff options
Diffstat (limited to 'util')
-rw-r--r-- | util/fipsas.pl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/util/fipsas.pl b/util/fipsas.pl index 6e10d7d8d5..fc2a759308 100644 --- a/util/fipsas.pl +++ b/util/fipsas.pl @@ -49,11 +49,11 @@ while (<IN>) my ($from, $to); #rename target temporarily -rename($target, "tmptarg.s") || die "Can't rename $target\n"; +rename($target, "tmptarg.s") || die "Can't rename $target"; #edit target -open IN,"tmptarg.s"; -open OUT, ">$target"; +open(IN,"tmptarg.s") || die "Can't open temporary file"; +open(OUT, ">$target") || die "Can't open output file $target"; while (<IN>) { |