pause completion for now
This commit is contained in:
parent
e1a559d850
commit
841b09b686
|
@ -654,14 +654,6 @@
|
|||
@move-to-message-line ( -> )
|
||||
#0000 .term/rows LDZ2 #0002 ADD2 ;term-move-cursor JMP2
|
||||
|
||||
( COMPLETION )
|
||||
|
||||
@is-space ( c^ -> bool^ )
|
||||
DUP #21 LTH SWP #7e GTH ORA JMP2r
|
||||
|
||||
@non-space ( c^ -> bool^ )
|
||||
,is-space JSR #00 EQU JMP2r
|
||||
|
||||
( start a prompt on the message line )
|
||||
( )
|
||||
( the arguments are as follows: )
|
||||
|
|
Loading…
Reference in New Issue