Mercurial > hg > xemacs-beta

diff src/eval.c @ 4104:23d7fde3d773
[xemacs-hg @ 2007-08-08 14:54:41 by aidan] Merge a bug fix from Sebastian Freundt's SXEmacs work.
author: aidan
date: Wed, 08 Aug 2007 14:54:43 +0000
parents: f9a0570637f3
children: 8f6a825eb3d3
--- a/src/eval.c	Tue Aug 07 23:09:22 2007 +0000
+++ b/src/eval.c	Wed Aug 08 14:54:43 2007 +0000
@@ -3799,7 +3799,12 @@
 	  goto invalid_function;
 	}
     }
-  else /* ! (SUBRP (fun) || COMPILED_FUNCTIONP (fun) || CONSP (fun)) */
+  else if (UNBOUNDP (fun))
+    {
+      val = signal_void_function_error (original_fun);
+    }
+  else /* ! (SUBRP (fun) || COMPILED_FUNCTIONP (fun) || CONSP (fun)
+             UNBOUNDP (fun)) */
     {
     invalid_function:
       val = signal_invalid_function_error (fun);