Re: [asdf-devel] Changes to ASDF for LW6

I beg to differ... I simply loaded ASDF into the boot-up configuration of LW, which happens to be in package LW-USER. There is no overt (:USE :LISPWORKS) anywhere in sight, and certainly not in the ASDF source code.

So the fact is, I already have :LISPWORKS in use, and I have no choice about the matter during initial bootup.

- DM

On Feb 26, 2010, at 01:13 AM, Chun Tian (binghe) wrote:

Hi, David

I don't think it's necessary to make ASDF and LISPWORKS two packages live together. What you met can only happen when you try to defined a package which use above two packages at the same time:

(defpackage xxx (:use :cl :asdf :lispworks))

I don't think you have any good reason to use such a package.

Regards,

Chun Tian (binghe)

在 2010-2-26，15:44， David McClain 写道：

...

Hi,

I just installed the latest available source for ASDF and had to make a few minor changes to the way the ASDF Package was being defined, for compatibility with Lispworks 6.0: (changes highlighted in red -- if you can see them)

  ...

      (ensure-shadow (package symbols)
        (shadow symbols package))

      (ensure-package (name &key nicknames use export unintern shadow)
        (let* ((p (ensure-exists name nicknames)))
          (ensure-use p use)
          (ensure-unintern p unintern)

          (ensure-shadow p shadow)

          (ensure-export p export)
          p)))

(ensure-package ':asdf-utilities :nicknames '(#:asdf-extensions) :use '(#:common-lisp) :export '(#:absolute-pathname-p #:aif

  #-:LISPWORKS #:appendf

  #:asdf-message
  #:coerce-name
  #:directory-pathname-p
  #:ends-with
  #:ensure-directory-pathname

  #-:LISPWORKS #:getenv

  #:get-uid
  #:length=n-p
  #:make-collector
  #:pathname-directory-pathname
  #:pathname-sans-name+type ;; deprecated. Use pathname-directory-pathname
  #:read-file-forms
  #:remove-keys
  #:remove-keyword
  #:resolve-symlinks
  #:split
  #:component-name-to-pathname-components
  #:system-registered-p
  #:truenamize))

(ensure-package ':asdf :use '(:common-lisp :asdf-utilities) :unintern '(#:*asdf-revision*)

:shadow #+:LISPWORKS '(#:load-system
                       #:compile-system
                       #:defsystem) 
#-:LISPWORKS '()

:export
'(#:defsystem #:oos #:operate #:find-system #:run-shell-command
  #:system-definition-pathname #:find-component ; miscellaneous
  #:compile-system #:load-system #:test-system
  #:compile-op #:load-op #:load-source-op

Dr. David McClain dbm@refined-audiometrics.com

---

asdf-devel mailing list asdf-devel@common-lisp.net http://common-lisp.net/cgi-bin/mailman/listinfo/asdf-devel

Dr. David McClain dbm@refined-audiometrics.com