我试着在学习普通lisp的同时使用CLX,因为我认为,如果我有一个实际的、实际的、实际的结果,学习它会更有效。不幸的是,我不能让CLX工作。在debian中安装了clisp和clisp-module-clx包之后,我遵循了clisp。
我想我只是对clisp的包/模块/等加载系统产生了可怕的误解,但是我找不到任何如何做到这一点的资源。
foo.lisp
(defun pop-up-window (life-time &optional (host ""))
(let* ((display (xlib:open-display host))
(screen (first (xlib:display-roots display)))
(root-window (xlib:screen-root screen))
(my-window (xlib:create-window
:parent root-window
:x 0
:y 0
:width 200
:height 300)))
(xlib:map-window my-window)
(xlib:display-finish-output display)
(format t "it should be here ~%")
(sleep life-time)
(xlib:destroy-window my-window)
(xlib:close-display display)
)
(pop-up-window 10)输出:there is no package with name "XLIB"
编辑:
我在代码开始时尝试了(require "clx"),但是我得到了#<PACKAGE COMMON-LISP> is locked。
https://stackoverflow.com/questions/48565832
复制相似问题