blob: 88623964a0a3944e916434f1d17abe3f84e90427 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
|
/*
* This file is part of libdyn.a, the C Dynamic Object library. It
* contains the source code for the functions DynCreate() and
* DynDestroy().
*
* There are no restrictions on this code; however, if you make any
* changes, I request that you document them so that I do not get
* credit or blame for your modifications.
*
* Written by Barr3y Jaspan, Student Information Processing Board (SIPB)
* and MIT-Project Athena, 1989.
*/
#include <stdio.h>
#include "dynP.h"
#ifndef DEFAULT_INC
#define DEFAULT_INC 100
#endif
static int default_increment = DEFAULT_INC;
DynObject DynCreate(el_size, inc)
int el_size, inc;
{
DynObject obj;
obj = (DynObject) malloc(sizeof(DynObjectRec));
if (obj == NULL)
return NULL;
obj->array = (DynPtr) malloc(0);
obj->el_size = el_size;
obj->num_el = obj->size = 0;
obj->debug = obj->paranoid = 0;
obj->inc = (!! inc) ? inc : default_increment;
return obj;
}
int DynDestroy(obj)
DynObject obj;
{
free(obj->array);
free(obj);
return DYN_OK;
}
|
