diff -ur gcc-xml-ffi.orig/gcc-xml-ffi.asd gcc-xml-ffi/gcc-xml-ffi.asd --- gcc-xml-ffi.orig/gcc-xml-ffi.asd 2005-07-24 13:44:50.000000000 -0500 +++ gcc-xml-ffi/gcc-xml-ffi.asd 2005-07-25 10:51:49.000000000 -0500 @@ -12,18 +12,8 @@ ;;;; (defclass gcc-xml-ffi-cl-source-file (cl-source-file) ()) -(defparameter *fasl-directory* - (make-pathname :directory '(:relative - #+sbcl "sbcl-fasl" - #+openmcl "openmcl-fasl" - #-(or sbcl openmcl) "fasl"))) - (defmethod source-file-type ((c gcc-xml-ffi-cl-source-file) (s module)) "cl") -(defmethod asdf::output-files :around ((operation compile-op) (c gcc-xml-ffi-cl-source-file)) - (list (merge-pathnames *fasl-directory* (compile-file-pathname (component-pathname c))))) - - (defsystem :gcc-xml-ffi :name "gcc-xml-ffi" :author "Cyrus Harmon"