Bug#762436: sbcl: ASDF/SOURCE-REGISTRY::DEFAULT-SOURCE-REGISTRY undefined

Daniel Borchmann daniel.borchmann at mailbox.tu-dresden.de
Mon Sep 22 11:08:37 UTC 2014 

Package: sbcl
Version: 2:1.2.3-1
Severity: normal

Dear Maintainer,

it seems the current version of ASDF (3.1.3) causes some troubles:

  # sbcl --no-userinit --no-sysinit
  * (require 'asdf)
  
  ("ASDF" "asdf" "UIOP" "uiop")
  * (asdf:load-system :asdf)
  
  debugger invoked on a UNDEFINED-FUNCTION in thread
  #<THREAD "main thread" RUNNING {10039C6663}>:
    The function ASDF/SOURCE-REGISTRY::DEFAULT-SOURCE-REGISTRY is undefined.
  
  Type HELP for debugger help, or (SB-EXT:EXIT) to exit from SBCL.
  
  restarts (invokable by number or by possibly-abbreviated name):
    0: [RETRY                        ] Retry ASDF operation.
    1: [CLEAR-CONFIGURATION-AND-RETRY] Retry ASDF operation after resetting the
                                       configuration.
    2: [ABORT                        ] Exit debugger, returning to top level.
  
  (SB-KERNEL:%COERCE-CALLABLE-TO-FUN ASDF/SOURCE-REGISTRY::DEFAULT-SOURCE-REGISTRY)
  0] backtrace

  Backtrace for: #<SB-THREAD:THREAD "main thread" RUNNING {10039C6663}>
  0: (SB-KERNEL:%COERCE-CALLABLE-TO-FUN ASDF/SOURCE-REGISTRY::DEFAULT-SOURCE-REGISTRY)
  1: ((:METHOD ASDF/SOURCE-REGISTRY:PROCESS-SOURCE-REGISTRY (SYMBOL)) ASDF/SOURCE-REGISTRY::DEFAULT-SOURCE-REGISTRY :INHERIT NIL :REGISTER #<CLOSURE (LAMBDA (DIRECTORY &KEY ASDF/SOURCE-REGISTRY::RECURSE ASDF/SOURCE-REGISTRY::EXCLUDE) :IN ASDF/SOURCE-REGISTRY:FLATTEN-SOURCE-REGISTRY) {10055025FB}>) [fast-method]
  2: (ASDF/SOURCE-REGISTRY::PROCESS-SOURCE-REGISTRY-DIRECTIVE :DEFAULT-REGISTRY :INHERIT (ASDF/SOURCE-REGISTRY:USER-SOURCE-REGISTRY-DIRECTORY ASDF/SOURCE-REGISTRY:DEFAULT-USER-SOURCE-REGISTRY ASDF/SOURCE-REGISTRY:SYSTEM-SOURCE-REGISTRY ASDF/SOURCE-REGISTRY:SYSTEM-SOURCE-REGISTRY-DIRECTORY ASDF/SOURCE-REGISTRY:DEFAULT-SYSTEM-SOURCE-REGISTRY) :REGISTER #<CLOSURE (LAMBDA (DIRECTORY &KEY ASDF/SOURCE-REGISTRY::RECURSE ASDF/SOURCE-REGISTRY::EXCLUDE) :IN ASDF/SOURCE-REGISTRY:FLATTEN-SOURCE-REGISTRY) {10055025FB}>)
  3: ((:METHOD ASDF/SOURCE-REGISTRY:PROCESS-SOURCE-REGISTRY (CONS)) (:SOURCE-REGISTRY (:TREE (:HOME ".config/common-lisp/systems/")) :DEFAULT-REGISTRY :INHERIT-CONFIGURATION) :INHERIT (ASDF/SOURCE-REGISTRY:USER-SOURCE-REGISTRY-DIRECTORY ASDF/SOURCE-REGISTRY:DEFAULT-USER-SOURCE-REGISTRY ASDF/SOURCE-REGISTRY:SYSTEM-SOURCE-REGISTRY ASDF/SOURCE-REGISTRY:SYSTEM-SOURCE-REGISTRY-DIRECTORY ASDF/SOURCE-REGISTRY:DEFAULT-SYSTEM-SOURCE-REGISTRY) :REGISTER #<CLOSURE (LAMBDA (DIRECTORY &KEY ASDF/SOURCE-REGISTRY::RECURSE ASDF/SOURCE-REGISTRY::EXCLUDE) :IN ASDF/SOURCE-REGISTRY:FLATTEN-SOURCE-REGISTRY) {10055025FB}>) [fast-method]
  4: ((:METHOD ASDF/SOURCE-REGISTRY:PROCESS-SOURCE-REGISTRY (PATHNAME)) #P"/home/exot/.config/common-lisp/source-registry.conf" :INHERIT (ASDF/SOURCE-REGISTRY:USER-SOURCE-REGISTRY-DIRECTORY ASDF/SOURCE-REGISTRY:DEFAULT-USER-SOURCE-REGISTRY ASDF/SOURCE-REGISTRY:SYSTEM-SOURCE-REGISTRY ASDF/SOURCE-REGISTRY:SYSTEM-SOURCE-REGISTRY-DIRECTORY ASDF/SOURCE-REGISTRY:DEFAULT-SYSTEM-SOURCE-REGISTRY) :REGISTER #<CLOSURE (LAMBDA (DIRECTORY &KEY ASDF/SOURCE-REGISTRY::RECURSE ASDF/SOURCE-REGISTRY::EXCLUDE) :IN ASDF/SOURCE-REGISTRY:FLATTEN-SOURCE-REGISTRY) {10055025FB}>) [fast-method]
  5: (ASDF/SOURCE-REGISTRY::PROCESS-SOURCE-REGISTRY-DIRECTIVE :INHERIT-CONFIGURATION :INHERIT (NIL ASDF/SOURCE-REGISTRY:ENVIRONMENT-SOURCE-REGISTRY ASDF/SOURCE-REGISTRY:USER-SOURCE-REGISTRY ASDF/SOURCE-REGISTRY:USER-SOURCE-REGISTRY-DIRECTORY ASDF/SOURCE-REGISTRY:DEFAULT-USER-SOURCE-REGISTRY ASDF/SOURCE-REGISTRY:SYSTEM-SOURCE-REGISTRY ASDF/SOURCE-REGISTRY:SYSTEM-SOURCE-REGISTRY-DIRECTORY ASDF/SOURCE-REGISTRY:DEFAULT-SYSTEM-SOURCE-REGISTRY) :REGISTER #<CLOSURE (LAMBDA (DIRECTORY &KEY ASDF/SOURCE-REGISTRY::RECURSE ASDF/SOURCE-REGISTRY::EXCLUDE) :IN ASDF/SOURCE-REGISTRY:FLATTEN-SOURCE-REGISTRY) {10055025FB}>)
  6: ((:METHOD ASDF/SOURCE-REGISTRY:PROCESS-SOURCE-REGISTRY (CONS)) (:SOURCE-REGISTRY (:TREE #P"/usr/lib/sbcl/") :INHERIT-CONFIGURATION) :INHERIT (NIL ASDF/SOURCE-REGISTRY:ENVIRONMENT-SOURCE-REGISTRY ASDF/SOURCE-REGISTRY:USER-SOURCE-REGISTRY ASDF/SOURCE-REGISTRY:USER-SOURCE-REGISTRY-DIRECTORY ASDF/SOURCE-REGISTRY:DEFAULT-USER-SOURCE-REGISTRY ASDF/SOURCE-REGISTRY:SYSTEM-SOURCE-REGISTRY ASDF/SOURCE-REGISTRY:SYSTEM-SOURCE-REGISTRY-DIRECTORY ASDF/SOURCE-REGISTRY:DEFAULT-SYSTEM-SOURCE-REGISTRY) :REGISTER #<CLOSURE (LAMBDA (DIRECTORY &KEY ASDF/SOURCE-REGISTRY::RECURSE ASDF/SOURCE-REGISTRY::EXCLUDE) :IN ASDF/SOURCE-REGISTRY:FLATTEN-SOURCE-REGISTRY) {10055025FB}>) [fast-method]
  7: (ASDF/SOURCE-REGISTRY:FLATTEN-SOURCE-REGISTRY NIL)
  8: (ASDF/SOURCE-REGISTRY:COMPUTE-SOURCE-REGISTRY NIL #<HASH-TABLE :TEST EQUAL :COUNT 0 {1005502523}>)
  9: (ASDF/SOURCE-REGISTRY:ENSURE-SOURCE-REGISTRY NIL)
  10: (ASDF/FIND-SYSTEM:SYSDEF-SOURCE-REGISTRY-SEARCH "asdf")
  11: ((FLET ASDF/FIND-SYSTEM::TRY :IN ASDF/FIND-SYSTEM:SEARCH-FOR-SYSTEM-DEFINITION) ASDF/FIND-SYSTEM:SYSDEF-SOURCE-REGISTRY-SEARCH)
  12: ((FLET ASDF/FIND-SYSTEM::TRY :IN ASDF/FIND-SYSTEM:SEARCH-FOR-SYSTEM-DEFINITION) ASDF/FIND-SYSTEM:SYSDEF-SOURCE-REGISTRY-SEARCH) [external]
  13: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (FLET ASDF/FIND-SYSTEM::TRY :IN ASDF/FIND-SYSTEM:SEARCH-FOR-SYSTEM-DEFINITION) {100550208B}> (ASDF/PACKAGE-INFERRED-SYSTEM:SYSDEF-PACKAGE-INFERRED-SYSTEM-SEARCH ASDF/FIND-SYSTEM:SYSDEF-CENTRAL-REGISTRY-SEARCH ASDF/FIND-SYSTEM:SYSDEF-SOURCE-REGISTRY-SEARCH))
  14: (ASDF/FIND-SYSTEM:SEARCH-FOR-SYSTEM-DEFINITION "asdf")
  15: (ASDF/FIND-SYSTEM:SEARCH-FOR-SYSTEM-DEFINITION "asdf") [tl,external]
  16: (ASDF/FIND-SYSTEM:LOCATE-SYSTEM "asdf")
  17: ((LAMBDA NIL :IN ASDF/SYSTEM:FIND-SYSTEM))
  18: (ASDF/CACHE:CONSULT-ASDF-CACHE (ASDF/SYSTEM:FIND-SYSTEM "asdf") #<CLOSURE (LAMBDA NIL :IN ASDF/SYSTEM:FIND-SYSTEM) {1005501FAB}>)
  19: ((:METHOD ASDF/SYSTEM:FIND-SYSTEM (STRING)) "asdf" NIL) [fast-method]
  20: ((:METHOD ASDF/FIND-COMPONENT:FIND-COMPONENT (STRING T)) "asdf" NIL) [fast-method]
  21: ((:METHOD ASDF/OPERATE:OPERATE (SYMBOL T)) ASDF/LISP-ACTION:LOAD-OP :ASDF :VERBOSE NIL) [fast-method]
  22: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> ASDF/LISP-ACTION:LOAD-OP :ASDF :VERBOSE NIL)
  23: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
  24: (ASDF/CACHE:CALL-WITH-ASDF-CACHE #<CLOSURE (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {100534AADB}> :OVERRIDE NIL :KEY NIL)
  25: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP :ASDF :VERBOSE NIL) [fast-method]
  26: (ASDF/OPERATE:LOAD-SYSTEM :ASDF :VERBOSE NIL)
  27: (ASDF/UPGRADE:UPGRADE-ASDF)
  28: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP :ASDF) [fast-method]
  29: (ASDF/OPERATE:LOAD-SYSTEM :ASDF)
  30: (SB-INT:SIMPLE-EVAL-IN-LEXENV (ASDF/OPERATE:LOAD-SYSTEM :ASDF) #<NULL-LEXENV>)
  31: (EVAL (ASDF/OPERATE:LOAD-SYSTEM :ASDF))
  32: (INTERACTIVE-EVAL (ASDF/OPERATE:LOAD-SYSTEM :ASDF) :EVAL NIL)
  33: (SB-IMPL::REPL-FUN NIL)
  34: ((LAMBDA NIL :IN SB-IMPL::TOPLEVEL-REPL))
  35: (SB-IMPL::%WITH-REBOUND-IO-SYNTAX #<CLOSURE (LAMBDA NIL :IN SB-IMPL::TOPLEVEL-REPL) {10039C838B}>)
  36: (SB-IMPL::TOPLEVEL-REPL NIL)
  37: (SB-IMPL::TOPLEVEL-INIT)
  38: ((FLET #:WITHOUT-INTERRUPTS-BODY-89 :IN SAVE-LISP-AND-DIE))
  39: ((LABELS SB-IMPL::RESTART-LISP :IN SAVE-LISP-AND-DIE))
  
  0]

Or am I doing something wrong here?

Thanks for your time!

  Daniel

-- System Information:
Debian Release: jessie/sid
  APT prefers unstable
  APT policy: (500, 'unstable'), (500, 'testing'), (500, 'stable'), (1, 'experimental')
Architecture: amd64 (x86_64)
Foreign Architectures: i386

Kernel: Linux 3.14-2-amd64 (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/dash

Versions of packages sbcl depends on:
ii  libc6   2.19-11
ii  zlib1g  1:1.2.8.dfsg-2

Versions of packages sbcl recommends:
pn  binfmt-support  <none>

Versions of packages sbcl suggests:
pn  sbcl-doc     <none>
ii  sbcl-source  2:1.2.3-1
pn  slime        <none>

-- no debconf information

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