diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2017-01-04 14:05:20 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2017-01-04 14:05:20 (GMT) |
| commit | 1297b4be9b37d8c39cb9bd2f8451c1b69bc6fa13 (patch) | |
| tree | 690246b6abf3458ded10e0293e2c086f894d77ef /generic/tclCmdMZ.c | |
| parent | 328461c6cf73105f97aee07048a22741b4d2cc2b (diff) | |
| parent | 6c67fa6248b76a800bbd47bdc27bfec84e1f0de4 (diff) | |
| download | tcl-1297b4be9b37d8c39cb9bd2f8451c1b69bc6fa13.zip tcl-1297b4be9b37d8c39cb9bd2f8451c1b69bc6fa13.tar.gz tcl-1297b4be9b37d8c39cb9bd2f8451c1b69bc6fa13.tar.bz2 | |
Merge trunk. First steps in eliminating "source -nopkg". Some test-cases still fail.
Diffstat (limited to 'generic/tclCmdMZ.c')
| -rw-r--r-- | generic/tclCmdMZ.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclCmdMZ.c b/generic/tclCmdMZ.c index c06b197..fbc9d8f 100644 --- a/generic/tclCmdMZ.c +++ b/generic/tclCmdMZ.c @@ -4179,7 +4179,7 @@ TclNRTryObjCmd( } info[0] = objv[i]; /* type */ - TclNewIntObj(info[1], code); /* returnCode */ + TclNewLongObj(info[1], code); /* returnCode */ if (info[2] == NULL) { /* errorCodePrefix */ TclNewObj(info[2]); } |