X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=dfa%2Fimalloc.c;h=8c15b7e3201bb35a1e8268ab73c3979a2b1225b0;hb=85df66537199c30a492ad54be4fbe25fa77e18c8;hp=7e9ec7186bd504b2973f5631611c54a44ea7f79e;hpb=f47681a8ea1b2374df333fb2993d8026558efd27;p=idzebra-moved-to-github.git diff --git a/dfa/imalloc.c b/dfa/imalloc.c index 7e9ec71..8c15b7e 100644 --- a/dfa/imalloc.c +++ b/dfa/imalloc.c @@ -4,7 +4,13 @@ * Sebastian Hammer, Adam Dickmeiss * * $Log: imalloc.c,v $ - * Revision 1.2 1994-09-26 16:30:56 adam + * Revision 1.4 1995-09-04 12:33:26 adam + * Various cleanup. YAZ util used instead. + * + * Revision 1.3 1994/09/27 16:31:19 adam + * First version of grepper: grep with error correction. + * + * Revision 1.2 1994/09/26 16:30:56 adam * Minor changes. imalloc uses xmalloc now. * * Revision 1.1 1994/09/26 10:16:54 adam @@ -16,7 +22,7 @@ #include #include -#include +#include #include "imalloc.h" #ifdef MEMDEBUG @@ -36,7 +42,7 @@ void *imalloc (size_t size) size_t words = (4*sizeof(unsigned) -1 + size)/sizeof(unsigned); char *p = (char *)xmalloc( words*sizeof(unsigned) ); if( !p ) - log (LOG_FATAL, "No memory: imalloc(%u); c/f %d/%d; %ld/%ld", + logf (LOG_FATAL, "No memory: imalloc(%u); c/f %d/%d; %ld/%ld", size, alloc_calls, free_calls, alloc, max_alloc ); *((unsigned *)p) = size; ((unsigned *)p)[1] = MAG1; @@ -50,7 +56,7 @@ void *imalloc (size_t size) #else void *p = (void *)xmalloc( size ); if( !p ) - log (LOG_FATAL, "Out of memory (imalloc)" ); + logf (LOG_FATAL, "Out of memory (imalloc)" ); return p; #endif } @@ -61,7 +67,7 @@ void *icalloc (size_t size) unsigned words = (4*sizeof(unsigned) -1 + size)/sizeof(unsigned); char *p = (char *) xcalloc( words*sizeof(unsigned), 1 ); if( !p ) - log (LOG_FATAL, "No memory: icalloc(%u); c/f %d/%d; %ld/%ld", + logf (LOG_FATAL, "No memory: icalloc(%u); c/f %d/%d; %ld/%ld", size, alloc_calls, free_calls, alloc, max_alloc ); ((unsigned *)p)[0] = size; ((unsigned *)p)[1] = MAG1; @@ -73,9 +79,9 @@ void *icalloc (size_t size) ++alloc_calls; return (void *)p; #else - void p = (void) xcalloc( size, 1 ); + void *p = (void) xcalloc( size, 1 ); if( !p ) - log (LOG_FATAL, "Out of memory (icalloc)" ); + logf (LOG_FATAL, "Out of memory (icalloc)" ); return p; #endif } @@ -89,14 +95,14 @@ void i_free (void *p) ++free_calls; size = (-2)[(unsigned *) p]; if( (-1)[(unsigned *) p] != MAG1 ) - log (LOG_FATAL,"Internal: ifree(%u) magic 1 corrupted", size ); + logf (LOG_FATAL,"Internal: ifree(%u) magic 1 corrupted", size ); if( size[(unsigned char *) p] != MAG2 ) - log (LOG_FATAL,"Internal: ifree(%u) magic 2 corrupted", size ); + logf (LOG_FATAL,"Internal: ifree(%u) magic 2 corrupted", size ); if( (size+1)[(unsigned char *) p] != MAG3 ) - log (LOG_FATAL,"Internal: ifree(%u) magic 3 corrupted", size ); + logf (LOG_FATAL,"Internal: ifree(%u) magic 3 corrupted", size ); alloc -= size; if( alloc < 0L ) - log (LOG_FATAL,"Internal: ifree(%u) negative alloc.", size ); + logf (LOG_FATAL,"Internal: ifree(%u) negative alloc.", size ); xfree( (unsigned *) p-2 ); } #else