... rather, in package :CL-USER, not :LW-USER. But apparently, LISPWORKS is automatically being used in CL-USER...
- 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 >> [email protected] >> >> >> >> _______________________________________________ >> asdf-devel mailing list >> [email protected] >> http://common-lisp.net/cgi-bin/mailman/listinfo/asdf-devel > Dr. David McClain [email protected] _______________________________________________ asdf-devel mailing list [email protected] http://common-lisp.net/cgi-bin/mailman/listinfo/asdf-devel
