CLISP:未定义函数SHOW

Question

启动REPL clisp-2.49-r8：

clisp -K full

尝试执行DBUS模块测试http://clisp.cvs.sourceforge.net/viewvc/clisp/clisp/modules/dbus/test.tst中的内容

(listp (show (multiple-value-list (ext:module-info "dbus" t)) :pretty t))

获取：

*** - EVAL: undefined function SHOW

我在哪里可以找到这个SHOW函数？

Answer 1

抱歉..。

它在test/tests.lisp中定义

(defun show (object &key ((:pretty *print-pretty*) *print-pretty*))
 "Print the object on its own line and return it. Used in many tests!"
  (fresh-line) (prin1 object) (terpri) object)