diff options
Diffstat (limited to 'opcode.pl')
-rwxr-xr-x | opcode.pl | 4 |
1 files changed, 4 insertions, 0 deletions
@@ -7,7 +7,9 @@ BEGIN { $opcode_new = 'opcode.h-new'; $opname_new = 'opnames.h-new'; open(OC, ">$opcode_new") || die "Can't create $opcode_new: $!\n"; +binmode OC; open(ON, ">$opname_new") || die "Can't create $opname_new: $!\n"; +binmode ON; select OC; # Read data. @@ -293,7 +295,9 @@ $pp_proto_new = 'pp_proto.h-new'; $pp_sym_new = 'pp.sym-new'; open PP, ">$pp_proto_new" or die "Error creating $pp_proto_new: $!"; +binmode PP; open PPSYM, ">$pp_sym_new" or die "Error creating $pp_sym_new: $!"; +binmode PPSYM; print PP <<"END"; /* !!!!!!! DO NOT EDIT THIS FILE !!!!!!! |