Never been to DZone Snippets before?

Snippets is a public source code repository. Easily build up your personal collection of code snippets, categorize them with tags / keywords, and share them with the world

SPLIT-UNIQUE - split a block into unique and duplicate values (See related posts)

    split-unique: func [block [any-block!] /local uniq dupe dest] [
        uniq: copy []
        dupe: copy []
        foreach item block [
            dest: either find/only uniq item [dupe] [uniq]
            append/only dest item
        ]
        reduce [uniq dupe]
    ]
to group split unique REBOL partition split-unique by gregg.irwin on Wed Nov 01 16:35:34 -0500 2006

You need to create an account or log in to post comments to this site.


Click here to browse all 4861 code snippets

Related Posts