Bug#515833: cl-swank: Swank fails to load with SBCL 1.0.25.0

Shreyas shreyas at umd.edu
Tue Feb 17 20:37:08 UTC 2009


Package: cl-swank
Version: 1:20080223-2
Severity: grave
Justification: renders package unusable


With SBCL 1.0.25.0 (in Debian unstable), swank fails to load. The
problem occurs in the file swank-sbcl.lisp where it looks for the symbol
sb-di:debug-source-from which seems to have been replaced by
sb-di:debug-source-namestring in SBCL > 1.0.18. The upstream package
seems to have the bug fix. The exact error is attached below. 


-- System Information:
Debian Release: 5.0
  APT prefers unstable
  APT policy: (500, 'unstable')
Architecture: i386 (i686)

Kernel: Linux 2.6.26-1-686-bigmem (SMP w/2 CPU cores)
Locale: LANG=en_US.UTF-8, LC_CTYPE=en_US.UTF-8 (charmap=UTF-8)
Shell: /bin/sh linked to /bin/bash

Versions of packages cl-swank depends on:
ii  common-lisp-controller        6.17       Common Lisp source and compiler ma

cl-swank recommends no packages.

Versions of packages cl-swank suggests:
ii  slime                       1:20080223-2 Superior LISP Interaction Mode for

-- no debconf information

*** /tmp/swank-bug
(progn (load "/usr/share/common-lisp/source/slime/swank-loader.lisp" :verbose t) (funcall (read-from-string "swank-loader:init")) (funcall (read-from-string "swank:start-server") "/tmp/slime.25906" :coding-system "iso-latin-1-unix"))

This is SBCL 1.0.25.debian, an implementation of ANSI Common Lisp.
More information about SBCL is available at <http://www.sbcl.org/>.

SBCL is free software, provided as is, with absolutely no warranty.
It is mostly in the public domain; some portions are provided under
BSD-style licenses.  See the CREDITS and COPYING files in the
distribution for more information.
* 
; loading #P"/usr/share/common-lisp/source/slime/swank-loader.lisp"
; in: LAMBDA NIL
;     (SB-INT:NAMED-LAMBDA SWANK-LOADER::BINARY-PATHNAME
;                          (SWANK-LOADER::SRC-PATHNAME SWANK-LOADER::BINARY-DIR)
;                          (DECLARE (IGNORE SWANK-LOADER::BINARY-DIRECTORY))
;                          (BLOCK SWANK-LOADER::BINARY-PATHNAME
;                            (LET ((SWANK-LOADER::CFP #))
;                              (MERGE-PATHNAMES
;                               (MAKE-PATHNAME :DIRECTORY `# :NAME # :TYPE #)
;                               (COMMON-LISP-CONTROLLER:CALCULATE-FASL-ROOT)))))
; ==>
;   #'(SB-INT:NAMED-LAMBDA SWANK-LOADER::BINARY-PATHNAME
;                          (SWANK-LOADER::SRC-PATHNAME SWANK-LOADER::BINARY-DIR)
;                          (DECLARE (IGNORE SWANK-LOADER::BINARY-DIRECTORY))
;                          (BLOCK SWANK-LOADER::BINARY-PATHNAME
;                            (LET ((SWANK-LOADER::CFP #))
;                              (MERGE-PATHNAMES
;                               (MAKE-PATHNAME :DIRECTORY `# :NAME # :TYPE #)
;                               (COMMON-LISP-CONTROLLER:CALCULATE-FASL-ROOT)))))
; 
; caught STYLE-WARNING:
;   declaring unknown variable BINARY-DIRECTORY to be ignored
; 
; caught STYLE-WARNING:
;   The variable BINARY-DIR is defined but never used.
; 
; compilation unit finished
;   caught 2 STYLE-WARNING conditions
; loading #P"/var/cache/common-lisp-controller/1000/sbcl/swank/fasl/sbcl-1.0.25.debian-linux-x86/swank-backend.fasl"
; loading #P"/var/cache/common-lisp-controller/1000/sbcl/swank/fasl/sbcl-1.0.25.debian-linux-x86/swank-source-path-parser.fasl"
; loading #P"/var/cache/common-lisp-controller/1000/sbcl/swank/fasl/sbcl-1.0.25.debian-linux-x86/swank-source-file-cache.fasl"

; compiling file "/usr/share/common-lisp/source/slime/swank-sbcl.lisp" (written 24 FEB 2008 10:18:27 AM):

; file: /usr/share/common-lisp/source/slime/swank-sbcl.lisp
; in: DEFUN ENABLE-SIGIO-ON-FD
;     (SB-POSIX:FCNTL SWANK-BACKEND::FD SB-POSIX:F-SETOWN (SWANK-BACKEND:GETPID))
; --> BLOCK IF ETYPECASE LET COND IF COND IF COND IF PROGN 
; --> SB-POSIX::WITH-ALIEN-FLOCK WITH-ALIEN SYMBOL-MACROLET SYMBOL-MACROLET LET 
; --> LET LET SYMBOL-MACROLET UNWIND-PROTECT FLET BLOCK MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN 
; --> SB-POSIX::FLOCK-TO-ALIEN SB-POSIX::A-FLOCK SB-ALIEN-INTERNALS:LOCAL-ALIEN 
; --> SB-ALIEN-INTERNALS:NATURALIZE 
; ==>
;   (SB-ALIEN-INTERNALS:%SAP-ALIEN ALIEN
;                                  '#<SB-ALIEN-INTERNALS:ALIEN-POINTER-TYPE (*
;                                                                            (STRUCT
;                                                                             SB-POSIX::ALIEN-FLOCK
;                                                                             (TYPE
;                                                                              #)
;                                                                             (SB-POSIX::WHENCE
;                                                                              #)
;                                                                             (SB-POSIX::START
;                                                                              #)
;                                                                             (SB-POSIX::LEN
;                                                                              #)
;                                                                             (SB-POSIX::PID
;                                                                              #)
;                                                                             (SB-POSIX::PADDING20
;                                                                              #)))>)
; 
; note: unable to
;   optimize
; because:
;   could not optimize away %SAP-ALIEN: forced to do runtime 
; allocation of alien-value structure

; --> BLOCK IF ETYPECASE LET COND IF COND IF COND IF PROGN 
; --> SB-POSIX::WITH-ALIEN-FLOCK WITH-ALIEN SYMBOL-MACROLET SYMBOL-MACROLET LET 
; --> LET LET SYMBOL-MACROLET UNWIND-PROTECT FLET BLOCK MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN LET 
; --> SB-POSIX::FCNTL-WITH-POINTER-ARG SB-POSIX::A-FLOCK 
; --> SB-ALIEN-INTERNALS:LOCAL-ALIEN SB-ALIEN-INTERNALS:NATURALIZE 
; ==>
;   (SB-ALIEN-INTERNALS:%SAP-ALIEN ALIEN
;                                  '#<SB-ALIEN-INTERNALS:ALIEN-POINTER-TYPE (*
;                                                                            (STRUCT
;                                                                             SB-POSIX::ALIEN-FLOCK
;                                                                             (TYPE
;                                                                              #)
;                                                                             (SB-POSIX::WHENCE
;                                                                              #)
;                                                                             (SB-POSIX::START
;                                                                              #)
;                                                                             (SB-POSIX::LEN
;                                                                              #)
;                                                                             (SB-POSIX::PID
;                                                                              #)
;                                                                             (SB-POSIX::PADDING20
;                                                                              #)))>)
; 
; note: unable to
;   optimize
; because:
;   could not optimize away %SAP-ALIEN: forced to do runtime 
; allocation of alien-value structure

; --> BLOCK IF ETYPECASE LET COND IF COND IF COND IF PROGN 
; --> SB-POSIX::WITH-ALIEN-FLOCK WITH-ALIEN SYMBOL-MACROLET SYMBOL-MACROLET LET 
; --> LET LET SYMBOL-MACROLET UNWIND-PROTECT FLET BLOCK MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN LET 
; --> SB-POSIX::ALIEN-TO-FLOCK SB-POSIX::A-FLOCK SB-ALIEN-INTERNALS:LOCAL-ALIEN 
; --> SB-ALIEN-INTERNALS:NATURALIZE 
; ==>
;   (SB-ALIEN-INTERNALS:%SAP-ALIEN ALIEN
;                                  '#<SB-ALIEN-INTERNALS:ALIEN-POINTER-TYPE (*
;                                                                            (STRUCT
;                                                                             SB-POSIX::ALIEN-FLOCK
;                                                                             (TYPE
;                                                                              #)
;                                                                             (SB-POSIX::WHENCE
;                                                                              #)
;                                                                             (SB-POSIX::START
;                                                                              #)
;                                                                             (SB-POSIX::LEN
;                                                                              #)
;                                                                             (SB-POSIX::PID
;                                                                              #)
;                                                                             (SB-POSIX::PADDING20
;                                                                              #)))>)
; 
; note: unable to
;   optimize
; because:
;   could not optimize away %SAP-ALIEN: forced to do runtime 
; allocation of alien-value structure

; --> BLOCK IF ETYPECASE LET COND IF COND IF COND IF PROGN 
; --> SB-POSIX::WITH-ALIEN-FLOCK WITH-ALIEN SYMBOL-MACROLET SYMBOL-MACROLET LET 
; --> LET LET SYMBOL-MACROLET UNWIND-PROTECT FLET BLOCK 
; --> SB-POSIX::FREE-ALIEN-FLOCK SB-POSIX::A-FLOCK 
; --> SB-ALIEN-INTERNALS:LOCAL-ALIEN SB-ALIEN-INTERNALS:NATURALIZE 
; ==>
;   (SB-ALIEN-INTERNALS:%SAP-ALIEN ALIEN
;                                  '#<SB-ALIEN-INTERNALS:ALIEN-POINTER-TYPE (*
;                                                                            (STRUCT
;                                                                             SB-POSIX::ALIEN-FLOCK
;                                                                             (TYPE
;                                                                              #)
;                                                                             (SB-POSIX::WHENCE
;                                                                              #)
;                                                                             (SB-POSIX::START
;                                                                              #)
;                                                                             (SB-POSIX::LEN
;                                                                              #)
;                                                                             (SB-POSIX::PID
;                                                                              #)
;                                                                             (SB-POSIX::PADDING20
;                                                                              #)))>)
; 
; note: unable to
;   optimize
; because:
;   could not optimize away %SAP-ALIEN: forced to do runtime 
; allocation of alien-value structure

; in: DEFIMPLEMENTATION ARGLIST
;     (SB-INTROSPECT:FUNCTION-ARGLIST SWANK-BACKEND::FNAME)
; 
; caught WARNING:
;   (in macroexpansion of (SB-INTROSPECT:FUNCTION-ARGLIST FNAME))
;   (hint: For more precise location, try *BREAK-ON-SIGNALS*.)
;   using deprecated SB-INTROSPECT:FUNCTION-ARGLIST, should use SB-INTROSPECT:FUNCTION-LAMBDA-LIST instead
; 
; compilation unit aborted
;   caught 1 fatal ERROR condition
;   caught 1 WARNING condition
;   printed 4 notes
; compilation aborted because of fatal error:
;   READ failure in COMPILE-FILE:
;     SB-INT:SIMPLE-READER-PACKAGE-ERROR at 29682 (line 790, column 39) on #<SB-SYS:FD-STREAM for "file /usr/share/common-lisp/source/slime/swank-sbcl.lisp" {B7065A9}>:
;       Symbol "DEBUG-SOURCE-FROM" not found in the SB-DI package.; compilation aborted after 0:00:00.606
;; 
                                                                  ;; Error while loading: /var/cache/common-lisp-controller/1000/sbcl/swank/fasl/sbcl-1.0.25.debian-linux-x86/swank-sbcl.fasl
                                                                  ;; Condition: Couldn't
                                                                  ;;            load
                                                                  ;;            #P"/var/cache/common-lisp-controller/1000/sbcl/swank/fasl/sbcl-1.0.25.debian-linux-x86/swank-sbcl.fasl":
                                                                  ;;            file
                                                                  ;;            does
                                                                  ;;            not
                                                                  ;;            exist.
                                                                  ;; Aborting.
                                                                  ;; * 





More information about the pkg-common-lisp-devel mailing list