Hi all,

<<Ed>>
...

Personally, I would call it a quirk, but every language has its quirks, why
should REBOL be any different. :)

<</Ed>>

I call it a quirk too and I suggested to straighten the things some time
ago. Meanwhile I use my DEFAULT function:

 default action error-handling

The source of the function is:

Rebol [
    Title: "Default"
    File: %default.r
    Author: "Ladislav Mecir"
    Email: [EMAIL PROTECTED]
    Reb: reb://Sites/Ladislav
    Web: http://www.rebolforces.com/~ladislav
    Purpose: {
        An error handling function
    }
    Category: [General]
]

    default: function [
        {
            Try to evaluate code.
            Evaluate the fault block,
            if an error occurs
        }
        [throw]
        code [block!]
        fault [block!]
        /good pass [block!]
    ] [result] [
        either error? set/any 'result try code [
            use [error] compose [
                any-type? error: :result
                do (reduce [fault])
            ]
        ] [
            either good [do pass] [get/any 'result]
        ]
    ]


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

Reply via email to