libukcprog/src/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.8 1993/05/30 18:15:09 gjap 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.1
Committed:	Sat Mar 29 16:30:33 2003 UTC (21 years, 8 months ago) by tdb
Content type:	text/plain
Branch:	MAIN
CVS Tags:	LIBUKCPROG_1_0_2, LIBUKCPROG_1_0_1, LIBUKCPROG_1_0, HEAD
Log Message:	libukcprog is now a seperate package. I doubt this will be much use to anyone other than us, but I see no reason why we can't package it up and distribute it. Obviously we can't attach the GPL to this, as we don't own it.
#	Content
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	char ukcprog_realloc_sccsid[] = "$Id: e_realloc.c,v 1.8 1993/05/30 18:15:09 gjap Exp $ UKC";
11
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	}