... | ... |
@@ -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 |
|