summaryrefslogtreecommitdiff
path: root/tnslc/simple.tnsl
blob: cd17121bd10eaa74ccbf4783757c801cc878f9f0 (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
37
38
39
40
41
42
43

{}uint8 str1 = "abcd"
{}uint8 str2 = "abcd"

/; method Test
    /; mamba [int]
        return 0
    ;/

    /; wamba [int]
        return self.i + self.j + self.mamba()
    ;/
;/

struct Test {
    int i, j, k
}

/; 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"

    Test m
    ~int j = ~m.i
    ~~int i = ~j
    i{0}{1} = 3

    /; if (argc > 8)
        argc = 90
    ;/

    m.i = argc

    # return 3
    return m.wamba()
;/