[REBOL] Re: Refinements

From: lmecir:mbox:vol:cz at: 13-Nov-2002 14:06

Hi Robert,

have a look at my APPLY function, that can be found in
http://www.rebolforces.com/~ladislav/highfun.r

Some suggested usages:

    apply/n :subtract [value2: 1 value1: 2] ; == 1

    test-fn: func [a b /ref-c c /ref-d d] [
        print ["A:" a]
        print ["B:" b]
        if ref-c [
            print ["C:" c]
        ]
        if ref-d [
            print ["D:" d]
        ]
    ]
    apply/r/n :test-fn [ref-d ref-c] [d: 1 c: 2 b: 3 a: 4]

A: 4
B: 3
C: 2
D: 1

etc.

-L

1 · 2 · 3 · 4 · [5] · 6 · 7 · 8 · 9 · 10 · 11 · See whole thread