]> gitweb.factorcode.org Git - factor.git/commitdiff
tools.completion: fix help-lint for runs now that it returns slices.
authorJohn Benediktsson <mrjbq7@gmail.com>
Tue, 22 Mar 2016 14:44:28 +0000 (07:44 -0700)
committerJohn Benediktsson <mrjbq7@gmail.com>
Tue, 22 Mar 2016 14:44:28 +0000 (07:44 -0700)
basis/tools/completion/completion-docs.factor
basis/tools/completion/completion-tests.factor

index 87e675efa615181a414bb95eff8a9b82ea299bdb..fc91a60dfb77cad4007fce9ad735cd753a4336f5 100644 (file)
@@ -26,7 +26,7 @@ HELP: runs
 { $values { "seq" "a sequence of integers" } { "newseq" "a sequence of sequences of integers" } }
 { $description "Groups subsequences of consecutive integers." }
 { $examples
-    { $example "USING: prettyprint tools.completion ;" "{ 1 2 3 5 6 9 10 } runs ." "V{ V{ 1 2 3 } V{ 5 6 } V{ 9 10 } }" }
+    { $example "USING: prettyprint sequences tools.completion ;" "{ 1 2 3 5 6 9 10 } runs [ { } like ] map ." "{ { 1 2 3 } { 5 6 } { 9 10 } }" }
 } ;
 
 HELP: score
index ad37c290a7f0d7963cd5b57b150d5daa54cde041..189679cb5ef138eaf3b4be9934e10eee61c646f8 100644 (file)
@@ -1,11 +1,11 @@
-USING: arrays assocs kernel sequences tools.test ;
+USING: assocs kernel sequences tools.test ;
 
 IN: tools.completion
 
 { f } [ "abc" "def" fuzzy ] unit-test
 { V{ 4 5 6 } } [ "set-nth" "nth" fuzzy ] unit-test
 
-{ { { 0 } { 4 5 6 } } } [ V{ 0 4 5 6 } runs [ >array ] map ] unit-test
+{ { { 0 } { 4 5 6 } } } [ V{ 0 4 5 6 } runs [ { } like ] map ] unit-test
 
 { { "nth" "?nth" "set-nth" } } [
     "nth" { "set-nth" "nth" "?nth" } dup zip completions keys