From efcc64a8003d79538ffe0e85f91b2d94011c20d0 Mon Sep 17 00:00:00 2001
From: Kaz Kylheku <kaz@kylheku.com>
Date: Tue, 11 Feb 2014 04:30:45 -0800
Subject: * eval.c (apply): Fix regression in dwim operator: not handling nil
 object properly. Since dwim now trivially delegates to apply, apply must
 recognize nil.

---
 eval.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'eval.c')

diff --git a/eval.c b/eval.c
index 13ec8e0c..6024c60b 100644
--- a/eval.c
+++ b/eval.c
@@ -334,7 +334,7 @@ val apply(val fun, val arglist, val ctx_form)
   val arg[32], *p = arg;
   int variadic, fixparam, reqargs, nargs;
 
-  if (symbolp(fun)) {
+  if (fun && symbolp(fun)) {
     val binding = gethash(top_fb, fun);
     if (!binding)
       eval_error(ctx_form, lit("~s: no such function ~s"), car(ctx_form), fun, nao);
-- 
cgit v1.2.3