From fc7a0e0f5fdd427bdbdb2d0669ef3a0c46d292d4 Mon Sep 17 00:00:00 2001 From: Steve Bennett Date: Wed, 8 Jun 2011 15:41:05 +1000 Subject: Allow [info complete] to determine the missing char Signed-off-by: Steve Bennett --- jim.c | 10 +++++++--- 1 file changed, 7 insertions(+), 3 deletions(-) (limited to 'jim.c') diff --git a/jim.c b/jim.c index 52e42d3..776b91b 100644 --- a/jim.c +++ b/jim.c @@ -13611,15 +13611,19 @@ static int Jim_InfoCoreCommand(Jim_Interp *interp, int argc, Jim_Obj *const *arg } case INFO_COMPLETE: - if (argc != 3) { - Jim_WrongNumArgs(interp, 2, argv, "script"); + if (argc != 3 && argc != 4) { + Jim_WrongNumArgs(interp, 2, argv, "script ?missing?"); return JIM_ERR; } else { int len; const char *s = Jim_GetString(argv[2], &len); + char missing = '\0'; - Jim_SetResultBool(interp, Jim_ScriptIsComplete(s, len, NULL)); + Jim_SetResultBool(interp, Jim_ScriptIsComplete(s, len, &missing)); + if (missing && argc == 4) { + Jim_SetVariable(interp, argv[3], Jim_NewStringObj(interp, &missing, 1)); + } } break; -- cgit v1.1