aboutsummaryrefslogtreecommitdiff
path: root/jimsh.c
diff options
context:
space:
mode:
authoroharboe <oharboe>2009-08-16 11:34:12 +0000
committerSteve Bennett <steveb@workware.net.au>2010-10-15 11:00:49 +1000
commitc9020ce22a2f30a4b9edec824c60ce6ccc82e000 (patch)
treee307b320366fa4b8b6b22420e42bcb7c709dced3 /jimsh.c
parent967a750049569029258f3e792b52ebf86b56ae4e (diff)
downloadjimtcl-c9020ce22a2f30a4b9edec824c60ce6ccc82e000.zip
jimtcl-c9020ce22a2f30a4b9edec824c60ce6ccc82e000.tar.gz
jimtcl-c9020ce22a2f30a4b9edec824c60ce6ccc82e000.tar.bz2
Fix exit code from jimsh
A script exiting with 'exit 0' would not give a return code of 0 Signed-off-by: Steve Bennett <steveb@workware.net.au>
Diffstat (limited to 'jimsh.c')
-rw-r--r--jimsh.c9
1 files changed, 9 insertions, 0 deletions
diff --git a/jimsh.c b/jimsh.c
index 222393c..67a4119 100644
--- a/jimsh.c
+++ b/jimsh.c
@@ -163,6 +163,15 @@ int main(int argc, char *const argv[])
Jim_PrintErrorMessage(interp);
}
}
+ if (retcode == JIM_OK) {
+ retcode = 0;
+ }
+ else if (retcode == JIM_EXIT) {
+ retcode = interp->exitCode;
+ }
+ else {
+ retcode = 1;
+ }
Jim_FreeInterp(interp);
return retcode;
}