public void ParseProcDef()
{
lexer.CharStream = new ANTLRStringStream("procedure A(a:integer; b,c:Z);begin end;");
tokens.TokenSource = lexer;
parser = new PascalParser(tokens);
var res = parser.procDef();
Assert.AreEqual(res.Name.Text, "A");
}