don't write docs with auto-use enabled
parent
14f1e6abff
commit
b8a8c11fea
|
@ -168,8 +168,8 @@ HELP: sequence>assoc
|
||||||
{ "assoc" assoc }
|
{ "assoc" assoc }
|
||||||
}
|
}
|
||||||
{ $examples
|
{ $examples
|
||||||
{ $example "! Count the number of times the elements of two sequences appear."
|
{ $example "! Iterate over a sequence and increment the count at each element"
|
||||||
"USING: prettyprint sets ;"
|
"USING: assocs prettyprint sets ;"
|
||||||
"\"aaabc\" [ inc-at ] H{ } sequence>assoc ."
|
"\"aaabc\" [ inc-at ] H{ } sequence>assoc ."
|
||||||
"H{ { 97 3 } { 98 1 } { 99 1 } }"
|
"H{ { 97 3 } { 98 1 } { 99 1 } }"
|
||||||
}
|
}
|
||||||
|
@ -182,8 +182,8 @@ HELP: sequence>assoc*
|
||||||
{ "assoc" assoc }
|
{ "assoc" assoc }
|
||||||
}
|
}
|
||||||
{ $examples
|
{ $examples
|
||||||
{ $example "! Count the number of times the elements of two sequences appear."
|
{ $example "! Iterate over a sequence and add the counts to an existing assoc"
|
||||||
"USING: prettyprint sets ;"
|
"USING: assocs prettyprint sets kernel ;"
|
||||||
"H{ { 97 2 } { 98 1 } } clone \"aaabc\" [ inc-at ] sequence>assoc* ."
|
"H{ { 97 2 } { 98 1 } } clone \"aaabc\" [ inc-at ] sequence>assoc* ."
|
||||||
"H{ { 97 5 } { 98 2 } { 99 1 } }"
|
"H{ { 97 5 } { 98 2 } { 99 1 } }"
|
||||||
}
|
}
|
||||||
|
@ -196,8 +196,8 @@ HELP: sequence>hashtable
|
||||||
{ "hashtable" hashtable }
|
{ "hashtable" hashtable }
|
||||||
}
|
}
|
||||||
{ $examples
|
{ $examples
|
||||||
{ $example "! Count the number of times the elements of two sequences appear."
|
{ $example "! Count the number of times an element occurs in a sequence"
|
||||||
"USING: prettyprint sets ;"
|
"USING: assocs prettyprint sets ;"
|
||||||
"\"aaabc\" [ inc-at ] sequence>hashtable ."
|
"\"aaabc\" [ inc-at ] sequence>hashtable ."
|
||||||
"H{ { 97 3 } { 98 1 } { 99 1 } }"
|
"H{ { 97 3 } { 98 1 } { 99 1 } }"
|
||||||
}
|
}
|
||||||
|
|
Loading…
Reference in New Issue