Dear Christoph,
1) Objective
I would like to be able to load libraries (such as `getopt') and modules
(such as `clx'). I understand that the commands are:
(clc:clc-require :getopt)
(require "clx")
but that one must first load and initialize the `common-lisp-controller'.
2) Test code
#!/usr/bin/clisp -ansi -q -q
(print *features*)
(print "1 - loading common-lisp-controller")
(load
#P"/usr/share/common-lisp/source/common-lisp-controller/common-lisp-controller.lisp")
(print "2 - initializing common-lisp-controller")
(common-lisp-controller:init-common-lisp-controller-v4 "clisp")
(print "3 - loading library")
(clc:clc-require :getopt)
(print "4 - loading module")
(require "clx")
3) Test output
(:READLINE :REGEXP :SYSCALLS :I18N :LOOP :COMPILER :CLOS :MOP :CLISP
:ANSI-CL
:COMMON-LISP :LISP=CL :INTERPRETER :SOCKETS :GENERIC-STREAMS
:LOGICAL-PATHNAMES :SCREEN :FFI :GETTEXT :UNICODE :BASE-CHAR=CHARACTER
:WORD-SIZE=64 :PC386 :UNIX)
"1 - loading common-lisp-controller"
"2 - initializing common-lisp-controller"
WARNING: Replacing method
#<STANDARD-METHOD (#<BUILT-IN-CLASS FUNCTION> #<BUILT-IN-CLASS T>)>
in #<STANDARD-GENERIC-FUNCTION SLURP-INPUT-STREAM>
<snip>
WARNING: Replacing method
#<STANDARD-METHOD
(#<STANDARD-CLASS PACKAGE-INFERRED-SYSTEM-MISSING-PACKAGE-ERROR>
#<BUILT-IN-CLASS T>)>
in #<STANDARD-GENERIC-FUNCTION PRINT-OBJECT>
*** - OPEN: File #P"/usr/share/common-lisp/source/cl-asdf/wild-modules.lisp"
does not exist
4) Analysis
;;;
;;; Design note:
;;;
;;; 1) `clisp' uses `common-lisp-controller' to load libraries.
;;;
;;; Libraries are loaded with (clc:clc-require :foo).
;;; Modules are loaded with (require "foo").
;;;
;;; 2) `common-lisp-controller' expects to find `wild-modules.lisp'
;;; under `/usr/share/common-lisp/source/cl-asdf/'. However, starting
;;; with `cl-asdf' version 2.26.72, that file is found under
;;; `/usr/share/common-lisp/source/cl-asdf/contrib/'. Because
;;; `common-lisp-controller' cannot find the new location, this is a
;;; bug.
;;;
;;; (common-lisp-controller:init-common-lisp-controller-v4 "clisp") ==>
;;; *** - OPEN: File
#P"/usr/share/common-lisp/source/cl-asdf/wild-modules.lisp"
;;; does not exist
;;;
;;; As a workaround, WP-MIRROR sets a symbolic link.
;;;
(rootshell) cd /usr/share/common-lisp/source/cl-asdf/
(rootshell) ln -s contrib/wild-modules.lisp wild-modules.lisp
This works around the fatal bug. However, the flood of WARNING messages is
the same.
5) Reporting
As I am new to this list, I would like to know if I should file a Debian
bug report; and, if so, against which package.
Sincerely Yours,
Kent
_______________________________________________
pkg-common-lisp-devel mailing list
pkg-common-lisp-devel@lists.alioth.debian.org
http://lists.alioth.debian.org/cgi-bin/mailman/listinfo/pkg-common-lisp-devel
