diff options
author | elioat <elioat@tilde.institute> | 2022-10-11 22:58:44 -0400 |
---|---|---|
committer | elioat <elioat@tilde.institute> | 2022-10-11 22:58:44 -0400 |
commit | 4658e2bc21fc28e030b9f43999a98cd345b795aa (patch) | |
tree | 7bd874e1f2b425e2c0ad02b1806e39fce687c2db | |
parent | cb5d4906734d32d0bd6f0dd294300c2bb121a854 (diff) | |
download | tour-4658e2bc21fc28e030b9f43999a98cd345b795aa.tar.gz |
*
-rw-r--r-- | chibi/print.scm | 2 | ||||
-rw-r--r-- | uxntal/exit.tal | 27 |
2 files changed, 29 insertions, 0 deletions
diff --git a/chibi/print.scm b/chibi/print.scm index 100d2b5..6e6ec99 100644 --- a/chibi/print.scm +++ b/chibi/print.scm @@ -12,3 +12,5 @@ (print "hi there") (prints "kiwi" "banana" "pineapple") + +(print "hi") \ No newline at end of file diff --git a/uxntal/exit.tal b/uxntal/exit.tal new file mode 100644 index 0000000..4e26dd7 --- /dev/null +++ b/uxntal/exit.tal @@ -0,0 +1,27 @@ +( exit ) + +|10 @Console &vector $2 &read $1 &pad $5 &write $1 &error $1 + +|0100 ( -> ) + + ( set vector ) + ;on-console .Console/vector DEO2 + + ( print hello ) + ;hello-txt + + &while + LDAk .Console/write DEO + INC2 LDAk ,&while JCN + POP2 + + ( exit ) + #010f DEO + +BRK + +@on-console ( -> ) + +BRK + +@hello-txt "Hello 20 "Uxn! $1 |