diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-05-06 13:22:05 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-05-06 13:22:05 (GMT) |
| commit | c5e55206a201b155a055c3b6ebeb1bf592cc7f21 (patch) | |
| tree | d00dd2bafc0ca8c0db2d5689457cfd7ba17963f8 /generic/tclOptimize.c | |
| parent | 7adecdbf4a328b9f39774d0323a64886c1f160b3 (diff) | |
| parent | 391948de408337582c0f29f4f897e1d0d5d96fcc (diff) | |
| download | tcl-c5e55206a201b155a055c3b6ebeb1bf592cc7f21.zip tcl-c5e55206a201b155a055c3b6ebeb1bf592cc7f21.tar.gz tcl-c5e55206a201b155a055c3b6ebeb1bf592cc7f21.tar.bz2 | |
Merge 8.6
Diffstat (limited to 'generic/tclOptimize.c')
| -rw-r--r-- | generic/tclOptimize.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclOptimize.c b/generic/tclOptimize.c index 095e6c5..4383c62 100644 --- a/generic/tclOptimize.c +++ b/generic/tclOptimize.c @@ -34,7 +34,7 @@ static void TrimUnreachable(CompileEnv *envPtr); #define AddrLength(address) \ (tclInstructionTable[*(unsigned char *)(address)].numBytes) #define InstLength(instruction) \ - (tclInstructionTable[(unsigned char)(instruction)].numBytes) + (tclInstructionTable[UCHAR(instruction)].numBytes) /* * ---------------------------------------------------------------------- |