ihost/libukcprog/e_realloc.c

/*  e_realloc() -- Error checking realloc. */

/*  Copyright 1992  Godfrey Paul, University of Kent at Canterbury.
 *
 *  You can do what you like with this source code as long as
 *  you don't try to make money out of it and you include an
 *  unaltered copy of this message (including the copyright).
 */

char ukcprog_realloc_sccsid[] = "$Id: e_realloc.c,v 1.1 2002/03/08 14:37:29 tdb Exp $ UKC";

#ifndef __STDC__
#include <sys/types.h>  /* for size_t */
#endif

#include <stdio.h>      /* for NULL */
#include <stdlib.h>

#include "ukcprog.h"


voidptr
e_realloc(old, size)
voidptr old;
size_t size;
{
        char *new;

        if (old == NULL)
                return e_malloc(size);

        if (size == 0) {
                free(old);
                return NULL;
        }
                
        if ((new = realloc(old, (size_t)size)) == NULL)
                panic("realloc failed in e_realloc");

        return new;
}
Revision:	1.2
Committed:	Sat Mar 29 18:05:09 2003 UTC (21 years, 8 months ago) by tdb
Content type:	text/plain
Branch:	MAIN
CVS Tags:	HEAD
Changes since 1.1:	+1 -1 lines
State:	*FILE REMOVED*
Log Message:	ihost now makes use of an external copy of libukcprog. This is available as a seperate download. All files updated accordingly to make this version 1.5.4.
#	User	Rev	Content
1	tdb	1.1	/* e_realloc() -- Error checking realloc. */
2
3			/* Copyright 1992 Godfrey Paul, University of Kent at Canterbury.
4			*
5			* You can do what you like with this source code as long as
6			* you don't try to make money out of it and you include an
7			* unaltered copy of this message (including the copyright).
8			*/
9
10	tdb	1.2	char ukcprog_realloc_sccsid[] = "$Id: e_realloc.c,v 1.1 2002/03/08 14:37:29 tdb Exp $ UKC";
11	tdb	1.1
12			#ifndef __STDC__
13			#include <sys/types.h> /* for size_t */
14			#endif
15
16			#include <stdio.h> /* for NULL */
17			#include <stdlib.h>
18
19			#include "ukcprog.h"
20
21
22			voidptr
23			e_realloc(old, size)
24			voidptr old;
25			size_t size;
26			{
27			char *new;
28
29			if (old == NULL)
30			return e_malloc(size);
31
32			if (size == 0) {
33			free(old);
34			return NULL;
35			}
36
37			if ((new = realloc(old, (size_t)size)) == NULL)
38			panic("realloc failed in e_realloc");
39
40			return new;
41			}