Fix a couple of perl4-isms that are now illegal

1 files changed, 2 insertions, 2 deletions

diff --git a/macros.pl b/macros.pl
index 6eaf2949..0934d174 100644
--- a/macros.pl
+++ b/macros.pl
@@ -16,13 +16,13 @@ my $tasm_count;
 
 undef $tasm_count;
 
-open OUTPUT,">macros.c" || die "unable to open macros.c\n";
+open(OUTPUT,">macros.c") or die "unable to open macros.c\n";
     
 print OUTPUT "/* This file auto-generated from standard.mac by macros.pl" .
 " - don't edit it */\n\n#include <stddef.h>\n\nstatic const char *stdmac[] = {\n";
     
 foreach $fname ( @ARGV ) {
-    open INPUT,$fname || die "unable to open $fname\n";
+    open(INPUT,$fname) or die "unable to open $fname\n";
     while (<INPUT>) {
 	$line++;
 	chomp;