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

Fixing USING: lines

db4
Daniel Ehrenberg 2009-01-28 15:46:34 -06:00
parent af9d70c65a
commit d5160ce791
4 changed files with 5 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
basis/http/client/client.factor
View File

@ -5,7 +5,7 @@ sequences strings splitting calendar continuations accessors vectors
math.order hashtables byte-arrays destructors math.order hashtables byte-arrays destructors
io io.sockets io.streams.string io.files io.timeouts io io.sockets io.streams.string io.files io.timeouts
io.pathnames io.encodings io.encodings.string io.encodings.ascii io.pathnames io.encodings io.encodings.string io.encodings.ascii
io.encodings.utf8 io.encodings.8-bit io.encodings.binary io.encodings.utf8 io.encodings.8-bit io.encodings.binary io.crlf
io.streams.duplex fry ascii urls urls.encoding present io.streams.duplex fry ascii urls urls.encoding present
http http.parsers http.client.post-data ; http http.parsers http.client.post-data ;
IN: http.client IN: http.client

1
basis/http/server/server.factor
View File

@ -14,6 +14,7 @@ io.encodings.binary
io.streams.limited io.streams.limited
io.servers.connection io.servers.connection
io.timeouts io.timeouts
io.crlf
fry logging logging.insomniac calendar urls urls.encoding fry logging logging.insomniac calendar urls urls.encoding
mime.multipart mime.multipart
unicode.categories unicode.categories

7
basis/xml/data/data.factor
View File

@ -150,10 +150,10 @@ TUPLE: tag
[ assure-name ] [ T{ attrs } assoc-like ] [ ] tri* [ assure-name ] [ T{ attrs } assoc-like ] [ ] tri*
tag boa ; tag boa ;
: attr ( tag name -- string ) : attr ( tag/xml name -- string )
swap attrs>> at ; swap attrs>> at ;
: set-attr ( tag value name -- ) : set-attr ( tag/xml value name -- )
rot attrs>> set-at ; rot attrs>> set-at ;
! They also follow the sequence protocol (for children) ! They also follow the sequence protocol (for children)
@ -188,9 +188,6 @@ C: <xml> xml
CONSULT: sequence-protocol xml body>> ; CONSULT: sequence-protocol xml body>> ;
INSTANCE: xml sequence INSTANCE: xml sequence
CONSULT: assoc-protocol xml body>> ;
INSTANCE: xml assoc
CONSULT: tag xml body>> ; CONSULT: tag xml body>> ;
CONSULT: name xml body>> ; CONSULT: name xml body>> ;

2
basis/xmode/marker/marker.factor
View File

@ -5,7 +5,7 @@ USING: kernel namespaces make xmode.rules xmode.tokens
xmode.marker.state xmode.marker.context xmode.utilities xmode.marker.state xmode.marker.context xmode.utilities
xmode.catalog sequences math assocs combinators strings xmode.catalog sequences math assocs combinators strings
parser-combinators.regexp splitting parser-combinators ascii parser-combinators.regexp splitting parser-combinators ascii
ascii combinators.short-circuit accessors ; ascii combinators.short-circuit accessors xml.data ;
! Based on org.gjt.sp.jedit.syntax.TokenMarker ! Based on org.gjt.sp.jedit.syntax.TokenMarker