[REBOL] Extract - bug
From: al::bri::xtra::co::nz at: 19-Oct-2001 15:02
There's a bug with 'extract. It doesn't work with all series! and doesn't
have a /only refinement. Also, it uses:
pick series 1
is all that's needed.
Here's my patch:
; Modifies Extract to work with series! and adds /Only refinement.
Extract: function [
"Extracts every N-th value from a Series."
/Only "Appends a block value as a block."
New: make Series (length? Series) / N
do compose/deep [
forskip Series N [
(either Only ['insert/only]['insert]) tail New first Series
I've sent this to feedback as well.
ICQ: 26227169 http://valley.150m.com/