% Function FILL
Function FILL
fill
sequence item &key start end => sequence
sequence - 正常なシーケンス
item - オブジェクト
start, end - sequenceの境界インデックス指定子。
デフォルトはstart, endそれぞれ0
とnil
。
startとendの境界内にあるsequenceの要素を、 itemに置き換えます。
(fill (list 0 1 2 3 4 5) '(444)) => ((444) (444) (444) (444) (444) (444))
(fill (copy-seq "01234") #\e :start 3) => "012ee"
(setq x (vector 'a 'b 'c 'd 'e)) => #(A B C D E)
(fill x 'z :start 1 :end 3) => #(A Z Z D E)
x => #(A Z Z D E)
(fill x 'p) => #(P P P P P)
x => #(P P P P P)
sequenceは破壊的に修正されます。
なし。
sequenceが正常なシーケンスでないとき、
型type-error
のエラーを通知する準備をしなければなりません。
startが非負の整数ではないとき、
型type-error
のエラーが発生します。
endが非負の整数ではなくnil
でもないとき、
型type-error
のエラーが発生します。
(fill sequence item) == (nsubstitute-if item (constantly t) sequence)