Slava Pestov 2004-08-24 00:53:29 +00:00
parent a5d4939d9a
commit 66719b8661
2 changed files with 5 additions and 1 deletions

View File

@ -37,7 +37,8 @@
- bignums - bignums
- >lower, >upper for strings - >lower, >upper for strings
- read1 - read1
- telnetd and httpd should use multitasking - telnetd should use multitasking
- telnetd error handling
- sbuf-hashcode - sbuf-hashcode
- vector-hashcode - vector-hashcode
- irc: stack underflow? - irc: stack underflow?

View File

@ -103,6 +103,9 @@ USE: url-encoding
] in-thread drop ] in-thread drop
] ifte ; ] ifte ;
: quit-flag ( -- ? )
global [ "httpd-quit" get ] bind ;
: clear-quit-flag ( -- ) : clear-quit-flag ( -- )
global [ "httpd-quit" off ] bind ; global [ "httpd-quit" off ] bind ;