static AbstractNode assignment(Yytoken ident) {
// Ident bereits in statement() abgearbeitet
AbstractNode selectorNode = selector(ident);
AbstractNode expressionNode = null;
int line = 0, column = 0;
if (nexttoken.getName().equals(":=")) {
line = nexttoken.getLine();
column = nexttoken.getColumn();
outStr(":=");
insymbol();
expressionNode = expression();
} else {
error("':=' expected", nexttoken.getLine(), nexttoken.getColumn());
}
if (selectorNode != null) {
return new AssignmentNode(null, selectorNode, expressionNode, line, column);
} else {
return new AssignmentNode(
new IdentNode(ident.getName(), ident.getLine(), ident.getColumn()),
selectorNode,
expressionNode,
line,
column);
}
}
static AbstractNode arrayType() {
int line = nexttoken.getLine();
int column = nexttoken.getColumn();
AbstractNode indexEx = null, type = null;
if (nexttoken.getName().equals("ARRAY")) {
insymbol();
outStr("ARRAY");
if (nexttoken.getName().equals("[")) {
insymbol();
indexEx = indexExpression();
if (nexttoken.getName().equals("]")) {
insymbol();
if (nexttoken.getName().equals("OF")) {
insymbol();
type = type();
} else {
error("'OF' expected", nexttoken.getLine(), nexttoken.getColumn());
}
} else {
error("']' expected", nexttoken.getLine(), nexttoken.getColumn());
}
} else {
error("'[' expected", nexttoken.getLine(), nexttoken.getColumn());
}
} else {
error("ArrayType Error", nexttoken.getLine(), nexttoken.getColumn());
}
return new ArrayNode(indexEx, type, line, column);
}
static AbstractNode whileStatement() {
AbstractNode doPart = null, cond = null;
int line = 0, column = 0;
if (nexttoken.getName().equals("WHILE")) {
outStr("WHILE");
insymbol();
line = nexttoken.getLine();
column = nexttoken.getColumn();
cond = expression();
if (nexttoken.getName().equals("DO")) {
outStr("DO");
insymbol();
doPart = statementSequence();
if (nexttoken.getName().equals("END")) {
outStr("END");
insymbol();
} else {
error("'END' expected", nexttoken.getLine(), nexttoken.getColumn());
}
} else {
error("'DO' expected", nexttoken.getLine(), nexttoken.getColumn());
}
} else {
error("WhileStatementError", nexttoken.getLine(), nexttoken.getColumn());
}
return new WhileNode(cond, doPart, line, column);
}
static AbstractNode read() {
AbstractNode node = null;
if (nexttoken.getName().equals("READ")) {
insymbol();
outStr("READ ");
if (nexttoken.getName().charAt(0) == '"') {
node = prompt();
}
}
return node;
}
static AbstractNode constIdent() {
AbstractNode node = null;
int line = nexttoken.getLine();
int column = nexttoken.getColumn();
if (nexttoken.getType().equals("Ident")) {
outStr(nexttoken.getName());
node = new IdentNode(nexttoken.getName(), line, column);
insymbol();
} else {
error("ConstIdent Error", nexttoken.getLine(), nexttoken.getColumn());
}
return node;
}
static AbstractNode indexExpression() {
AbstractNode node = null;
int line = nexttoken.getLine();
int column = nexttoken.getColumn();
if (nexttoken.getType().equals("Integer")) {
outInt(nexttoken.getName());
node = new IntegerNode(nexttoken.getName(), line, column);
insymbol();
} else {
node = constIdent();
}
return node;
}
static AbstractNode factor() {
AbstractNode node = null;
int line = nexttoken.getLine();
int column = nexttoken.getColumn();
if (nexttoken.getName().equals("(")) {
insymbol();
node = expression();
if (nexttoken.getName().equals(")")) {
insymbol();
} else {
error("')' expected", nexttoken.getLine(), nexttoken.getColumn());
}
} else if (nexttoken.getType().equals("Ident")) {
node = new IdentNode(nexttoken.getName(), line, column);
outStr(nexttoken.getName());
Yytoken ident = nexttoken;
insymbol();
OperatorNode selectorNode = selector(ident);
if (selectorNode != null) {
// selectorNode.setLeft(node);
node = new ContNode(selectorNode, line, column);
} else {
node = new ContNode(node, line, column);
}
} else if (nexttoken.getType().equals("Integer")) {
outInt(nexttoken.getName());
node = new IntegerNode(nexttoken.getName(), line, column);
insymbol();
} else if (nexttoken.getName().equals("READ")) {
node = read();
} else if (nexttoken.getName().charAt(0) == '"') {
node = new ContNode(string(), line, column);
}
return node;
}
static OperatorNode selector(Yytoken ident) {
AbstractNode node = null;
AbstractNode result = null;
int line = nexttoken.getLine();
int column = nexttoken.getColumn();
while (nexttoken.getName().equals(".") || nexttoken.getName().equals("[")) {
if (nexttoken.getName().equals(".")) {
insymbol();
if (nexttoken.getType().equals("Ident")) {
outStr("." + nexttoken.getName());
if (node == null) {
node =
new OperatorNode(
".",
new IdentNode(ident.getName(), ident.getLine(), ident.getColumn()),
new IdentNode(nexttoken.getName(), line, column),
line,
column);
} else {
node =
(new OperatorNode(
".", node, new IdentNode(nexttoken.getName(), line, column), line, column));
}
insymbol();
} else {
error("identifier expected", nexttoken.getLine(), nexttoken.getColumn());
}
} else if (nexttoken.getName().equals("[")) {
insymbol();
if (node == null) {
node =
new OperatorNode(
"[",
new IdentNode(ident.getName(), ident.getLine(), ident.getColumn()),
expression(),
line,
column);
} else {
node = new OperatorNode("[", node, expression(), line, column);
}
if (nexttoken.getName().equals("]")) {
insymbol();
} else {
error("']' expected", nexttoken.getLine(), nexttoken.getColumn());
}
}
}
return ((OperatorNode) node);
}
static AbstractNode ifStatement() {
AbstractNode conditionNode = null, thenNode = null, elseNode = null;
int l = 0, c = 0;
if (nexttoken.getName().equals("IF")) {
outStr("IF");
insymbol();
l = nexttoken.getLine();
c = nexttoken.getColumn();
conditionNode = expression();
if (nexttoken.getName().equals("THEN")) {
outStr("THEN");
insymbol();
thenNode = statementSequence();
if (nexttoken.getName().equals("ELSIF")) {
elseNode = ifStatement();
} else if (nexttoken.getName().equals("ELSE")) {
outStr("ELSE");
insymbol();
elseNode = statementSequence();
}
if (nexttoken.getName().equals("END")) {
outStr("END");
insymbol();
} else {
error("'END' expected", nexttoken.getLine(), nexttoken.getColumn());
}
} else {
error("'THEN' expected", nexttoken.getLine(), nexttoken.getColumn());
}
} else if (nexttoken.getName().equals("ELSIF")) {
outStr("ELSIF");
insymbol();
l = nexttoken.getLine();
c = nexttoken.getColumn();
conditionNode = expression();
if (nexttoken.getName().equals("THEN")) {
outStr("THEN");
insymbol();
thenNode = statementSequence();
if (nexttoken.getName().equals("ELSIF")) {
elseNode = ifStatement();
} else if (nexttoken.getName().equals("ELSE")) {
outStr("ELSE");
insymbol();
elseNode = statementSequence();
}
} else {
error("'THEN' expected", nexttoken.getLine(), nexttoken.getColumn());
}
} else {
error("IfStatement error", nexttoken.getLine(), nexttoken.getColumn());
}
return new IfNode(conditionNode, thenNode, elseNode, l, c);
}
static AbstractNode type() {
AbstractNode node = null;
if (nexttoken.getType().equals("Ident")) {
node = new IdentNode(nexttoken.getName(), nexttoken.getLine(), nexttoken.getColumn());
outStr(nexttoken.getName());
insymbol();
} else if (nexttoken.getName().equals("ARRAY")) {
node = arrayType();
} else if (nexttoken.getName().equals("RECORD")) {
node = recordType();
} else {
error("Type Error", nexttoken.getLine(), nexttoken.getColumn());
}
return node;
}
static AbstractNode string() {
int line = nexttoken.getLine();
int column = nexttoken.getColumn();
String str = null;
if (nexttoken.getName().charAt(0) == '"') {
insymbol();
str = "";
while (nexttoken.getName().charAt(0) != '"') {
str += nexttoken.getName();
insymbol();
}
outStr(str = '"' + str + '"');
insymbol();
}
return new StringNode(str, line, column);
}
static AbstractNode term() {
AbstractNode left = null, right = null;
String operator = null;
int line = nexttoken.getLine();
int column = nexttoken.getColumn();
left = factor();
if (nexttoken.getName().equals("*") || nexttoken.getName().equals("/")) {
outOp((operator = nexttoken.getName()) + " ");
insymbol();
right = term();
}
if (operator != null) {
return new OperatorNode(operator, left, right, line, column);
} else {
return left;
}
}
static AbstractNode module() {
AbstractNode ident = null, decl = null, statementSeq = null;
int line = 0, column = 0;
String identName = "";
if (nexttoken.getName().equals("MODULE")) {
outStr("MODULE");
insymbol();
if (nexttoken.getType().equals("Ident")) {
outStr(identName = nexttoken.getName());
ident = new IdentNode(nexttoken.getName(), nexttoken.getLine(), nexttoken.getColumn());
insymbol();
if (nexttoken.getName().equals(";")) {
outStr(";");
insymbol();
decl = declarations();
if (nexttoken.getName().equals("BEGIN")) {
outStr("BEGIN MODULE");
insymbol();
statementSeq = statementSequence();
if (nexttoken.getName().equals("END")) {
outStr("END MODULE");
insymbol();
if (nexttoken.getType().equals("Ident") && identName.equals(nexttoken.getName())) {
outStr(nexttoken.getName());
insymbol();
if (nexttoken.getName().equals(".")) {
outStr(".");
insymbol();
} else {
error("'.' expected", nexttoken.getLine(), nexttoken.getColumn());
}
} else {
error("'Ident' expected", nexttoken.getLine(), nexttoken.getColumn());
}
} else {
error("'END' expected", nexttoken.getLine(), nexttoken.getColumn());
}
} else {
error("'BEGIN' expected", nexttoken.getLine(), nexttoken.getColumn());
}
} else {
error("';' expected", nexttoken.getLine(), nexttoken.getColumn());
}
} else {
error("'Ident' expected", nexttoken.getLine(), nexttoken.getColumn());
}
}
return new ModuleNode(ident, decl, statementSeq, line, column);
}
static AbstractNode procedureDeclaration() {
AbstractNode heading = null, body = null, ident = null;
int line = nexttoken.getLine(), column = nexttoken.getColumn();
heading = procedureHeading();
if (nexttoken.getName().equals(";")) {
outStr(";");
insymbol();
body = procedureBody();
if (nexttoken.getType().equals("Ident")) {
outStr("Ident");
ident = new IdentNode(nexttoken.getName(), nexttoken.getLine(), nexttoken.getColumn());
insymbol();
} else {
error("'Ident' expected", nexttoken.getLine(), nexttoken.getColumn());
}
}
return new ProcedureDeclarationNode(heading, body, ident, line, column);
}
static AbstractNode procedureBody() {
int line = nexttoken.getLine();
int column = nexttoken.getColumn();
AbstractNode statementSequence = null;
AbstractNode declarations = declarations();
if (nexttoken.getName().equals("BEGIN")) {
outStr("BEGIN");
insymbol();
statementSequence = statementSequence();
if (nexttoken.getName().equals("END")) {
outStr("END");
insymbol();
} else {
error("'END' expected", nexttoken.getLine(), nexttoken.getColumn());
}
} else {
error("'BEGIN' expected", nexttoken.getLine(), nexttoken.getColumn());
}
return new ProcedureBodyNode(declarations, statementSequence, line, column);
}
static AbstractNode statementSequence() {
List<AbstractNode> statementList = new LinkedList<AbstractNode>();
int line = nexttoken.getLine();
int column = nexttoken.getColumn();
statementList.add(statement());
while (nexttoken.getName().equals(";")) {
outStr(";");
insymbol();
statementList.add(statement());
}
return new StatementSequenceNode(statementList, line, column);
}
static AbstractNode repeatStatement() {
AbstractNode cond = null, repeatPart = null;
int line = 0, column = 0;
if (nexttoken.getName().equals("REPEAT")) {
outStr("REPEAT");
insymbol();
line = nexttoken.getLine();
column = nexttoken.getColumn();
repeatPart = statementSequence();
if (nexttoken.getName().equals("UNTIL")) {
outStr("UNTIL");
insymbol();
cond = expression();
} else {
error("'UNTIL' expected", nexttoken.getLine(), nexttoken.getColumn());
}
} else {
error("RepeatStatement error", nexttoken.getLine(), nexttoken.getColumn());
}
return new RepeatNode(cond, repeatPart, line, column);
}
static AbstractNode identList() {
int line = nexttoken.getLine();
int column = nexttoken.getColumn();
List<AbstractNode> list = new LinkedList<AbstractNode>();
if (nexttoken.getType().equals("Ident")) {
outStr(nexttoken.getName());
list.add(new IdentNode(nexttoken.getName(), nexttoken.getLine(), nexttoken.getColumn()));
insymbol();
while (nexttoken.getName().equals(",")) {
outStr(",");
insymbol();
outStr(nexttoken.getName());
list.add(new IdentNode(nexttoken.getName(), nexttoken.getLine(), nexttoken.getColumn()));
insymbol();
}
} else {
error("IdentList Error", nexttoken.getLine(), nexttoken.getColumn());
}
return new ListNode(list, line, column);
}
static AbstractNode procedureCall(Yytoken ident) {
AbstractNode actualParameters = null;
AbstractNode identNode = new IdentNode(ident.getName(), ident.getLine(), ident.getColumn());
// Ident bereits in statement() abgearbeitet
if (nexttoken.getName().equals("(")) {
insymbol();
if (nexttoken.getName().equals(")")) {
insymbol();
} else {
actualParameters = actualParameters();
if (nexttoken.getName().equals(")")) {
insymbol();
} else {
error("')' expected", nexttoken.getLine(), nexttoken.getColumn());
}
}
} else {
error("ProcedureCall error", nexttoken.getLine(), nexttoken.getColumn());
}
return new ProcedureCallNode(identNode, actualParameters, ident.getLine(), ident.getColumn());
}
static AbstractNode formalParameters() {
int line = nexttoken.getLine();
int column = nexttoken.getColumn();
List<AbstractNode> list = new LinkedList<AbstractNode>();
list.add(fpSection());
while (nexttoken.getName().equals(";")) {
outStr(";");
insymbol();
list.add(fpSection());
}
return new ListNode(list, line, column);
}
static AbstractNode statement() {
AbstractNode statement = null;
int line = 0, column = 0;
if (nexttoken.getType().equals("Ident")) {
Yytoken ident = nexttoken;
line = nexttoken.getLine();
column = nexttoken.getColumn();
outStr(ident.getName());
insymbol();
if (nexttoken.getName().equals("(")) {
statement = procedureCall(ident);
} else {
statement = assignment(ident);
}
} else if (nexttoken.getName().equals("IF")) {
statement = ifStatement();
} else if (nexttoken.getName().equals("PRINT")) {
outStr("PRINT");
insymbol();
statement = new PrintNode(expression(), line, column);
} else if (nexttoken.getName().equals("WHILE")) {
statement = whileStatement();
} else if (nexttoken.getName().equals("REPEAT")) {
statement = repeatStatement();
}
return new StatementNode(statement, line, column);
}
static AbstractNode procedureHeading() {
int line = nexttoken.getLine();
int column = nexttoken.getColumn();
AbstractNode ident = null, formalParameters = null;
if (nexttoken.getName().equals("PROCEDURE")) {
outStr("PROCEDURE");
insymbol();
if (nexttoken.getType().equals("Ident")) {
outStr(nexttoken.getName());
ident = new IdentNode(nexttoken.getName(), nexttoken.getLine(), nexttoken.getColumn());
insymbol();
if (nexttoken.getName().equals("(")) {
outStr("(");
insymbol();
if (!nexttoken.getName().equals(")")) {
formalParameters = formalParameters();
}
} else {
error("Missing '('", nexttoken.getLine(), nexttoken.getColumn());
}
if (nexttoken.getName().equals(")")) {
outStr(")");
insymbol();
} else {
error("Missing ')'", nexttoken.getLine(), nexttoken.getColumn());
}
} else {
error("Ident expected", nexttoken.getLine(), nexttoken.getColumn());
}
} else {
error("'PROCEDURE' expected", nexttoken.getLine(), nexttoken.getColumn());
}
return new ProcedureHeadingNode(ident, formalParameters, line, column);
}
static AbstractNode simpleExpression() {
String sign = null;
String operator = null;
AbstractNode left = null;
AbstractNode node = null;
int line = nexttoken.getLine();
int column = nexttoken.getColumn();
if (nexttoken.getName().equals("-")) {
sign = nexttoken.getName();
insymbol();
}
left = term();
if (sign != null && sign.equals("-")) {
outOp("- ");
left = new OperatorNode("-", null, left, line, column);
}
while (nexttoken.getName().equals("-") || nexttoken.getName().equals("+")) {
outOp(nexttoken.getName() + " ");
operator = nexttoken.getName();
insymbol();
if (node == null) {
node = new OperatorNode(operator, left, term(), line, column);
} else {
node = new OperatorNode(operator, node, term(), line, column);
}
}
if (node == null) {
return left;
} else {
return node;
}
}
static AbstractNode recordType() {
int line = nexttoken.getLine();
int column = nexttoken.getColumn();
List<AbstractNode> lists = new LinkedList<AbstractNode>();
if (nexttoken.getName().equals("RECORD")) {
outStr("RECORD");
insymbol();
lists.add(fieldList());
while (nexttoken.getName().equals(";")) {
outStr(";");
insymbol();
lists.add(fieldList());
}
if (nexttoken.getName().equals("END")) {
insymbol();
outStr("END");
} else {
error("'END' expected", nexttoken.getLine(), nexttoken.getColumn());
}
} else {
error("RecordType Error", nexttoken.getLine(), nexttoken.getColumn());
}
return new RecordNode(new ListNode(lists, line, column), line, column);
}
static AbstractNode fpSection() {
int line = nexttoken.getLine();
int column = nexttoken.getColumn();
boolean isVar = false;
AbstractNode identList = null, type = null;
if (nexttoken.getName().equals("VAR")) {
outStr("VAR");
isVar = true;
insymbol();
}
if (nexttoken.getType().equals("Ident")) {
identList = identList();
} else {
error("'IDENT' expected", nexttoken.getLine(), nexttoken.getColumn());
}
if (nexttoken.getName().equals(":")) {
outStr(":");
insymbol();
type = type();
} else {
error("':' expected", nexttoken.getLine(), nexttoken.getColumn());
}
return new FPSectionNode(isVar, identList, type, line, column);
}
static AbstractNode fieldList() {
int line = nexttoken.getLine();
int column = nexttoken.getColumn();
AbstractNode identList = null, type = null;
if (nexttoken.getType().equals("Ident")) {
identList = identList();
if (nexttoken.getName().equals(":")) {
insymbol();
type = type();
} else {
error("':' expected", nexttoken.getLine(), nexttoken.getColumn());
}
} else {
error("FieldList Error", nexttoken.getLine(), nexttoken.getColumn());
}
return new FieldListNode(identList, type, line, column);
}
static AbstractNode actualParameters() {
// TODO epxression Nodes????
List<AbstractNode> params = new LinkedList<AbstractNode>();
int line = nexttoken.getLine();
int column = nexttoken.getColumn();
AbstractNode exprNode = expression();
if (exprNode instanceof ContNode) {
exprNode = ((ContNode) exprNode).getNode();
}
params.add(exprNode);
while (nexttoken.getName().equals(",")) {
insymbol();
exprNode = expression();
if (exprNode instanceof ContNode) {
exprNode = ((ContNode) exprNode).getNode();
}
params.add(exprNode);
}
return new ListNode(params, line, column);
}
static AbstractNode expression() {
AbstractNode right = null;
AbstractNode left = null;
String operator = null;
int line = nexttoken.getLine();
int column = nexttoken.getColumn();
left = simpleExpression();
if (nexttoken.getName().equals("=")
|| nexttoken.getName().equals("#")
|| nexttoken.getName().equals("<")
|| nexttoken.getName().equals("<=")
|| nexttoken.getName().equals(">")
|| nexttoken.getName().equals(">=")) {
outOp(nexttoken.getName() + " ");
operator = nexttoken.getName();
insymbol();
right = simpleExpression();
}
if (operator != null) {
return new OperatorNode(operator, left, right, line, column);
} else {
return left;
}
}
static AbstractNode declarations() {
List<AbstractNode> constNodes = new LinkedList<AbstractNode>();
List<AbstractNode> varNodes = new LinkedList<AbstractNode>();
List<AbstractNode> typeNodes = new LinkedList<AbstractNode>();
List<AbstractNode> procDeclNodes = new LinkedList<AbstractNode>();
AbstractNode identNode;
AbstractNode expressionNode;
AbstractNode type;
int line = 0, column = 0;
if (nexttoken.getName().equals("CONST")) {
outStr("CONST");
insymbol();
if (nexttoken.getType().equals("Ident")) {
outStr(nexttoken.getName());
line = nexttoken.getLine();
column = nexttoken.getColumn();
identNode = new IdentNode(nexttoken.getName(), line, column);
insymbol();
if (nexttoken.getName().equals("=")) {
outStr("=");
insymbol();
expressionNode = expression();
if (nexttoken.getName().equals(";")) {
outStr(";");
insymbol();
constNodes.add(new ConstNode(identNode, expressionNode, line, column));
while (nexttoken.getType().equals("Ident")) {
line = nexttoken.getLine();
column = nexttoken.getColumn();
identNode = new IdentNode(nexttoken.getName(), line, column);
outStr("Ident");
insymbol();
if (nexttoken.getName().equals("=")) {
outStr("=");
insymbol();
expressionNode = expression();
if (nexttoken.getName().equals(";")) {
outStr(";");
constNodes.add(new ConstNode(identNode, expressionNode, line, column));
insymbol();
} else {
error("';' expected", nexttoken.getLine(), nexttoken.getColumn());
}
} else {
error("'=' expected", nexttoken.getLine(), nexttoken.getColumn());
}
}
} else {
error("';' expected", nexttoken.getLine(), nexttoken.getColumn());
}
} else {
error("'=' expected", nexttoken.getLine(), nexttoken.getColumn());
}
} else {
error("'Ident' expected", nexttoken.getLine(), nexttoken.getColumn());
}
}
if (nexttoken.getName().equals("TYPE")) {
outStr("TYPE");
insymbol();
if (nexttoken.getType().equals("Ident")) {
outStr(nexttoken.getName());
line = nexttoken.getLine();
column = nexttoken.getColumn();
identNode = new IdentNode(nexttoken.getName(), line, column);
insymbol();
if (nexttoken.getName().equals("=")) {
outStr("=");
insymbol();
type = type();
if (nexttoken.getName().equals(";")) {
outStr(";");
typeNodes.add(new TypeNode(identNode, type, line, column));
insymbol();
while (nexttoken.getType().equals("Ident")) {
outStr(nexttoken.getName());
line = nexttoken.getLine();
column = nexttoken.getColumn();
identNode = new IdentNode(nexttoken.getName(), line, column);
insymbol();
if (nexttoken.getName().equals("=")) {
outStr("=");
insymbol();
type = type();
if (nexttoken.getName().equals(";")) {
outStr(";");
typeNodes.add(new TypeNode(identNode, type, line, column));
insymbol();
} else {
error("';' expected", nexttoken.getLine(), nexttoken.getColumn());
}
} else {
error("'=' expected", nexttoken.getLine(), nexttoken.getColumn());
}
}
} else {
error("';' expected", nexttoken.getLine(), nexttoken.getColumn());
}
} else {
error("'=' expected", nexttoken.getLine(), nexttoken.getColumn());
}
} else {
error("'Ident' expected", nexttoken.getLine(), nexttoken.getColumn());
}
}
if (nexttoken.getName().equals("VAR")) {
outStr("VAR");
insymbol();
line = nexttoken.getLine();
column = nexttoken.getColumn();
identNode = identList();
if (nexttoken.getName().equals(":")) {
outStr(":");
insymbol();
type = type();
varNodes.add(new VarNode(identNode, type, line, column));
if (nexttoken.getName().equals(";")) {
outStr(";");
insymbol();
while (nexttoken.getType().equals("Ident")) {
line = nexttoken.getLine();
column = nexttoken.getColumn();
identNode = identList();
if (nexttoken.getName().equals(":")) {
outStr(":");
insymbol();
type = type();
if (nexttoken.getName().equals(";")) {
outStr(";");
varNodes.add(new VarNode(identNode, type, line, column));
insymbol();
} else {
error("';' expected", nexttoken.getLine(), nexttoken.getColumn());
}
} else {
error("'=' expected", nexttoken.getLine(), nexttoken.getColumn());
}
}
} else {
error("';' expected", nexttoken.getLine(), nexttoken.getColumn());
}
} else {
error("'=' expected", nexttoken.getLine(), nexttoken.getColumn());
}
}
// Procedure ist first token in ProcedureDeclaration -> ProcedureHeading
// -> Procedure
// Direkt Access because of the while Procedure
while (nexttoken.getName().equals("PROCEDURE")) {
procDeclNodes.add(procedureDeclaration());
if (nexttoken.getName().equals(";")) {
insymbol();
} else {
error("';' expected", nexttoken.getLine(), nexttoken.getColumn());
}
}
return new DeclarationsNode(constNodes, typeNodes, varNodes, procDeclNodes, line, column);
}