support files which have CR LF ending like those in win32utils

This commit is contained in:
Mark Andrews
2019-04-12 14:09:01 +10:00
parent a3fd41157d
commit e76936fd85

View File

@@ -227,7 +227,7 @@ foreach $file (keys %file_types) {
($nonspaceprefix = $prefix) =~ s/\s+$//;
open(SOURCE, "<$file") || die "can't open $file: $!";
open(SOURCE, "<:crlf", $file) || die "can't open $file: $!";
$_ = <SOURCE>;
if ($type eq "YACC") {
unless ($_ eq "%{\n") {