diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-03-29 10:37:35 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-03-29 10:37:35 (GMT) |
| commit | 432fbdc37562b215a1955ebc8c5af4aadd24315a (patch) | |
| tree | 9d2b39b23907040168cf9a5971250dfb2288a196 /generic/tclOptimize.c | |
| parent | 52015b6d7bd6f89ac7083fff270c15e7df5b19ec (diff) | |
| download | tcl-432fbdc37562b215a1955ebc8c5af4aadd24315a.zip tcl-432fbdc37562b215a1955ebc8c5af4aadd24315a.tar.gz tcl-432fbdc37562b215a1955ebc8c5af4aadd24315a.tar.bz2 | |
More progress
Diffstat (limited to 'generic/tclOptimize.c')
| -rw-r--r-- | generic/tclOptimize.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclOptimize.c b/generic/tclOptimize.c index 2fcc8e1..9341336 100644 --- a/generic/tclOptimize.c +++ b/generic/tclOptimize.c @@ -129,13 +129,13 @@ LocateTargetAddresses( ExceptionRange *rangePtr = &envPtr->exceptArrayPtr[i]; if (rangePtr->type == CATCH_EXCEPTION_RANGE) { - targetInstPtr = envPtr->codeStart + (int)rangePtr->catchOffset; + targetInstPtr = envPtr->codeStart + rangePtr->catchOffset; DefineTargetAddress(tablePtr, targetInstPtr); } else { - targetInstPtr = envPtr->codeStart + (int)rangePtr->breakOffset; + targetInstPtr = envPtr->codeStart + rangePtr->breakOffset; DefineTargetAddress(tablePtr, targetInstPtr); if (rangePtr->continueOffset != TCL_INDEX_NONE) { - targetInstPtr = envPtr->codeStart + (int)rangePtr->continueOffset; + targetInstPtr = envPtr->codeStart + rangePtr->continueOffset; DefineTargetAddress(tablePtr, targetInstPtr); } } |