aboutsummaryrefslogtreecommitdiff
path: root/jim.c
diff options
context:
space:
mode:
authoroharboe <oharboe>2009-08-16 11:28:04 +0000
committeroharboe <oharboe>2009-08-16 11:28:04 +0000
commit808b8d47019d86752476027832bf47b25d0863ee (patch)
treeefeea93a5f54eae926055b0be6f99ed646c68b1d /jim.c
parentf754beb04b7c2aa88422aa42c6353f997bf523bc (diff)
downloadjimtcl-808b8d47019d86752476027832bf47b25d0863ee.zip
jimtcl-808b8d47019d86752476027832bf47b25d0863ee.tar.gz
jimtcl-808b8d47019d86752476027832bf47b25d0863ee.tar.bz2
2009-08-16 Steve Bennett <steveb@workware.net.au>
* jim.c: Some recursion in unknown is OK, just not infinite recursion.
Diffstat (limited to 'jim.c')
-rw-r--r--jim.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/jim.c b/jim.c
index a1c1f63..06db29f 100644
--- a/jim.c
+++ b/jim.c
@@ -8348,10 +8348,10 @@ static int JimUnknown(Jim_Interp *interp, int argc, Jim_Obj *const *argv)
Jim_Obj **v, *sv[JIM_EVAL_SARGV_LEN];
int retCode;
- /* If JimUnknown() is recursively called (e.g. error in the unknown proc,
+ /* If JimUnknown() is recursively called too many times...
* done here
*/
- if (interp->unknown_called) {
+ if (interp->unknown_called > 50) {
return JIM_ERR;
}