Browse code

(console.tal) Test argument queue

Devine Lu Linvega authored on 17/04/2023 17:55:45
Showing 1 changed files
... ...
@@ -13,6 +13,10 @@
13 13
 	;on-argument .Console/vector DEO2
14 14
 	( print hello )
15 15
 	;hello-txt pstr
16
+	( when arguments are queued )
17
+	.Console/type DEI #04 EQU ?&no-queue
18
+		;queue-txt pstr
19
+		&no-queue
16 20
 
17 21
 BRK
18 22
 
... ...
@@ -105,4 +109,5 @@ JMP2r
105 109
 @arg-txt "(arg) $1
106 110
 @quit-txt "quit $1
107 111
 @argend-txt "(argend) 0a $1
112
+@queue-txt "(queue) 0a $1
108 113