summaryrefslogtreecommitdiff
path: root/tnslc/tnslc_wrapped.tnsl
blob: f93c3c4cf4ebcac0f95a7a47b51c66da4223c945 (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
:include "c_wrap.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)
    uint8 a = 97
    vec.push(~a)
    vec.push(~a)
    vec.push(~a)
    vec.push(~a)
    a = 0
    vec.push(~a)
    _printf(vec.dat)
    vec.clean()
    return a
;/