Rebol 编程/rejoin
外观
< Rebol 编程
REJOIN block
减少并连接一组值。
REJOIN 是一个函数值。
- block -- 要减少和连接的值(类型:块)
rejoin: func [
"Reduces and joins a block of values."
block [block!] "Values to reduce and join"
][
if empty? block: reduce block [return block]
append either series? first block [copy first block] [
form first block
] next block
]