shorter string printing routine ^^ shaved 3 bytes @neauoire
@str/<print>/>loop ( str* x -- str* )
#18 DEO
INC2
( >> )
@str/<print> ( str* -- )
LDAk DUP ?/<print>/>loop POP
POP2 JMP2r
trick is to remove the immediate jump back, and reuse the lambda instead
though this means that some of the loop body goes before the routine address
but this is only a problem if you're falling through directly
#uxn #uxntal #18