tnslc/test.tnsl


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21

/; module util
    :include "c_wrap.tnsl"
;/

/; module tnslc
    :include "test2.tnsl"

    /; run (uint argc, ~~uint8 argv) [int]
        {}uint8 c = "asdf"
        return 0
    ;/
;/

tnslc.Try A = {1, 2, 3}

/; raw main (uint argc, ~~uint8 argv) [int]
    # Manually match registers so values are in expected compile registers
    asm "mov r8, rdi"
    asm "mov r9, rsi"
    raw return tnslc.run(argc, argv)
;/