Subversion Repositories DevTools

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
263 dpurdie 1 
/*
2 
	CPP V5 -- Memory management routines.
3 
 
4 
	source:  mem.c
5 
	started: September 20, 1985
6 
	version: October 15, 1987; March 24, 1988
7 
 
8 
	Written by Edward K. Ream.
9 
	This software is in the public domain.
10 
 
11 
	See the read.me file for disclaimer and other information.
12 
*/
13 
 
14 
#include "cpp.h"
15 
#if defined(MICRO_SOFT) || defined(__WATCOMC__)
16 
#include <malloc.h>
17 
#else
18 
#include <alloc.h>
19 
#endif
20 
 
21 
/* Define local data structures. */
22 
static long m_tot = 0;	/* Total number of bytes allocated.	*/
23 
 
24 
/*
25 
	Allocate n bytes using calloc(), assumed to get memory from system
26 
 
27 
	The returned memory IS zeroed.
28 
*/
29 
void *
30 
m_alloc(n)
31 
int n;
32 
{
33 
	register char *p;
34 
 
35 
	TRACEP("m_alloc", printf("(%d): ", n));
36 
 
37 
	/* Align the request. */
38 
	while (n & (sizeof(short int)-1) ) {
39 
		n++;
40 
	}
41 
 
42 
	p = calloc(1, (unsigned) n);
43 
	if (p == NULL) {
44 
		printf("sorry, out of memory\n");
45 
		m_stat();
46 
		exit(BAD_EXIT);
47 
	}
48 
 
49 
	/* Update statistics. */
50 
	m_tot += (long) n;
51 
 
52 
	TRACEN("m_alloc", printf("returns %p\n", p));
53 
	return p;
54 
}
55 
 
56 
/*
57 
	Free memory allocated by m_alloc().
58 
*/
59 
void
60 
m_free(p)
61 
void *p;
62 
{
63 
	TRACEP("m_free", printf("(%p)\n", p));
64 
 
65 
	if (p == NULL) {
66 
		syserr("m_free: trying to free a NULL pointer.");
67 
	}
68 
	else {
69 
		free(p);
70 
	}
71 
}
72 
 
73 
/*
74 
	Print statistics about memory manager.
75 
*/
76 
void
77 
m_stat()
78 
{
79 
	TRACEP("m_stat", printf("m_tot: %ld (0x%lx)\n", m_tot, m_tot));
80 
}