我试图通过使用(ql:system-apropos "regex")
将multiple-value-bind
的输出保存到一个变量,但我只保存了nil
但是,这个命令似乎只将文本打印到REPL,并且不返回任何变量,因此似乎不起作用在这种情况下,有没有办法将ql:system-apropos
的输出作为列表或数组,特别是它返回的包名。
这个基本的代码可以工作:
* (multiple-value-bind (first-var second-var) (floor 5 3) (defparameter *first-var* first-var) (defparameter *second-var* second-var))
*SECOND-VAR*
* *first-var*
1
* *second-var*
2
*
但这不是(如果没有要绑定的内容)以下内容:
* (multiple-value-bind (first-var second-var) (ql:system-apropos "regex") (defparameter *first-var* first-var) (defparameter *second-var* second-var))
#<SYSTEM com.informatimago.common-lisp.regexp / com.informatimago-20120407-git / quicklisp 2012-04-07>
#<SYSTEM lispbuilder-regex / lispbuilder-20110619-svn / quicklisp 2012-04-07>
#<SYSTEM recursive-regex / recursive-regex-20120407-git / quicklisp 2012-04-07>
#<SYSTEM recursive-regex-test / recursive-regex-20120407-git / quicklisp 2012-04-07>
#<SYSTEM regex / regex-1 / quicklisp 2012-04-07>
*SECOND-VAR*
* *first-var*
NIL
* *second-var*
NIL
*
因此,似乎
multiple-value-bind
只使用multiple-value-bind
或其他打印命令在屏幕上打印文本?这样做的目的是通过使用一些字符串处理命令(可能是一些regex)提取输出的包名,并自动安装或重新安装
ql:system-apropos
返回的所有包,例如:(defparameter *package-name-string* "lispbuilder")
(multiple-value-bind (lispbuilder-packages-list) (ql:system-apropos *package-name-string*) (defparameter *lispbuilder-packages-list* lispbuilder-packages-list))
使用部分名称或某些正则表达式作为输入获取
format
包名称的任何其他方法也都是一个有效的解决方案(甚至获取当前完整的包列表也很有用)有什么可行的解决办法吗? 最佳答案
您与Common Lisp的交互看起来太复杂了。
您要求:将ql:system apropos返回的包名称存储到变量中。
它真的有退货吗还是只印些什么?
你很容易就知道了我在我的示例中使用:
CL-USER 141 > (apropos "plist" "CL")
SYMBOL-PLIST (defined)
MAPLIST (defined)
请描述返回值:
CL-USER 142 > (describe (apropos "plist" "CL"))
SYMBOL-PLIST (defined)
MAPLIST (defined)
NIL is a NULL
NAME "NIL"
VALUE NIL
FUNCTION #<unbound function>
PLIST (TYPE::DIRECT-TYPE-PREDICATE TYPE::RETURN-FALSE)
PACKAGE #<The COMMON-LISP package, 2/4 internal, 978/1024 external>
什么都没有。
CL:APROPOS
只是打印一些东西。Common Lisp使用输出流只需重新绑定保存输出流的变量:
CL-USER 143 > (with-output-to-string (*standard-output*)
(apropos "plist" "CL"))
"SYMBOL-PLIST (defined)
MAPLIST (defined)"
现在你得到了一个字符串,你可以解析它。
关于lisp - 将ql:system-apropos返回的包名称存储到变量中,我们在Stack Overflow上找到一个类似的问题:https://stackoverflow.com/questions/10474824/