steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Minor changes

darcs
slava 2006-07-15 18:06:26 +00:00
parent ce6d8ae88e
commit f3245d2ab4
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
contrib/httpd/file-responder.factor
View File

@ -1,7 +1,7 @@
! Copyright (C) 2004, 2006 Slava Pestov. ! Copyright (C) 2004, 2006 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license. ! See http://factorcode.org/license.txt for BSD license.
IN: file-responder IN: file-responder
USING: embedded html httpd io kernel math namespaces parser USING: embedded errors html httpd io kernel math namespaces parser
sequences strings ; sequences strings ;
: serving-path ( filename -- filename ) : serving-path ( filename -- filename )

2
library/io/string-streams.factor
View File

@ -44,7 +44,7 @@ M: sbuf stream-read ( count sbuf -- string )
2drop f 2drop f
] [ ] [
swap over length min 0 <string> swap over length min 0 <string>
[ [ drop dup pop ] inject drop ] keep [ [ drop pop ] inject-with ] keep
] if ; ] if ;
: <string-reader> ( string -- stream ) : <string-reader> ( string -- stream )