extern int *islandid2arch;
+#define NEW(ptr) ((ptr)= mmalloc(sizeof(*ptr)))
+
+#define MCALLOC(array, count) ((array)= mcalloc(sizeof(*(array)) * (count)))
+
+#define MCALLOC_INITEACH(array, count, init_this) ({ \
+ MCALLOC((array), (count)); \
+ int initi; \
+ typeof(&(array)[0]) this; \
+ for (initi=0, this=(array); initi<(count); initi++, this++) { \
+ init_this; \
+ } \
+ })
+
+
#define ONDEMAND(pointer_lvalue, calloc_size_count) \
((pointer_lvalue) ? : \
((pointer_lvalue) = mcalloc(sizeof(*(pointer_lvalue)) * calloc_size_count)))