view old-trunk/lwasm/old/util.c @ 377:55ed7d06b136

Fixed intersection internal references in object target
author lost@starbug
date Mon, 26 Apr 2010 18:37:06 -0600
parents eb230fa7d28e
children
line wrap: on
line source

/*
util.c
Copyright © 2008 William Astle

This file is part of LWASM.

LWASM is free software: you can redistribute it and/or modify it under the
terms of the GNU General Public License as published by the Free Software
Foundation, either version 3 of the License, or (at your option) any later
version.

This program is distributed in the hope that it will be useful, but WITHOUT
ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
more details.

You should have received a copy of the GNU General Public License along with
this program. If not, see <http://www.gnu.org/licenses/>.
*/

/*
Utility functions
*/

#define __util_c_seen__
#include <config.h>
#include <malloc.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>

#include "util.h"

void *lwasm_alloc(int size)
{
	void *ptr;
	
	ptr = malloc(size);
	if (!ptr)
	{
		// bail out; memory allocation error
		fprintf(stderr, "Memory allocation error\n");
		exit(1);
	}
	return ptr;
}

void *lwasm_realloc(void *optr, int size)
{
	void *ptr;
	
	if (size == 0)
	{
		lwasm_free(optr);
		return;
	}
	
	ptr = realloc(optr, size);
	if (!ptr)
	{
		fprintf(stderr, "lwasm_realloc(): memory allocation error\n");
		exit(1);
	}
}

void lwasm_free(void *ptr)
{
	if (ptr)
		free(ptr);
}

char *lwasm_strdup(const char *s)
{
	char *d;
	
	d = strdup(s);
	if (!d)
	{
		fprintf(stderr, "lwasm_strdup(): memory allocation error\n");
		exit(1);
	}
	
	return d;
}