release
Slava Pestov 2007-11-15 04:40:23 -05:00
parent adc3a2228b
commit 72ea94384d
3 changed files with 4 additions and 6 deletions

View File

@ -1,6 +1,6 @@
USING: math tools.test system ;
USING: math tools.test system prettyprint ;
IN: temporary
[ t ] [ cell integer? ] unit-test
[ t ] [ bootstrap-cell integer? ] unit-test
[ ] [ os-env . ] unit-test
[ ] [ os-envs . ] unit-test

View File

@ -19,8 +19,7 @@ SYMBOL: responders
<html> <body> <h1> write </h1> </body> </html> ;
: error-head ( error -- )
dup log-error
dup response
dup log-error response
H{ { "Content-Type" "text/html" } } print-header nl ;
: httpd-error ( error -- )

View File

@ -7,8 +7,7 @@ sequences ;
QUALIFIED: unix
IN: io.sniffer.bsd
M: unix-io (handle-destructor) ( obj -- )
destructor-obj close drop ;
M: unix-io destruct-handle ( obj -- ) close drop ;
C-UNION: ifreq_props "sockaddr-in" "short" "int" "caddr_t" ;
C-STRUCT: ifreq { { "char" 16 } "name" } { "ifreq_props" "props" } ;