Fehlermeldung wg. Arraygroesse in execute_anything gefixt.
Fehlermeldung, wenn Array > 2 wurde nie ausgegeben
und es gab keine, wenn das Array zu klein ist.
execute_anythings will genau 2 Element in <fun> haben,
sofern das ein Array ist.
Change-Id: I33e71da2e600dacbf09784018afc65bdae1e931c
diff --git a/std/util/executer.c b/std/util/executer.c
index 4e0f707..0c24a92 100644
--- a/std/util/executer.c
+++ b/std/util/executer.c
@@ -17,13 +17,12 @@
if (stringp(fun))
return call_other(this_object(), fun, args...);
- if ( pointerp(fun) && sizeof(fun)==2 )
+ if ( pointerp(fun))
{
- object ob;
- if (sizeof(fun)>2)
- raise_error(sprintf("execute_anything(): first argument may only "
+ if (sizeof(fun) != 2)
+ raise_error(sprintf("execute_anything(): <fun> argument must "
"have 2 elements if array.\n"));
-
+ object ob;
if ( stringp(fun[0]) )
ob=find_object(fun[0]);
else