close Warning: Failed to sync with repository "(default)": database is locked; repository information may be out of date. Look in the Trac log for more information including mitigation strategies.

Changeset 13318


Ignore:
Timestamp:
06/10/11 08:37:39 (13 years ago)
Author:
Mark Evenson
Message:

Update to asdf-2.016.1 to align with upstream ASDF.

Fare patched the problems with compiling files with jars in a non-ABCL
specific manner in COMPILE-FILE-PATHNAME*.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/abcl/src/org/armedbear/lisp/asdf.lisp

    r13316 r13318  
    35273527      ;;; a non-jar path have been affected, no further computation of
    35283528      ;;; the output location is necessary.
    3529       (if (and (find :abcl *features*)
    3530                (pathname-device input-file) ; input-file is in a jar
    3531                (not (pathname-device output-file)) ; output-file is not in a jar
    3532                (equal (pathname-type input-file) "lisp")
    3533                (equal (pathname-type output-file) "abcl"))
    3534           output-file
    3535           (apply 'compile-file-pathname (lispize-pathname input-file) keys))
     3529      ;; (if (and (find :abcl *features*)
     3530      ;;          (pathname-device input-file) ; input-file is in a jar
     3531      ;;          (not (pathname-device output-file)) ; output-file is not in a jar
     3532      ;;          (equal (pathname-type input-file) "lisp")
     3533      ;;          (equal (pathname-type output-file) "abcl"))
     3534      ;;     output-file
     3535          (apply 'compile-file-pathname (lispize-pathname input-file) keys);)
    35363536      (apply-output-translations
    35373537       (apply 'compile-file-pathname
Note: See TracChangeset for help on using the changeset viewer.