--- libaitrpc/src/srv.c	2012/05/15 22:47:10	1.9.2.7
+++ libaitrpc/src/srv.c	2012/05/16 07:15:45	1.9.2.8
@@ -3,7 +3,7 @@
 *  by Michael Pounov <misho@openbsd-bg.org>
 *
 * $Author: misho $
-* $Id: srv.c,v 1.9.2.7 2012/05/15 22:47:10 misho Exp $
+* $Id: srv.c,v 1.9.2.8 2012/05/16 07:15:45 misho Exp $
 *
 **************************************************************************
 The ELWIX and AITNET software is distributed under the following
@@ -140,7 +140,8 @@ execCall(sched_task_t *task)
 			rpc->call_rep.eno = RPC_ERROR(rpc_Errno);
 			return NULL;
 		}
-	}
+	} else
+		arr = NULL;
 
 	if (!(f = rpc_srv_getCall(s, ntohs(rpc->call_tag)))) {
 		rpc_SetErr(EPROGUNAVAIL, "Function not found at RPC server");
@@ -160,8 +161,10 @@ execCall(sched_task_t *task)
 				/* without reply */
 				io_clrVars(f->func_vars);
 				rpc->call_argc ^= rpc->call_argc;
-			} else
+			} else {
+				/* reply */
 				rpc->call_argc = htons(io_arraySize(f->func_vars));
+			}
 		}
 	}