diff options
Diffstat (limited to 'engines/glk/archetype/statement.h')
-rw-r--r-- | engines/glk/archetype/statement.h | 98 |
1 files changed, 98 insertions, 0 deletions
diff --git a/engines/glk/archetype/statement.h b/engines/glk/archetype/statement.h new file mode 100644 index 0000000000..0be8c1b9a0 --- /dev/null +++ b/engines/glk/archetype/statement.h @@ -0,0 +1,98 @@ +/* ScummVM - Graphic Adventure Engine + * + * ScummVM is the legal property of its developers, whose names + * are too numerous to list here. Please refer to the COPYRIGHT + * file distributed with this source distribution. + * + * This program is free software; you can redistribute it and/or + * modify it under the terms of the GNU General Public License + * as published by the Free Software Foundation; either version 2 + * of the License, or (at your option) any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this program; if not, write to the Free Software + * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. + * + */ + +#ifndef ARCHETYPE_STATEMENT +#define ARCHETYPE_STATEMENT + +#include "glk/archetype/expression.h" +#include "glk/archetype/linked_list.h" + +namespace Glk { +namespace Archetype { + +enum StatementKind { + COMPOUND, ST_EXPR, ST_IF, ST_CASE, ST_FOR, ST_WHILE, ST_BREAK, ST_CREATE, + ST_DESTROY, ST_WRITE, ST_WRITES, ST_STOP, CONT_SEQ, END_SEQ +}; + +union StatementType; +typedef StatementType *StatementPtr; + +struct StmtCompound { + ListType statements; +}; + +struct StmtExpr { + ExprTree expression; +}; + +struct StmtIf { + ExprTree condition; + StatementPtr then_branch; + StatementPtr else_branch; +}; + +struct StmtCase { + ExprTree test_expr; + ListType cases; +}; + +struct StmtCreate { + int archetype; + ExprTree new_name; +}; + +struct StmtDestroy { + ExprTree victim; +}; + +struct StmtLoop { + ExprTree selection; + StatementPtr action; +}; + +struct StmtWrite { + ListType print_list; +}; + +union StatementType { + StatementKind _kind; + StmtCompound _compound; + StmtExpr _expr; + StmtIf _if; + StmtCase _case; + StmtCreate _create; + StmtDestroy _destroy; + StmtLoop _loop; + StmtWrite _write; +}; + +struct CasePairType { + ExprTree value; + StatementPtr action; +}; +typedef CasePairType *CasePairPtr; + +} // End of namespace Archetype +} // End of namespace Glk + +#endif |