[求助]如何中断当前程序的运行，直接调用错误处理函数。

navsun

如何中断当前程序的运行，直接调用错误处理函数。

A
B
C

比如当A段程序检测到错误时，直接调用B进行错误提示，并结束程序，而C为后续语句不需要再执行。

navsun

可能我没有表述清意思，

我目前的方法是执行一个错误的不存在的函数如：" (错误) " 来人为制造一个错误，这样程序就会自动调用错误处理，而直接结束程序运行。

nonsmall

1 函数 vl-catch-all-apply 及相关

2 重定义系统自带的函数 *ERROR*

(defun *error*(msg)

(alert "O M G")

)

3 用if cond 等直接跳转到程序结尾

4 函数 Exit 或 Quit

5 and so on .....