lisp - 如何编写一个 lisp 函数，在他的参数中可以在几个输出选项中进行选择(我的意思是输出几个可能的操作)

Question

你好，我尝试编写一个 lisp 函数或宏，在他的参数中可以在几个输出选项中进行选择(我的意思是输出几个可能的操作)

谢谢

帕特里克

Answer 1

您可以为您的函数添加类型规范。像那样:

(defun foo (bar)
  (declare (type (member :blah :minor)
                 bar))
  (princ bar))

然后，如果您使用正确的值调用它，它将按预期工作:

CL-USER> (foo :blah)
BLAH
:BLAH

但是调用错误的值:(foo :not-supported) 会导致错误:

The value
  :OTHER
is not of type
  (MEMBER :MINOR :BLAH)
when binding BAR
   [Condition of type TYPE-ERROR]

Restarts:
 0: [RETRY] Retry SLIME REPL evaluation request.
 1: [*ABORT] Return to SLIME's top level.
 2: [ABORT] abort thread (#<THREAD "repl-thread" RUNNING {1002478003}>)