Allow * in first column as comment (SC assembler)

This commit is contained in:
Leeland Heins 2018-12-17 22:24:38 -06:00 committed by GitHub
parent 9900d41517
commit 0deb732a07
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23

View File

@ -2003,6 +2003,7 @@ if (open($ifh, "<$input_file")) {
# Skip comment lines.
next if $line =~ /^\s*;/;
next if $line =~ /\*/;
# Process .org lines.
if ($line =~ /^\.org\s+(.+)/) {
@ -2110,6 +2111,7 @@ if (open($ifh, "<$input_file")) {
# Skip comment lines.
next if $line =~ /^\s*;/;
next if $line =~ /\*/;
# Skip .org lines.
next if $line =~ /^\.org\s+.+/;