Index: trunk/src/comm.c
===================================================================
--- trunk/src/comm.c	(Revision 2312)
+++ trunk/src/comm.c	(Arbeitskopie)
@@ -7622,7 +7622,7 @@
 
         if (arg[2].type != T_STRING && arg[2].type != T_CLOSURE)
         {
-            vefun_bad_arg(3, arg-1);
+            vefun_bad_arg(3, sp);
             /* NOTREACHED */
         }
     }
@@ -7691,7 +7691,7 @@
     if (error_index >= 0)
     {
         free_input_to(it);
-        vefun_bad_arg(error_index, arg-1);
+        vefun_bad_arg(error_index + num_arg - extra + 1, arg-1);
         /* NOTREACHED */
         return arg-1;
     }