51 lines
885 B
C
51 lines
885 B
C
#ifndef lint
|
|
static char rcsid[] = "$Id: alloc.c,v 1.2 1993/08/02 17:19:10 mycroft Exp $";
|
|
#endif /* not lint */
|
|
|
|
#ifdef LINT
|
|
|
|
/*
|
|
a ridiculous definition, suppressing
|
|
"possible pointer alignment problem" for (long *) malloc()
|
|
"enlarg defined but never used"
|
|
"ftell defined (in <stdio.h>) but never used"
|
|
from lint
|
|
*/
|
|
#include <stdio.h>
|
|
long *
|
|
alloc(n) unsigned n; {
|
|
long dummy = ftell(stderr);
|
|
if(n) dummy = 0; /* make sure arg is used */
|
|
return(&dummy);
|
|
}
|
|
|
|
#else
|
|
|
|
extern char *malloc();
|
|
extern char *realloc();
|
|
|
|
long *
|
|
alloc(lth)
|
|
register unsigned lth;
|
|
{
|
|
register char *ptr;
|
|
|
|
if(!(ptr = malloc(lth)))
|
|
panic("Cannot get %d bytes", lth);
|
|
return((long *) ptr);
|
|
}
|
|
|
|
long *
|
|
enlarge(ptr,lth)
|
|
register char *ptr;
|
|
register unsigned lth;
|
|
{
|
|
register char *nptr;
|
|
|
|
if(!(nptr = realloc(ptr,lth)))
|
|
panic("Cannot reallocate %d bytes", lth);
|
|
return((long *) nptr);
|
|
}
|
|
|
|
#endif LINT
|