nits
This commit is contained in:
parent
5573c8f296
commit
cffa954301
5 changed files with 17 additions and 29 deletions
9
runoff
9
runoff
|
@ -109,15 +109,20 @@ perl -e '
|
|||
if (/^([0-9]+) #define +([A-za-z0-9_]+) +?\(.*/) {
|
||||
print "$1 $2\n"
|
||||
}
|
||||
|
||||
elsif (/^([0-9]+) #define +([A-Za-z0-9_]+) +([^ ]+)/) {
|
||||
print "$1 $2 $3\n";
|
||||
}
|
||||
|
||||
elsif (/^([0-9]+) #define +([A-Za-z0-9_]+)/) {
|
||||
print "$1 $2\n";
|
||||
}
|
||||
|
||||
if(/^^([0-9]+) \.globl ([a-zA-Z0-9_]+)/){
|
||||
$isglobl{$2} = 1;
|
||||
}
|
||||
if(/^^([0-9]+) ([a-zA-Z0-9_]+):$/ && $isglobl{$2}){
|
||||
print "$1 $2\n";
|
||||
}
|
||||
|
||||
if (/\(/) {
|
||||
next;
|
||||
}
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue