hoa: diagnose unsupported Headers

* src/hoaparse/hoaparse.yy: Here.
* src/tgbatest/hoaparse.test: Test it.
This commit is contained in:
Alexandre Duret-Lutz 2014-11-21 16:39:33 +01:00
parent 8004dca157
commit 4043ad2ccf
2 changed files with 45 additions and 0 deletions

View file

@ -287,6 +287,14 @@ header-item: "States:" INT
}
| "properties:" properties
| HEADERNAME header-spec
{
char c = (*$1)[0];
if (c >= 'A' && c <= 'Z')
error(@$, "ignoring unsupported header \"" + *$1 + ":\"\n\t"
"(but the capital indicates information that should not"
" be ignored)");
delete $1;
}
ap-names: | ap-names ap-name
ap-name: STRING