diff options
author | Paul Gilbert | 2019-06-17 22:36:31 -0700 |
---|---|---|
committer | Paul Gilbert | 2019-06-22 14:40:49 -0700 |
commit | 08bc570308b0698090ce668dc7dca4c0c76dd3df (patch) | |
tree | 59baa530a4f79b16185c5422ed9f2b706011c8b2 /engines/glk/alan2/util.h | |
parent | 84dfa6d3b83e080f099ad606dc7fbeb40ebe4b97 (diff) | |
download | scummvm-rg350-08bc570308b0698090ce668dc7dca4c0c76dd3df.tar.gz scummvm-rg350-08bc570308b0698090ce668dc7dca4c0c76dd3df.tar.bz2 scummvm-rg350-08bc570308b0698090ce668dc7dca4c0c76dd3df.zip |
GLK: ALAN2: Initial import of full set of interpreter files
Diffstat (limited to 'engines/glk/alan2/util.h')
-rw-r--r-- | engines/glk/alan2/util.h | 54 |
1 files changed, 0 insertions, 54 deletions
diff --git a/engines/glk/alan2/util.h b/engines/glk/alan2/util.h index 5ea14106bd..21993eb80d 100644 --- a/engines/glk/alan2/util.h +++ b/engines/glk/alan2/util.h @@ -23,65 +23,11 @@ #ifndef GLK_ALAN2_UTIL #define GLK_ALAN2_UTIL -#include "glk/alan2/acode.h" -#include "glk/alan2/alan2.h" #include "glk/alan2/types.h" namespace Glk { namespace Alan2 { -// TODO: Move these -extern LitElem *litValues; -extern uint32 litCount; // for LITMAX - defined in parse.cpp -extern ActElem *acts; // Actor table pointer -extern ObjElem *objs; // Object table pointer - -// Type checks -inline bool isObj(Aword x) { - return x >= OBJMIN && x <= OBJMAX; -} - -inline bool isAct(Aword x) { - return x >= ACTMIN && x <= ACTMAX; -} - -inline bool isCnt(Aword x) { - return (x >= CNTMIN && x <= CNTMAX) || - (isObj(x) && objs[x - OBJMIN].cont != 0) || - (isAct(x) && acts[x - ACTMIN].cont != 0); -} - -inline bool isLoc(Aword x) { - return x >= LOCMIN && x <= LOCMAX; -} - -inline bool isNum(Aword x) { - return x >= LITMIN && x <= LITMAX && litValues[x - LITMIN].type == TYPNUM; -} - -inline bool isStr(Aword x) { - return x >= LITMIN && x <= LITMAX && litValues[x - LITMIN].type == TYPSTR; -} - -inline bool isLit(Aword x) { - return x >= LITMIN && x <= LITMAX; -} - -inline bool endOfTable(LimElem *addr) { - Aword *x = (Aword *)addr; - return *x == (Aword)EOF; -} - -inline bool endOfTable(ScrElem *addr) { - Aword *x = (Aword *)addr; - return *x == (Aword)EOF; -} - -inline bool endOfTable(ExtElem *addr) { - Aword *x = (Aword *)addr; - return *x == (Aword)EOF; -} - } // End of namespace Alan2 } // End of namespace Glk |