1 | #pragma once |
---|
2 | |
---|
3 | #include <stdbool.h> |
---|
4 | #include <stdint.h> |
---|
5 | |
---|
6 | struct gcpointer_t |
---|
7 | { |
---|
8 | intptr_t ptr; |
---|
9 | struct gcpointer_t* next; |
---|
10 | }; |
---|
11 | |
---|
12 | void gcpointer_ctor(gcpointer_t* this); |
---|
13 | void gcpointer_ctor(gcpointer_t* this, void* address); |
---|
14 | void gcpointer_ctor(gcpointer_t* this, gcpointer_t* other); |
---|
15 | void gcpointer_dtor(gcpointer_t* this); |
---|
16 | gcpointer_t* gcpointer_assign(gcpointer_t* this, gcpointer_t* rhs); |
---|
17 | |
---|
18 | //Logical operators |
---|
19 | bool gcpointer_equal(gcpointer_t* this, gcpointer_t* rhs); |
---|
20 | bool gcpointer_not_equal(gcpointer_t* this, gcpointer_t* rhs); |
---|
21 | bool gcpointer_null(gcpointer_t* this); |
---|
22 | |
---|
23 | forall(otype T) |
---|
24 | struct gcpointer |
---|
25 | { |
---|
26 | gcpointer_t internal; |
---|
27 | }; |
---|
28 | |
---|
29 | forall(otype T) |
---|
30 | static inline void ctor(gcpointer(T)* this) |
---|
31 | { |
---|
32 | gcpointer_ctor(&this->internal); |
---|
33 | } |
---|
34 | |
---|
35 | // forall(otype T) |
---|
36 | // static inline void ctor(gcpointer(T)* this, int null) |
---|
37 | // { |
---|
38 | // gcpointer_ctor(&this->internal, NULL); |
---|
39 | // } |
---|
40 | |
---|
41 | forall(otype T) |
---|
42 | static inline void ctor(gcpointer(T)* this, void* address) |
---|
43 | { |
---|
44 | gcpointer_ctor(&this->internal, address); |
---|
45 | } |
---|
46 | |
---|
47 | forall(otype T) |
---|
48 | static inline void ctor(gcpointer(T)* this, gcpointer(T)* other) |
---|
49 | { |
---|
50 | gcpointer_ctor(&this->internal, other); |
---|
51 | } |
---|
52 | |
---|
53 | forall(otype T) |
---|
54 | static inline void dtor(gcpointer(T)* this) |
---|
55 | { |
---|
56 | gcpointer_dtor(&this->internal); |
---|
57 | } |
---|
58 | |
---|
59 | forall(otype T) |
---|
60 | static inline gcpointer(T)* ?=?(gcpointer(T)* this, gcpointer(T)* rhs) |
---|
61 | { |
---|
62 | gcpointer_assign(&this->internal, &rhs->internal); |
---|
63 | return this; |
---|
64 | } |
---|
65 | |
---|
66 | forall(otype T) |
---|
67 | static inline T *?(gcpointer(T) this) |
---|
68 | { |
---|
69 | return *(T*)this.internal.ptr; |
---|
70 | } |
---|
71 | |
---|
72 | //Logical operators |
---|
73 | forall(otype T) |
---|
74 | static inline int ?!=?(gcpointer(T) this, gcpointer(T) rhs) |
---|
75 | { |
---|
76 | return this.internal.ptr != rhs.internal.ptr; |
---|
77 | } |
---|
78 | |
---|
79 | forall(otype T) |
---|
80 | static inline int ?==?(gcpointer(T) this, gcpointer(T) rhs) |
---|
81 | { |
---|
82 | return !(this == rhs); |
---|
83 | } |
---|
84 | |
---|
85 | forall(otype T) |
---|
86 | extern struct gcpointer(T) 0; |
---|