1
0
mirror of https://frontier.innolan.net/rainlance/amiga-tz.git synced 2025-12-08 18:22:32 +00:00

const work

SCCS-file: ialloc.c
SCCS-SID: 8.18
This commit is contained in:
Arthur David Olson
1989-02-20 20:44:12 -05:00
committed by Paul Eggert
parent 871f69cf66
commit 709020d7e9

View File

@ -27,6 +27,7 @@ void ifree P((char * pointer));
char *
imalloc(n)
const int n;
{
#ifdef MAL
register char * result;
@ -40,6 +41,8 @@ imalloc(n)
char *
icalloc(nelem, elsize)
int nelem;
int elsize;
{
if (nelem == 0 || elsize == 0)
nelem = elsize = 1;
@ -48,7 +51,8 @@ icalloc(nelem, elsize)
char *
irealloc(pointer, size)
char * pointer;
char * const pointer;
const int size;
{
if (NULLMAL(pointer))
return imalloc(size);
@ -57,8 +61,8 @@ char * pointer;
char *
icatalloc(old, new)
char * old;
const char * new;
char * const old;
const char * const new;
{
register char * result;
register oldsize, newsize;
@ -77,14 +81,14 @@ const char * new;
char *
icpyalloc(string)
const char * string;
const char * const string;
{
return icatalloc((char *) NULL, string);
}
void
ifree(p)
char * p;
char * const p;
{
if (!NULLMAL(p))
(void) free(p);
@ -92,7 +96,7 @@ char * p;
void
icfree(p)
char * p;
char * const p;
{
if (!NULLMAL(p))
(void) free(p);