Hi, Jason,

Small kibitz...

Jason Cunliffe wrote:
> 
> ; Is this what you want?
> 
> to-charblock: func[aword [string!] /local charblock letter][
>     charblock: []
>     clear charblock
>     foreach letter aword [
>         append charblock letter
>     ]
>     return charblock
> ]
> 

Would either

    charblock: copy []

or

    charblock: clear []

work as well for you?

-jn-

-- 
; sub REBOL {}; sub head ($) {@_[0]}
REBOL []
# despam: func [e] [replace replace/all e ":" "." "#" "@"]
; sub despam {my ($e) = @_; $e =~ tr/:#/.@/; return "\n$e"}
print head reverse despam "moc:xedef#yleen:leoj" ;
-- 
To unsubscribe from this list, please send an email to
[EMAIL PROTECTED] with "unsubscribe" in the 
subject, without the quotes.

Reply via email to