diff options
author | Steve Bennett <steveb@workware.net.au> | 2019-12-13 11:22:26 +1000 |
---|---|---|
committer | Steve Bennett <steveb@workware.net.au> | 2019-12-13 11:23:33 +1000 |
commit | 1f0f424fe611611251694502655b9330fc6c9e7d (patch) | |
tree | 5898969357e47c4cb7e9c72cb7bc395dd1da1208 /jim.c | |
parent | decb1fb49f6578a6fc47348fae618482d5d23bb4 (diff) | |
download | jimtcl-1f0f424fe611611251694502655b9330fc6c9e7d.zip jimtcl-1f0f424fe611611251694502655b9330fc6c9e7d.tar.gz jimtcl-1f0f424fe611611251694502655b9330fc6c9e7d.tar.bz2 |
return: fix -level 0 -code xxx
Should return the given return code, not JIM_RETURN (2)
Reported-by: dbohdan <dbohdan@dbohdan.com>
Signed-off-by: Steve Bennett <steveb@workware.net.au>
Diffstat (limited to 'jim.c')
-rw-r--r-- | jim.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -12981,7 +12981,7 @@ static int Jim_ReturnCoreCommand(Jim_Interp *interp, int argc, Jim_Obj *const *a if (i == argc - 1) { Jim_SetResult(interp, argv[i]); } - return JIM_RETURN; + return level == 0 ? returnCode : JIM_RETURN; } /* [tailcall] */ |