Rebol 编程/throw-on-error

用法

THROW-ON-ERROR blk 

描述

评估一个块，如果它导致错误，则抛出该错误。

THROW-ON-ERROR 是一个函数值。

参数

• blk -- (类型：块)

(特殊属性)

• 抛出

源代码

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
]