diff options
Diffstat (limited to '04b/in04b')
| -rw-r--r-- | 04b/in04b | 39 |
1 files changed, 23 insertions, 16 deletions
@@ -1,3 +1,6 @@ +:test + return -0x3874f + ; declaration: ; global <type> <name> ; local <type> <name> @@ -10,8 +13,8 @@ ; <lvalue> += <rvalue> ; <lvalue> -= <rvalue> ; <function>(<term>, <term>, ...) -; syscall <term> <term> ... ; return <rvalue> +; string <str> ; byte <number> ; term: ; <var> @@ -22,17 +25,13 @@ ; 0xabc ; lvalue: ; <var> -; *<var> -; <var>[<term>] +; *1 <var> / *2 <var> / *4 <var> / *8 <var> ; rvalue: -; `<string>` ; <var> ; &<var> ; *1 <var> / *2 <var> / *4 <var> / *8 <var> -; <var>[<term>] ; ~<var> ; <function>(<term>, <term>, ...) -; syscall <term>, <term>, ... ; <term> + <term> ; <term> - <term> ; NOTE: *, /, % are signed (imul and idiv) @@ -51,6 +50,12 @@ global x global y ;123 global z +:syscall +function + ; ... + byte 0x0f + byte 0x05 + :strlen function argument s @@ -72,7 +77,7 @@ function argument c local p p = &c - syscall 1 1 p 1 0 0 0 0 + syscall(1, 1, p, 1) return :puts @@ -80,17 +85,17 @@ function argument s local len len = strlen(s) - syscall 1 1 s len 0 0 0 0 + syscall(1, 1, s, len) return :main function - local hello - hello = `Hello, world! -` - puts(hello) - syscall 0x3c 0 0 0 0 0 0 0 - + puts(str_hello_world) + syscall(0x3c, 0) +:str_hello_world +string Hello, world! +byte 10 +byte 0 :f function @@ -103,6 +108,8 @@ function *4p = v if v == 0 goto something *1p = v + 1 - return *2p + v = *2p + return v :something - return *4p + v = *4p + return v |