| 132 |
} elsif (/^#;/) { ## Comment |
} elsif (/^#;/) { ## Comment |
| 133 |
} elsif (/^#/) { ## Comment or unsupported function |
} elsif (/^#/) { ## Comment or unsupported function |
| 134 |
push @r, $_; |
push @r, $_; |
| 135 |
} elsif (/^0x($o->{except} (?!3021)[0-9A-Fa-f]+)\t([^\t]*)\t([^\t]*)\t(.*)/x) { |
} elsif (/^0x($o->{except} [0-9A-Fa-f]+)\t([^\t]*)\t([^\t]*)\t(.*)/x) { |
| 136 |
my ($u, $l, $f, $m) = (hex $1, $2, $3, $4); |
my ($u, $l, $f, $m) = (hex $1, $2, $3, $4); |
| 137 |
$f = $o->{fallback} if $o->{fallback}; |
$f = $o->{fallback} if $o->{fallback}; |
| 138 |
my $offset = $o->{offset}; |
my $offset = $o->{offset}; |