< Rebol Programming
USAGE:
REJOIN block
DESCRIPTION:
Reduces and joins a block of values.
REJOIN is a function value.
ARGUMENTS
- block -- Values to reduce and join (Type: block)
SOURCE CODE
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
]
This article is issued from Wikibooks. The text is licensed under Creative Commons - Attribution - Sharealike. Additional terms may apply for the media files.