Question

在Ubuntu Raring的Emacs中..我在Emacs中加载了SBCL因为我一直使用它。我键入（ql：quickload“ieee-floats”），在输入M-- M-x slime加载ACL后，在emacs中新安装的ACL上加载我的第一个库，并收到此错误：

 While searching for system "ieee-floats":
    #P"/home/b/quicklisp/dists/quicklisp/software/c2ffi/README"
    evaluated to
    #P"/home/b/quicklisp/dists/quicklisp/software/c2ffi/README"
 which is
    not a directory.

我的ACL asdf： central-registry 的前几行是：

  (#P"/home/w/quicklisp/quicklisp/"
   #P"/home/w/quicklisp/dists/quicklisp/software/c2ffi/README"
   #P"/home/w/quicklisp/dists/quicklisp/software/c2ffi/autoclean"
   #P"/home/w/quicklisp/dists/quicklisp/software/c2ffi/config.h"
   #P"/home/w/quicklisp/dists/quicklisp/software/c2ffi/configure.ac"

所以acl只是查看第一个文件并停止。同样在ACL中的asdf： central-registry 中，它列出了根目录中的所有文件以及文件夹，但在SBCL中它只列出了quicklisp / dist / software中的所有根文件夹和SBCL的工作原理用于安装quicklisp库i / e

ACL列出所有根文件夹文件

  #P"/home/w/quicklisp/dists/quicklisp/software/trivial-features-20130312-git/SPEC"
  #P"/home/w/quicklisp/dists/quicklisp/software/trivial-features-20130312-git/README"
  #P"/home/w/quicklisp/dists/quicklisp/software/trivial-features-20130312-git/trivial-features.asd"
  #P"/home/w/quicklisp/dists/quicklisp/software/trivial-features-20130312-git/tests"
  #P"/home/w/quicklisp/dists/quicklisp/software/trivial-features-20130312-git/COPYRIGHT"
  #P"/home/w/quicklisp/dists/quicklisp/software/trivial-features-20130312-git/trivial-features-tests.asd"
  #P"/home/w/quicklisp/dists/quicklisp/software/trivial-features-20130312-git/src"
  #P"/home/w/quicklisp/dists/quicklisp/software/trivial-features-20130312-git/release.sh"

SBCL'S - 仅列出根文件夹

  #P"/home/w/quicklisp/dists/quicklisp/software/trivial-features-20130312-git/"

和sbcl和acl init文件包含相同的内容：

 (require :asdf)
 ;put all subdirectories of quicklisp\software into asdf:*central-registry*
  (dolist (dir (directory "/home/w/quicklisp/dists/quicklisp/software/*/"))
  (pushnew dir asdf:*central-registry* :test #'equal))

 ;;; The following lines added by ql:add-to-init-file:
 #-quicklisp
 (let ((quicklisp-init (merge-pathnames "quicklisp/setup.lisp"
                                        (user-homedir-pathname))))
   (when (probe-file quicklisp-init)
     (load quicklisp-init)))

Answer 1

*central-registry*被搞砸了。您的init文件中的;put all subdirectories位导致了问题。删除它，您只需使用ql:quickload加载库，例如(ql:quickload :vecto)。

在ALLEGRO-CL免费版中安装quicklisp库

1 个答案: