((code (label main (load-immediate $1 &hello-str) ; load hello string ptr (call &pln ($1) nil) (halt 0)) ; done (label pln (load-immediate $1 &terminal-namespace) ; get terminal device (load-immediate $11 0) (syscall OPEN $1 $1 $11) (load-immediate $3 &new-line) (string-length $2 $0) (syscall WRITE $1 $0 $2) (string-length $4 $3) (syscall WRITE $1 $3 $4) (return nil))) (data (label terminal-namespace "/dev/term/0") (label new-line "\n") (label hello-str "nuqneH 'u'?")))