[LISP函数]：自定*ERROR*怎么知道是执行哪个命令出错了

luoyaya · 发表于 2003-3-10 09:51:15

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

如题,我用C:函数定义命令,*ERROR*怎么知道是是哪个命令出错,然后做出相应的处理呢?

ll_j · 发表于 2003-3-10 14:05:18

*error*函数是出错处理函数，明了点说，就是在程序运行出错时，不至于发生其它不良影响，所以*error*函数不能告诉程序调试者程序出错位置。
在程序调试期间，最好关闭*error*函数，就是“(setq *error* nil)”，这样在命令行会返回程序出错位置，否则，会根据出错函数要求返回信息。
当然，最好是使用Vlisp编辑器调试Lisp程序，在适当位置设置断点...

luoyaya · 发表于 2003-3-10 21:26:18

我是想对每一个命令出错做相应的处理，那怎么办？

ll_j · 发表于 2003-3-11 08:31:34

之所以使用出错函数，就是为了避免程序非正常退出时对环境的不良影响，也就是说，出错函数的定义应根据程序内容改变，比如提示出错信息，根据要求恢复系统环境（正交、捕捉等），同时，在同一程序（命令）中可根据程序运行过程，在不同位置执行不同出错处理函数。只要这样就可以了：

(defun err1(s)
(if s (progn (setq *error* olderr) (setvar ....)...)) ;根据需要
)
(defun err2(s)
...
)
(defun c:abc()
...
(setq olderr *error* *error* err1)
...
...
(setq *error* err2)
...
...
(setq *error* olderr)
)

luoyaya · 发表于 2003-3-12 10:29:50

如题

账号		自动登录	找回密码
密码			立即注册

[LISP函数]：自定ERROR怎么知道是执行哪个命令出错了

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子

浏览过的版块