mirror of
https://github.com/Unidata/netcdf-c.git
synced 2024-12-15 08:30:11 +08:00
50 lines
1.1 KiB
C
50 lines
1.1 KiB
C
/*********************************************************************
|
|
* Copyright 2018, UCAR/Unidata
|
|
* See netcdf/COPYRIGHT file for copying and redistribution conditions.
|
|
* $Header: /upc/share/CVS/netcdf-3/nctest/emalloc.c,v 1.11 2006/10/31 16:21:56 ed Exp $
|
|
*********************************************************************/
|
|
|
|
/*LINTLIBRARY*/
|
|
#include <config.h>
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include "error.h"
|
|
#include "emalloc.h"
|
|
|
|
void *
|
|
emalloc (size_t size) /* check return from malloc */
|
|
{
|
|
void *p;
|
|
|
|
if (size > (unsigned long)32767) {
|
|
error ("absurd arg to emalloc: %lu", (unsigned long) size);
|
|
return 0;
|
|
}
|
|
if (size == 0)
|
|
return 0;
|
|
p = (void *) malloc (size);
|
|
if (p == 0) {
|
|
error ("out of memory\n");
|
|
exit (1);
|
|
}
|
|
return p;
|
|
}
|
|
|
|
void *
|
|
erealloc (void *ptr, size_t size) /* check return from realloc */
|
|
{
|
|
void *p;
|
|
|
|
if (size > (unsigned long)32767) {
|
|
error ("absurd arg to erealloc %lu", (unsigned long) size);
|
|
return 0;
|
|
}
|
|
p = (void *) realloc (ptr, size);
|
|
|
|
if (p == 0) {
|
|
error ("out of memory");
|
|
exit(1);
|
|
}
|
|
return p;
|
|
}
|