禁用 lispworks capi:push-button-panel 上的单个按钮
我正在使用 Common Lisp 和 LispWorks CAPI 开发四子棋游戏。我已经完成了界面,除了一件事:我使用按钮(在按钮面板中)将片段放入列中,并且我想在…
SBCL 套接字:重用地址
对 sockopt-reuse-address 的调用似乎没有效果。 (setf socket (make-instance 'sb-bsd-sockets:inet-socket :type type :protocol protocol) (setf (…
如何找到 LC_XXX 区域设置整数常量的值,以便我可以将它们与 cffi 一起使用
我有这段代码: (define-foreign-library libc (:unix "libc.so.6")) (use-foreign-library libc) (defcfun "setlocale" :pointer (category :int) (l…
为 Common Lisp 生成一定范围内的随机数
我正在做一些作业,其中一部分我必须生成 10 - 80 范围内的随机数。我知道(随机 80)将返回一个小于 80 的数字,但我如何才能使数字大于 10还有?…
sbcl 中奇怪的类优先级列表
在 sbcl 中, *(sb-mop:class-precedence-list (find-class 'cons)) ==>(# # # #) cons 继承自 list 而不是相反,这不是很奇怪吗?我在这里缺少什么?…
Common Lisp 包枚举的异常处理
因此,运行此 lisp 代码来获取 common-lisp-user 包中的所有符号: (do-symbols (sym 'common-lisp-user) (print sym)) 我收到此错误: * - PRINT: 字…
在 Common Lisp 中,如何以可移植的方式检查对象的类型
我想定义一个专门处理具有无符号字节 8 元素的数组类型对象的方法。在 sbcl 中,当您 (make-array x :element-type '(unsigned-byte 8)) 时,对象类由…
更改列表的第 n 个元素
我想更改列表的第 n 个元素并返回一个新列表。 我想到了三个相当不优雅的解决方案: (defun set-nth1 (list n value) (let ((list2 (copy-seq list)))…
如何使用子列表对列表进行排序(Common Lisp)
如何对包含子列表的列表进行排序? (setq list '((0) (1) (2) (0 1 5) (0 1 3) (0 1 5) (0 3 0) (0) (1) (2 7 19) (0 0 3 0))) ; restricting the sor…
Clojure 与其他 Lisp 对比
我的问题的目的不是要引发一场口水战,而是要确定每种语言在什么情况下是“完成这项工作的最佳工具”。 我读过几本关于 Clojure 的书(Programming Cl…
在宏内部,我可以将 ,var 计算为空白/无吗?
感谢之前对 common 的回答lisp:宏如何使用以编程方式生成的名称定义其他方法/宏? 我有一个定义辅助函数的宏(实际上我有一个宏,我最喜欢的 lisp-ne…