mirror of
https://github.com/openhwgroup/cvw
synced 2025-02-11 06:05:49 +00:00
Fix derivgen.pl to find exact keys
This commit is contained in:
parent
f003f8fae9
commit
0da6e35988
@ -96,7 +96,7 @@ foreach my $key (@derivnames) {
|
||||
my @ent = @{$entry};
|
||||
my $param = $ent[0];
|
||||
my $value = $ent[1];
|
||||
if ($line =~ s/$param\s*=\s*.*;/$param = $value;/) {
|
||||
if ($line =~ s/\b$param\s*=\s*.*;/$param = $value;/) {
|
||||
$hit{$param} = 1;
|
||||
# print("Hit: new line in $config for $param is $line");
|
||||
}
|
||||
@ -130,4 +130,4 @@ sub printref {
|
||||
print join('_', @{$entry}), ', ';
|
||||
}
|
||||
print("\n");
|
||||
}
|
||||
}
|
||||
|
Loading…
Reference in New Issue
Block a user