diff options
Diffstat (limited to 'tests/programs/arena.zc')
| -rw-r--r-- | tests/programs/arena.zc | 25 |
1 files changed, 14 insertions, 11 deletions
diff --git a/tests/programs/arena.zc b/tests/programs/arena.zc index 5156b80..4ca7e7c 100644 --- a/tests/programs/arena.zc +++ b/tests/programs/arena.zc @@ -1,16 +1,19 @@ +namespace; +include rt; + // the bump arena: interior pointers, a rewind, and a full bump. fn main() { - let a = arena_new(32), p, q, r; - p = arena_alloc(a, 4); + let a = rt.arena_new(32), p, q, r; + p = rt.arena_alloc(a, 4); p[0] = 7; - q = arena_alloc(a, 4); - put_n(q - p); put_c(' '); - put_n(p[0]); put_c(' '); - put_n(q[0]); put_c(' '); - arena_reset(a); - r = arena_alloc(a, 4); - put_n(r == p); put_c(' '); - put_n(arena_alloc(a, 100) == 0); put_c(10); - free(d*a); + q = rt.arena_alloc(a, 4); + rt.put_n(q - p); rt.put_c(' '); + rt.put_n(p[0]); rt.put_c(' '); + rt.put_n(q[0]); rt.put_c(' '); + rt.arena_reset(a); + r = rt.arena_alloc(a, 4); + rt.put_n(r == p); rt.put_c(' '); + rt.put_n(rt.arena_alloc(a, 100) == 0); rt.put_c(10); + rt.free(d*a); return 0; } |