summaryrefslogtreecommitdiffstats
path: root/generic/tclCompile.h
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2022-02-28 11:43:20 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2022-02-28 11:43:20 (GMT)
commit33eea6856d85ce80c6097dd8d3673632e57b38bf (patch)
tree76c2c93435bc0658dda32f542ca5faf5d7369b7a /generic/tclCompile.h
parent2d07a092e5512407f7e484e7a4f058bd31264c0a (diff)
downloadtcl-33eea6856d85ce80c6097dd8d3673632e57b38bf.zip
tcl-33eea6856d85ce80c6097dd8d3673632e57b38bf.tar.gz
tcl-33eea6856d85ce80c6097dd8d3673632e57b38bf.tar.bz2
Backout part of previous commit, making compile.test work again with --enable-symbols=all
Diffstat (limited to 'generic/tclCompile.h')
-rw-r--r--generic/tclCompile.h12
1 files changed, 6 insertions, 6 deletions
diff --git a/generic/tclCompile.h b/generic/tclCompile.h
index c24150d..0d37c6b 100644
--- a/generic/tclCompile.h
+++ b/generic/tclCompile.h
@@ -871,7 +871,7 @@ typedef struct InstructionDesc {
* computations. The value INT_MIN signals
* that the instruction's worst case effect is
* (1-opnd1). */
- size_t numOperands; /* Number of operands. */
+ int numOperands; /* Number of operands. */
InstOperandType opTypes[MAX_INSTRUCTION_OPERANDS];
/* The type of each operand. */
} InstructionDesc;
@@ -934,14 +934,14 @@ typedef enum {
typedef struct JumpFixup {
TclJumpType jumpType; /* Indicates the kind of jump. */
- size_t codeOffset; /* Offset of the first byte of the one-byte
+ unsigned int codeOffset; /* Offset of the first byte of the one-byte
* forward jump's code. */
- size_t cmdIndex; /* Index of the first command after the one
+ int cmdIndex; /* Index of the first command after the one
* for which the jump was emitted. Used to
* update the code offsets for subsequent
* commands if the two-byte jump at jumpPc
* must be replaced with a five-byte one. */
- size_t exceptIndex; /* Index of the first range entry in the
+ int exceptIndex; /* Index of the first range entry in the
* ExceptionRange array after the current one.
* This field is used to adjust the code
* offsets in subsequent ExceptionRange
@@ -953,8 +953,8 @@ typedef struct JumpFixup {
typedef struct JumpFixupArray {
JumpFixup *fixup; /* Points to start of jump fixup array. */
- size_t next; /* Index of next free array entry. */
- size_t end; /* Index of last usable entry in array. */
+ int next; /* Index of next free array entry. */
+ int end; /* Index of last usable entry in array. */
int mallocedArray; /* 1 if array was expanded and fixups points
* into the heap, else 0. */
JumpFixup staticFixupSpace[JUMPFIXUP_INIT_ENTRIES];