Use deferred net2o-bye to allow for modifications of bye later

parent c3abfea4
......@@ -1157,6 +1157,7 @@ Hash: audio#
also require minos2/pulse-audio.fs pulse-init
require minos2/opus-codec.fs
previous
' bye is net2o-bye
[ELSE]
require minos2/opus-codec.fs
[THEN]
......
......@@ -108,7 +108,7 @@ Variable old-order Variable order-backlog
: n2o-cmds ( -- )
init-client word-args ['] n2o-quit ['] do-net2o-cmds catch
dup #-56 = swap #-28 = or IF drop subme bye ELSE throw THEN ;
dup #-56 = swap #-28 = or IF drop subme net2o-bye ELSE throw THEN ;
: .usage ( addr u -- addr u )
source 7 /string type cr ;
......@@ -751,7 +751,7 @@ synonym #! \ ( -- )
: bye ( -- )
\U bye
\G bye: quit command mode and terminate program
bye ;
net2o-bye ;
: -bw ( -- )
\O -bw
......
......@@ -2014,6 +2014,9 @@ context-table $save
: bye !save-all-msgs subme dht-disconnect net2o-kills bye ;
warnings !
Defer net2o-bye
' bye is net2o-bye
\ show problems
.unresolved
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment