blob: c74ddf9a0e5f7df4d4147bbf01e428f40fae716b (
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
|
:include "c_wrap.tnsl"
:include "vector.tnsl"
/; main (int argc, ~~uint argv) [int]
# On windows, the first two arguments are passed in RCX and RDX, so we need to
# update their positions here or else tnsl will have garbage values in r8 and r9
asm "mov r8, rcx"
asm "mov r9, rdx"
# If on linux, you would use rdi and rsi instead of rcx and rdx, respectively
# simply comment out the bove asm, and uncomment the below lines
# asm "mov r8, rdi"
# asm "mov r9, rsi"
Vector vec
vec.start(1)
int mx = 100
uint8 buf = 0
/; loop (int i = 0; i < mx) [i++]
buf = 'A' + i
vec.push(~buf)
;/
buf = 0
vec.push(~buf)
_printf(vec.dat)
/; loop (int i = 0; i < mx + 1) [i++]
vec.pop()
;/
vec._del()
return 0
;/
|
