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

SHL (shift-left) function (See related posts)

    SHL: func [
        "Shift-Left"
        s [series!]
        n [integer!]
        /with fill
    ][
        append
            copy skip s n
            array/initial
                min n (length? s)       ; we should really ASSERT n <= length? s
                either with [fill][none]
    ]
to REBOL series SHL shift-left shift by gregg.irwin on Tue Jan 10 01:06:49 -0500 2006

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


Click here to browse all 4863 code snippets

Related Posts