Slava Pestov 2008-02-02 00:30:08 -06:00
commit bce173d749
46 changed files with 1082 additions and 1086 deletions

View File

@ -18,10 +18,6 @@ HELP: ch>ascii-escape
{ $values { "ch" "a character" } { "str" string } }
{ $description "Converts a character to an escape code." } ;
HELP: ch>unicode-escape
{ $values { "ch" "a character" } { "str" string } }
{ $description "Converts a character to a Unicode escape code (" { $snippet "\\u123456"} ")." } ;
HELP: unparse-ch
{ $values { "ch" "a character" } }
{ $description "Adds the character to the sequence being constructed (see " { $link "namespaces-make" } "). If the character can appear in a string literal, it is added directly, otherwise an escape code is added." } ;

View File

@ -1,4 +1,5 @@
USING: assocs html.parser kernel math sequences strings ;
USING: assocs html.parser kernel math sequences strings unicode.categories
unicode.case ;
IN: html.parser.analyzer
: remove-blank-text ( vector -- vector' )

View File

@ -1,6 +1,6 @@
USING: arrays html.parser.utils hashtables io kernel
namespaces prettyprint quotations
sequences splitting state-parser strings ;
sequences splitting state-parser strings unicode.categories unicode.case ;
IN: html.parser
TUPLE: tag name attributes text matched? closing? ;

View File

@ -1,8 +1,7 @@
<<<<<<< HEAD:extra/tar/tar.factor
USING: combinators io io.files io.streams.duplex
io.streams.string kernel math math.parser continuations
namespaces pack prettyprint sequences strings system ;
USING: hexdump tools.interpreter ;
namespaces pack prettyprint sequences strings system
hexdump tools.interpreter ;
IN: tar
: zero-checksum 256 ;

View File

@ -2,7 +2,7 @@ USING: sequences rss arrays concurrency kernel sorting
html.elements io assocs namespaces math threads vocabs html
furnace http.server.templating calendar math.parser splitting
continuations debugger system http.server.responders
xml.writer ;
xml.writer prettyprint ;
IN: webapps.planet
: print-posting-summary ( posting -- )