Changeset 13318
- Timestamp:
- 06/10/11 08:37:39 (13 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/abcl/src/org/armedbear/lisp/asdf.lisp
r13316 r13318 3527 3527 ;;; a non-jar path have been affected, no further computation of 3528 3528 ;;; the output location is necessary. 3529 (if (and (find :abcl *features*)3530 (pathname-device input-file) ; input-file is in a jar3531 (not (pathname-device output-file)) ; output-file is not in a jar3532 (equal (pathname-type input-file) "lisp")3533 (equal (pathname-type output-file) "abcl"))3534 output-file3535 (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);) 3536 3536 (apply-output-translations 3537 3537 (apply 'compile-file-pathname
Note: See TracChangeset
for help on using the changeset viewer.