Rebol Programming/throw-on-error

USAGE:

THROW-ON-ERROR blk 

DESCRIPTION:

Evaluates a block, which if it results in an error, throws that error.

THROW-ON-ERROR is a function value.

ARGUMENTS

• blk -- (Type: block)

(SPECIAL ATTRIBUTES)

• throw

SOURCE CODE

throw-on-error: func [
    {Evaluates a block, which if it results in an error, throws that error.} 
    [throw] 
    blk [block!]
][
    if error? set/any 'blk try blk [throw blk] 
    get/any 'blk
]