This one works better:

; Needed until very latest versions of Rebol are released.
if not value? 'as-pair [
    as-pair: func [
        "Combine X and Y values into a pair."
        x [number!] y [number!]
        ][
        to-pair reduce [to-integer x to-integer y]
        ]
    ]

Andrew Martin
ICQ: 26227169 http://valley.150m.com/
-><-


-- 
To unsubscribe from this list, please send an email to
[EMAIL PROTECTED] with "unsubscribe" in the 
subject, without the quotes.

Reply via email to