Allow display base, not field type to have multiple ORed entries (for things like BASE_EXT_STRING)

svn path=/trunk/; revision=51235
This commit is contained in:
Michael Mann 2013-08-09 13:55:35 +00:00
parent 1c2cb57a38
commit 5ffa911a6b
1 changed files with 8 additions and 8 deletions

View File

@ -287,17 +287,17 @@ sub verify_line {
print "$line_number: Poorly formed hf_ variable ($proto_tree_item[3])!\n";
$errors++;
}
foreach (split(/\|/, $proto_tree_item[9])) {
if (!exists($FIELD_TYPE{$_})) {
print "$line_number: Field type '$proto_tree_item[9]' unknown!\n";
if (!exists($FIELD_TYPE{$proto_tree_item[9]})) {
print "$line_number: Field type '$proto_tree_item[9]' unknown!\n";
$errors++;
}
foreach (split(/\|/, $proto_tree_item[11])) {
if ((!exists($DISPLAY_BASE{$_})) &&
(!($proto_tree_item[11] =~ /\d+/))) {
print "$line_number: Display base '$proto_tree_item[11]' unknown!\n";
$errors++;
}
}
if ((!exists($DISPLAY_BASE{$proto_tree_item[11]})) &&
(!($proto_tree_item[11] =~ /\d+/))) {
print "$line_number: Display base '$proto_tree_item[11]' unknown!\n";
$errors++;
}
} elsif ($proto_tree_item[1] eq "2") {
if (!($proto_tree_item[3] =~ /^ei_/)) {