Fix 2014-02-05 safety regression: unchecked use of non-function objects

in some contexts that require functions.

* lib.c (funcall, funcall1, funcall2, funcall3, funcall4):
check type(fun) before dereferencing to see whether there
are optional args.

1 files changed, 9 insertions, 0 deletions

diff --git a/ChangeLog b/ChangeLog
index c6799d32..8476aad0 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,14 @@
 2014-07-27  Kaz Kylheku  <kaz@kylheku.com>
 
+	Fix 2014-02-05 safety regression: unchecked use of non-function objects
+	in some contexts that require functions.
+
+	* lib.c (funcall, funcall1, funcall2, funcall3, funcall4):
+	check type(fun) before dereferencing to see whether there
+	are optional args.
+
+2014-07-27  Kaz Kylheku  <kaz@kylheku.com>
+
 	* eval.c (giterate_func, giterate): New static functions.
 	(eval_init): Registered giterate as intrinsic.