sequences: fix docs to use "dst" as a convention.

diff --git a/core/io/streams/sequence/sequence.factor b/core/io/streams/sequence/sequence.factor
index 2c98ff87f4df67f6373c539b4fa662255ea77f38..8894fdf32228cd4bf8828fa057caa899f6d68496 100644 (file)
--- a/core/io/streams/sequence/sequence.factor
+++ b/core/io/streams/sequence/sequence.factor
@@ -17,7 +17,7 @@ SLOT: i
 : (sequence-read-length) ( n buf stream -- buf count )
     [ underlying>> length ] [ i>> ] bi - rot min ; inline
 
-: <sequence-copy> ( dest n i src -- n copy )
+: <sequence-copy> ( dst n i src -- n copy )
     [ 0 ] 3curry dip <copy> ; inline
 
 : (sequence-read-unsafe) ( n buf stream -- count )

diff --git a/core/sequences/sequences-docs.factor b/core/sequences/sequences-docs.factor
index 7786426c0ef6a3cd8ce385e0b24ff39b1fdaa739..bf9de6d0ba1b3dd6ee16943da7e05953c5fb1c61 100644 (file)
--- a/core/sequences/sequences-docs.factor
+++ b/core/sequences/sequences-docs.factor
@@ -740,16 +740,16 @@ HELP: <repetition>
     { $example "USING: prettyprint sequences ;" "10 \"X\" <repetition> concat ." "\"XXXXXXXXXX\"" }
 } ;
 HELP: copy
-{ $values { "src" sequence } { "i" "an index in " { $snippet "dest" } } { "dst" "a mutable sequence" } }
-{ $description "Copies all elements of " { $snippet "src" } " to " { $snippet "dest" } ", with destination indices starting from " { $snippet "i" } ". Grows " { $snippet "to" } " first if necessary." }
-{ $side-effects "dest" }
-{ $errors "An error is thrown if " { $snippet "to" } " is not resizable, and not large enough to hold the copied elements." } ;
+{ $values { "src" sequence } { "i" "an index in " { $snippet "dst" } } { "dst" "a mutable sequence" } }
+{ $description "Copies all elements of " { $snippet "src" } " to " { $snippet "dst" } ", with destination indices starting from " { $snippet "i" } ". Grows " { $snippet "dst" } " first if necessary." }
+{ $side-effects "dst" }
+{ $errors "An error is thrown if " { $snippet "dst" } " is not resizable, and not large enough to hold the copied elements." } ;
 
 HELP: push-all
-{ $values { "src" sequence } { "dest" "a resizable mutable sequence" } }
-{ $description "Appends " { $snippet "src" } " to the end of " { $snippet "dest" } "." }
-{ $side-effects "dest" }
-{ $errors "Throws an error if " { $snippet "src" } " contains elements not permitted in " { $snippet "dest" } "." } ;
+{ $values { "src" sequence } { "dst" "a resizable mutable sequence" } }
+{ $description "Appends " { $snippet "src" } " to the end of " { $snippet "dst" } "." }
+{ $side-effects "dst" }
+{ $errors "Throws an error if " { $snippet "src" } " contains elements not permitted in " { $snippet "dst" } "." } ;
 
 HELP: append
 { $values { "seq1" sequence } { "seq2" sequence } { "newseq" sequence } }

diff --git a/core/sequences/sequences.factor b/core/sequences/sequences.factor
index 4203fcb85ca41c27cb66353fab35618082f88978..3327bdd701a1cae4797b6f9bde55ea3c91bd3cf8 100644 (file)
--- a/core/sequences/sequences.factor
+++ b/core/sequences/sequences.factor
@@ -329,7 +329,7 @@ M: sequence clone-like
 
 M: immutable-sequence clone-like like ; inline
 
-: push-all ( src dest -- ) [ length ] [ copy ] bi ; inline
+: push-all ( src dst -- ) [ length ] [ copy ] bi ; inline
 
 <PRIVATE