From b8a8c11fea17e3ca531880ff6c670407e34bbb32 Mon Sep 17 00:00:00 2001 From: Doug Coleman Date: Thu, 18 Jun 2009 19:29:10 -0500 Subject: [PATCH] don't write docs with auto-use enabled --- core/sets/sets-docs.factor | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/core/sets/sets-docs.factor b/core/sets/sets-docs.factor index 1e4ceb5680..298fcbeeae 100755 --- a/core/sets/sets-docs.factor +++ b/core/sets/sets-docs.factor @@ -168,8 +168,8 @@ HELP: sequence>assoc { "assoc" assoc } } { $examples - { $example "! Count the number of times the elements of two sequences appear." - "USING: prettyprint sets ;" + { $example "! Iterate over a sequence and increment the count at each element" + "USING: assocs prettyprint sets ;" "\"aaabc\" [ inc-at ] H{ } sequence>assoc ." "H{ { 97 3 } { 98 1 } { 99 1 } }" } @@ -182,8 +182,8 @@ HELP: sequence>assoc* { "assoc" assoc } } { $examples - { $example "! Count the number of times the elements of two sequences appear." - "USING: prettyprint sets ;" + { $example "! Iterate over a sequence and add the counts to an existing assoc" + "USING: assocs prettyprint sets kernel ;" "H{ { 97 2 } { 98 1 } } clone \"aaabc\" [ inc-at ] sequence>assoc* ." "H{ { 97 5 } { 98 2 } { 99 1 } }" } @@ -196,8 +196,8 @@ HELP: sequence>hashtable { "hashtable" hashtable } } { $examples - { $example "! Count the number of times the elements of two sequences appear." - "USING: prettyprint sets ;" + { $example "! Count the number of times an element occurs in a sequence" + "USING: assocs prettyprint sets ;" "\"aaabc\" [ inc-at ] sequence>hashtable ." "H{ { 97 3 } { 98 1 } { 99 1 } }" }