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
|
/*
* Copyright © 1988-2004 Keith Packard and Bart Massey.
* All Rights Reserved. See the file COPYING in this directory
* for licensing information.
*/
#include "nickle-config.h"
#include "mem.h"
#include "ref.h"
typedef struct _reference {
DataType *data;
void **object;
} Reference;
static void
ReferenceMark (void *object)
{
ReferencePtr reference = object;
MemReference (*reference->object);
}
static DataType referenceType = { ReferenceMark, 0, "referenceType" };
ReferencePtr
NewReference (void **object)
{
ReferencePtr reference;
reference = MemAllocate (&referenceType, sizeof (Reference));
reference->object = object;
return reference;
}
|
