sequences: Add join-as, which takes an exemplar. Move split-subseq and replace from...

[factor.git] / core / splitting / splitting-docs.factor

diff --git a/core/splitting/splitting-docs.factor b/core/splitting/splitting-docs.factor
index 824688eefaaeaad940b2572553906e6275f5ea13..c0563b40875aa8656cf37a26b288dcb8ca9404c0 100644 (file)
--- a/core/splitting/splitting-docs.factor
+++ b/core/splitting/splitting-docs.factor
@@ -19,7 +19,9 @@ ARTICLE: "sequences-split" "Splitting sequences"
     split*-when
 }
 "Splitting a string into lines:"
-{ $subsections string-lines } ;
+{ $subsections string-lines }
+"Replacing subsequences with another subsequence:"
+{ $subsections replace } ;
 
 ABOUT: "sequences-split"
 
@@ -87,3 +89,13 @@ HELP: string-lines
 { $examples
     { $example "USING: prettyprint splitting ;" "\"Hello\\r\\nworld\\n\" string-lines ." "{ \"Hello\" \"world\" \"\" }" }
 } ;
+
+HELP: replace
+{ $values { "seq" sequence } { "old" sequence } { "new" sequence } { "new-seq" sequence } }
+{ $description "Replaces every occurrence of " { $snippet "old" } " with " { $snippet "new" } " in the " { $snippet "seq" } "." }
+{ $examples
+    { $example "USING: io splitting ;"
+               "\"cool example is cool\" \"cool\" \"silly\" replace print"
+               "silly example is silly"
+    }
+} ;