equal
deleted
inserted
replaced
1733 foreach $line (@obydata) |
1733 foreach $line (@obydata) |
1734 { |
1734 { |
1735 print DUMPFILE $line; |
1735 print DUMPFILE $line; |
1736 } |
1736 } |
1737 close DUMPFILE; |
1737 close DUMPFILE; |
|
1738 open SLY_COPY, ">xxx_$dumpfile"; |
|
1739 print SLY_COPY @obydata; |
|
1740 close SLY_COPY; |
1738 } |
1741 } |
1739 |
1742 |
1740 sub track_source |
1743 sub track_source |
1741 { |
1744 { |
1742 my ($line) = @_; |
1745 my ($line) = @_; |
2068 } |
2071 } |
2069 # a partition is specified |
2072 # a partition is specified |
2070 # push this line into the currently selected partition |
2073 # push this line into the currently selected partition |
2071 my $partition=@currentpartition[-1]; |
2074 my $partition=@currentpartition[-1]; |
2072 push @$partition, $modifiedLine; |
2075 push @$partition, $modifiedLine; |
2073 $line="REM handled $line"; |
2076 next; |
2074 } |
2077 } |
2075 elsif ($line =~ /^\s*SPI_POSITION/i) |
2078 elsif ($line =~ /^\s*SPI_POSITION/i) |
2076 { |
2079 { |
2077 if(!($createspi && $spiplacement)) |
2080 if(!($createspi && $spiplacement)) |
2078 { |
2081 { |
2215 print_source_error("Invalid Resource name: $pluginResourceName in " . $plugintype . "_PLUGIN :$line"); |
2218 print_source_error("Invalid Resource name: $pluginResourceName in " . $plugintype . "_PLUGIN :$line"); |
2216 #treat as error if strict option selected; |
2219 #treat as error if strict option selected; |
2217 $errors++ if ($strict); |
2220 $errors++ if ($strict); |
2218 } |
2221 } |
2219 |
2222 |
|
2223 push @newobydata, "REM expanded $line"; |
2220 if ($spidatahide) |
2224 if ($spidatahide) |
2221 { |
2225 { |
2222 push @newobydata, "hide=$fileRomDir\\$pluginFileName\n"; |
2226 push @newobydata, "hide=$fileRomDir\\$pluginFileName\n"; |
2223 } |
2227 } |
2224 else |
2228 else |