Index: /trunk/Ohana/src/libohana/include/ohana_allocate.h
===================================================================
--- /trunk/Ohana/src/libohana/include/ohana_allocate.h	(revision 11065)
+++ /trunk/Ohana/src/libohana/include/ohana_allocate.h	(revision 11066)
@@ -23,4 +23,5 @@
   if ((N) >= (S)) { S += D; \
   X = (T *) ohana_realloc(__FILE__, __LINE__, X, (S), sizeof(T)); }
+# define FREE(X) if (X != NULL) { ohana_free (__FILE__, __LINE__, X); }
 # define free(X) ohana_free(__FILE__, __LINE__, X)
 
@@ -49,4 +50,5 @@
       fprintf(stderr,"failed realloc increment at %d in %s\n", __LINE__, __FILE__);\
       exit (10); } }
+# define FREE(X) if (X != NULL) { free (X); }
 # endif /* ALLOCATE */