--- libaitio/inc/aitio.h	2011/05/03 14:59:01	1.8.2.5
+++ libaitio/inc/aitio.h	2011/05/03 15:08:45	1.8.2.6
@@ -3,7 +3,7 @@
 *  by Michael Pounov <misho@elwix.org>
 *
 * $Author: misho $
-* $Id: aitio.h,v 1.8.2.5 2011/05/03 14:59:01 misho Exp $
+* $Id: aitio.h,v 1.8.2.6 2011/05/03 15:08:45 misho Exp $
 *
 **************************************************************************
 The ELWIX and AITNET software is distributed under the following
@@ -259,6 +259,10 @@ int io_arrayVacuum(array_t * __restrict arr, int fromW
 #define io_arraySet(_arr, _d, _ptr)	do { \
 						assert(_arr && _arr->arr_num > _d); \
 						*(_arr->arr_data + _d) = (void*) _ptr; \
+					} while (0)
+#define io_arrayDel(_arr, _d)		do { \
+						assert(_arr && _arr->arr_num > _d); \
+						*(_arr->arr_data + _d) = NULL; \
 					} while (0)
 
 /*