splitting.extras-docs: mark -slice variants as related-words

diff --git a/extra/splitting/extras/extras-docs.factor b/extra/splitting/extras/extras-docs.factor
index d4271db0511dd22278c11a59f58923bb713b6c45..11b1dcbdaafc2eddbc8bd12497bc3e7016f0f004 100644 (file)
--- a/extra/splitting/extras/extras-docs.factor
+++ b/extra/splitting/extras/extras-docs.factor
@@ -6,11 +6,17 @@ HELP: split*-when
 { $description "A variant of " { $link split-when } " that includes the elements along which the sequence was split." }
 { $examples { $example "USING: ascii kernel prettyprint splitting.extras ;" "\"hello,world-how.are:you\" [ letter? not ] split*-when ." "{ \"hello\" \",\" \"world\" \"-\" \"how\" \".\" \"are\" \":\" \"you\" }" } } ;
 
+{ split*-when split*-when-slice } related-words
+
 HELP: split*
 { $values { "seq" sequence } { "separators" sequence } { "pieces" "a new array" } }
 { $description "A variant of " { $link split } " that includes the elements along which the sequence was split." }
 { $examples { $example "USING: prettyprint splitting.extras ;" "\"hello world-how are you?\" \" -\" split* ." "{ \"hello\" \" \" \"world\" \"-\" \"how\" \" \" \"are\" \" \" \"you?\" }" } } ;
 
+{ split* split*-slice } related-words
+
 HELP: split-find
 { $values { "seq" sequence } { "quot" { $quotation ( seq -- i ) } } { "pieces" "a new array" } }
 { $description "Splits a sequence into slices using the provided quotation to find split points." } ;
+
+{ split-when-harvest split-when-slice-harvest } related-words