r2912: rename .cl to .lisp
[uffi.git] / uffi.asd
index dfb8608c3c1e4de9b988f37b24a1a6d55eb24095..76737d32bd9dd535b470652b18195e265890434a 100644 (file)
--- a/uffi.asd
+++ b/uffi.asd
@@ -7,7 +7,7 @@
 ;;;; Programmer:    Kevin M. Rosenberg
 ;;;; Date Started:  Aug 2002
 ;;;;
-;;;; $Id: uffi.asd,v 1.16 2002/09/30 07:51:00 kevin Exp $
+;;;; $Id: uffi.asd,v 1.17 2002/09/30 10:02:36 kevin Exp $
 ;;;;
 ;;;; This file, part of UFFI, is Copyright (c) 2002 by Kevin M. Rosenberg
 ;;;;
              ((:file "uffi-corman")))
      ))
 
-
-#+(or allegro lispworks cmu mcl)
-(defmethod source-file-type ((c cl-source-file) (s (eql (find-system :uffi)))) 
-   "cl")
-
 #+(or allegro lispworks cmu mcl)
 (when (ignore-errors (find-class 'load-compiled-op))
   (defmethod perform :after ((op load-compiled-op) (c (eql (find-system :uffi))))