diff options
author | Steve Bennett <steveb@workware.net.au> | 2010-10-17 16:58:08 +1000 |
---|---|---|
committer | Steve Bennett <steveb@workware.net.au> | 2010-11-17 07:57:37 +1000 |
commit | f86ed51e9b0f38954519ca21a623d27bc7c80a88 (patch) | |
tree | f7e098e29695bb778e1a722a8e48ced6fa14ab59 /jimsh.c | |
parent | b98537c32b9e481fe8b0653efcfeab950f5a8e87 (diff) | |
download | jimtcl-f86ed51e9b0f38954519ca21a623d27bc7c80a88.zip jimtcl-f86ed51e9b0f38954519ca21a623d27bc7c80a88.tar.gz jimtcl-f86ed51e9b0f38954519ca21a623d27bc7c80a88.tar.bz2 |
Add UTF-8 support to regexp
Plus various ARE enhancements and bug fixes
Signed-off-by: Steve Bennett <steveb@workware.net.au>
Diffstat (limited to 'jimsh.c')
-rw-r--r-- | jimsh.c | 3 |
1 files changed, 3 insertions, 0 deletions
@@ -94,6 +94,9 @@ int main(int argc, char *const argv[]) if (argc > 2 && strcmp(argv[1], "-e") == 0) { JimSetArgv(interp, argc - 3, argv + 3); retcode = Jim_Eval(interp, argv[2]); + if (retcode != JIM_ERR) { + printf("%s\n", Jim_GetString(Jim_GetResult(interp), NULL)); + } } else { Jim_SetVariableStr(interp, "argv0", Jim_NewStringObj(interp, argv[1], -1)); |