undar-lang/test/hello.asm.lisp

11 lines
217 B
Common Lisp

((code
(label main
(load $0 &terminal-str)
(load $1 &hello-str)
(strlen $2 $1)
(syscall DEVICE_WRITE $0 $1 $2)
(halt)))
(data
(label terminal-str "/dev/term/0")
(label hello-str "nuqneH 'u'?")))