diff options
| author | dgp <dgp@users.sourceforge.net> | 2016-03-22 17:08:50 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2016-03-22 17:08:50 (GMT) |
| commit | f0d0319ba6c340e680ec612d980061897bf07b4f (patch) | |
| tree | 0476c6142b41cf5780ee159d0e3077a830b82265 /generic | |
| parent | ad2636b7e8114fc8aa5976a17b5e50ef840da416 (diff) | |
| download | tcl-f0d0319ba6c340e680ec612d980061897bf07b4f.zip tcl-f0d0319ba6c340e680ec612d980061897bf07b4f.tar.gz tcl-f0d0319ba6c340e680ec612d980061897bf07b4f.tar.bz2 | |
More places where unsigned quantities should be decared such.
Diffstat (limited to 'generic')
| -rw-r--r-- | generic/tclCompCmdsSZ.c | 2 | ||||
| -rw-r--r-- | generic/tclCompile.h | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclCompCmdsSZ.c b/generic/tclCompCmdsSZ.c index ef9340e..101edbd 100644 --- a/generic/tclCompCmdsSZ.c +++ b/generic/tclCompCmdsSZ.c @@ -2028,7 +2028,7 @@ IssueSwitchChainedTests( int foundDefault; /* Flag to indicate whether a "default" clause * is present. */ JumpFixup *fixupArray; /* Array of forward-jump fixup records. */ - int *fixupTargetArray; /* Array of places for fixups to point at. */ + unsigned int *fixupTargetArray; /* Array of places for fixups to point at. */ int fixupCount; /* Number of places to fix up. */ int contFixIndex; /* Where the first of the jumps due to a group * of continuation bodies starts, or -1 if diff --git a/generic/tclCompile.h b/generic/tclCompile.h index 5b747fe..d5bc86b 100644 --- a/generic/tclCompile.h +++ b/generic/tclCompile.h @@ -928,7 +928,7 @@ typedef enum { typedef struct JumpFixup { TclJumpType jumpType; /* Indicates the kind of jump. */ - int 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. */ int cmdIndex; /* Index of the first command after the one * for which the jump was emitted. Used to |