2 files changed, 9 insertions(+), 10 deletions(-)

M examples/hello.tal
M src/drifblim.tal

@@ 2,19 2,18 @@
 
 |0100 @program
 
-	;hello-word
-
-	&while
-		( send ) LDAk #18 DEO
-		( loop ) INC2 LDAk ,&while JCN
-	POP2
-
+	;hello-word print-str
 	#010f DEO
 
 BRK
 
-@string "hello! $1
+@print-str ( str* -- )
+
+	&while
+		( send ) LDAk #18 DEO
+		( loop ) INC2 LDAk ?&while
+	POP2
 
-123c
+JMP2r
 
 ~examples/include.tal

@@ 115,7 115,7 @@ JMP2r
 ( calls )
 &do-litjmi #20 ;write JSR2 INC2 ;get-ref JSR2 LDA2 ;write-short JMP2
 &do-litjci #40 ;write JSR2 INC2 ;get-ref JSR2 LDA2 ;write-short JMP2
-&do-litjsi #60 ;write JSR2 INC2 ;get-ref JSR2 LDA2 ;write-short JMP2
+&do-litjsi #60 ;write JSR2 ;get-ref JSR2 LDA2 ;write-short JMP2
 ( hexadecimals )
 &do-rawhex ;write-rawhex JMP2
 &do-lithex INC2 ;write-lithex JMP2