转向执行子命令出错

HGQ8888

(defun C:tt (/ ent en)
  (if (setq ent (car (entsel)))
    (cond
      ((= (setq en (cdr (assoc 0 ent))) "DIMENSION")
       (c:DIE)
      )
      ((= en "BLOCK")
       (C:getds)
      )
      (t nil)
    )

这个为什么会出错?
错误: *error* 函数中出错AutoCAD 变量设置被拒绝: "clayer" nil

Andyhon

玄机出在 (c:DIE)&(C:getds)
问题是它是如何被定义的