Common Lisp 中使用error 报错不能检测&key类型参数

在common lisp中 如果要使用error 检测函数参数中&key类参数 其实不能实现，原因在于解释器内置报错会首先执行

不如在函数：

(defun foo(&key x y)

(cond (x (print x)) (y (print y)) (t (error "Error from package: ~A" *package*)))

当调用(foo :z 1) 时

SBCL 会首先报错： unknown &KEY argument: :Z
   [Condition of type SB-INT:SIMPLE-PROGRAM-ERROR]