| # | Line 553 | Line 553 | sub Arch_Start { | |
|---|---|---|
| 553 | my $name=shift; | |
| 554 | my $hashref=shift; | |
| 555 | ||
| 556 | < | $toolswitch->checktag($name, $hashref,'name'); |
| 556 | > | $self->{switch}->checktag($name, $hashref,'name'); |
| 557 | ( ($ENV{SCRAM_ARCH}=~/$$hashref{name}.*/) )? ($self->{Arch}=1) | |
| 558 | : ($self->{Arch}=0); | |
| 559 | push @{$self->{ARCHBLOCK}}, $self->{Arch}; | |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |