[asdf-devel] Problem with CMUCL 20e and ASDF

[Pascal Costanza]

Hi,

I just installed CMUCL 20e on my Mac OS X 10.8.5. CMUCL 20e release notes say that it comes with ASDF 3.0.2.

My .cmucl-init.lisp file looks like this:

(setf (logical-pathname-translations "costanza")
      `(("**;*.fasl.*" ,(format nil "/Users/costanza/.cache/common-lisp/~A ~A/**/*.fasl"
                                (lisp-implementation-type)
                                (lisp-implementation-version)))
        ("**;*.*.*" "/Users/costanza/**/*.*")))

;;; 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)))



When I start CMUCL, I see this:

; Loading #P"/Users/costanza/.cmucl-init.lisp".
;; Loading #P"/Users/costanza/quicklisp/setup.lisp".
;;; Loading #P"/Users/costanza/lib/cmucl/lib/contrib/asdf/asdf.sse2f".


Error in function UIOP/UTILITY:CALL-FUNCTION:
   Invalid pathname #P"~/lisp/develop/": Expected an absolute pathname
   [Condition of type SIMPLE-ERROR]

Restarts:
  0: [REINITIALIZE-SOURCE-REGISTRY-AND-RETRY] Retry finding system asdf after
                                              reinitializing the
                                              source-registry.
  1: [CONTINUE                              ] Return NIL from load of #P"home:quicklisp/setup.lisp".
  2:                                          Return NIL from load of "home:.cmucl-init".
  3: [ABORT                                 ] Skip remaining initializations.

Debug  (type H for help)

(UIOP/UTILITY:CALL-FUNCTION ERROR
                            "Invalid pathname ~S: ~*~?"
                            #P"~/lisp/develop/"
                            :WANT-ABSOLUTE ...)
Source: 
; File: modules:asdf/asdf.lisp

; File has been modified since compilation:
;   modules:asdf/asdf.lisp
; Using form offset instead of character position.
(APPLY (ENSURE-FUNCTION FUNCTION-SPEC) ARGUMENTS)
0] 


What do I do?


Pascal

--
Pascal Costanza
The views expressed in this email are my own, and not those of my employer.