summaryrefslogtreecommitdiff
path: root/misc/pascal/insn16/include/pexec.h
diff options
context:
space:
mode:
Diffstat (limited to 'misc/pascal/insn16/include/pexec.h')
-rw-r--r--misc/pascal/insn16/include/pexec.h17
1 files changed, 17 insertions, 0 deletions
diff --git a/misc/pascal/insn16/include/pexec.h b/misc/pascal/insn16/include/pexec.h
index de35589d9..2b705ea34 100644
--- a/misc/pascal/insn16/include/pexec.h
+++ b/misc/pascal/insn16/include/pexec.h
@@ -44,10 +44,27 @@
* Definitions
****************************************************************************/
+#define BPERI 2
+#define ITOBSTACK(i) ((i) << 1)
+#define BTOISTACK(i) ((i) >> 1)
+#define ROUNDBTOI(i) (((i) + 1) >> 1)
+
/****************************************************************************
* Type Definitions
****************************************************************************/
+typedef uint16 uStackType; /* Stack values are 16-bits in length */
+typedef sint16 sStackType;
+typedef uint16 addrType; /* Addresses are 16-bits in length */
+typedef uint16 levelType; /* Limits to MAXUINT16 levels */
+
+union stack_u
+{
+ uStackType *i;
+ ubyte *b;
+};
+typedef union stack_u stackType;
+
/* This structure describes the parameters needed to initialize the p-code
* interpreter.
*/