diff --git a/TODO.FACTOR.txt b/TODO.FACTOR.txt index 5137e363dd..2e6901ce6d 100644 --- a/TODO.FACTOR.txt +++ b/TODO.FACTOR.txt @@ -1,11 +1,4 @@ - in the ui, run a bunch of files, unfocus; when its done caret appears - -- fix this: - - [ 1 2 3 4 5 6 7 8 9 10 10 10 10 10 10 10 10 10 10 11 11 11 113 ] . -[ 1 2 3 4 5 6 7 8 9 10 10 10 10 10 10 10 10 10 10 11 11 11 113 -] - - unix i/o: problems with passing f to syscalls - if a primitive throws an error, :c doesn't show the call frame there - "benchmark/help": without a yield UI runs out of memory @@ -13,6 +6,15 @@ + httpd: - outliners don't work - browser responder doesn't work +- tests in a loop runs out of memory eventually +- fix word wrap with tables in panes + +- fix this: + + [ 1 2 3 4 5 6 7 8 9 10 10 10 10 10 10 10 10 10 10 11 11 11 113 ] . +[ 1 2 3 4 5 6 7 8 9 10 10 10 10 10 10 10 10 10 10 11 11 11 113 +] + - code walker & exceptions -- test and debug problems - another i/o bug: on factorcode eventually all i/o times out - bug in pound? @@ -28,7 +30,6 @@ - get factor running on mac intel - constant branch folding - cocoa: starting the UI with +foo switches opens them as files -- tests in a loop runs out of memory eventually + refactor style stack code so that nested styles are handled at a lower-level - in HTML, we can nest div tags, etc - fix prettyprinter's highlighting of non-leaves looks bad @@ -36,7 +37,6 @@ - fix remaining HTML stream issues - need to present $list in a useful way - better line spacing in ui and html - related issue -- fix word wrap with tables in panes + fix compiled gc check - there was a performance hit, investigate diff --git a/library/collections/strings.facts b/library/collections/strings.facts index e194bd0c4e..89e942f4b3 100644 --- a/library/collections/strings.facts +++ b/library/collections/strings.facts @@ -64,21 +64,21 @@ HELP: quotable? "( ch -- ? )" { $description "Tests for a character which may appear in a Factor string literal without escaping." } ; HELP: padding "( str n ch -- padstr )" -{ $values { "str a string" } { "n" "a non-negative integer" } { "ch" "a character"} { "padstr" "a new string" } } +{ $values { "str" "a string" } { "n" "a non-negative integer" } { "ch" "a character"} { "padstr" "a new string" } } { $description "Outputs a new string consisting of " { $snippet "ch" } " repeated, that when appended to " { $snippet "str" } ", yields a string of length " { $snippet "n" } ". If the length of { " { $snippet "str" } " is greater than " { $snippet "n" } ", this word outputs the empty string." } ; HELP: pad-left "( str n ch -- padded )" -{ $values { "str a string" } { "n" "a non-negative integer" } { "ch" "a character"} { "padded" "a new string" } } +{ $values { "str" "a string" } { "n" "a non-negative integer" } { "ch" "a character"} { "padded" "a new string" } } { $description "Outputs a new string consisting of " { $snippet "str" } " padded on the left with enough repetitions of " { $snippet "ch" } " to have the result be of length " { $snippet "n" } "." } { $examples { $example "{ \"ab\" \"quux\" } [ 5 CHAR: - pad-left print ] each" "---ab\n-quux" } } ; HELP: pad-right "( str n ch -- padded )" -{ $values { "str a string" } { "n" "a non-negative integer" } { "ch" "a character"} { "padded" "a new string" } } +{ $values { "str" "a string" } { "n" "a non-negative integer" } { "ch" "a character"} { "padded" "a new string" } } { $description "Outputs a new string consisting of " { $snippet "str" } " padded on the right with enough repetitions of " { $snippet "ch" } " to have the result be of length " { $snippet "n" } "." } { $examples { $example "{ \"ab\" \"quux\" } [ 5 CHAR: - pad-right print ] each" "ab---\nquux-" } } ; HELP: ch>string "( ch -- str )" -{ $values { "ch" "a character"} { "str a new string" } } +{ $values { "ch" "a character"} { "str" "a new string" } } { $description "Outputs a string of one character." } ; HELP: >string "( seq -- str )"