r2741: Start migration to pathname-less asd files, remove .system files

[clsql.git] / clsql-uffi.asd

diff --git a/clsql-uffi.asd b/clsql-uffi.asd
index 848f3b10e0dfaf1659eeedb833bf5371ab72735e..c45d31cf7e73330afbfb583a552eb69596aa5cf3 100644 (file)
--- a/clsql-uffi.asd
+++ b/clsql-uffi.asd
@@ -7,7 +7,7 @@
 ;;;; Programmer:    Kevin M. Rosenberg
 ;;;; Date Started:  Aug 2002
 ;;;;
-;;;; $Id: clsql-uffi.asd,v 1.1 2002/08/18 02:57:50 kevin Exp $
+;;;; $Id: clsql-uffi.asd,v 1.8 2002/09/17 17:16:43 kevin Exp $
 ;;;;
 ;;;; This file, part of CLSQL, is Copyright (c) 2002 by Kevin M. Rosenberg
 ;;;;
@@ -20,18 +20,18 @@
 
 (in-package :asdf)
 
-(unless (find-class 'clsql-cl-source-file)
-  (defclass clsql-cl-source-file (cl-source-file) ())
-  (defmethod source-file-type ((c clsql-cl-source-file) (s module)) 
-    "cl"))
-
 ;;; System definition
 
-(defsystem clsql-uffi
-    :default-component-class clsql-cl-source-file
-    :pathname "cl-library:clsql-uffi;"
-    :components ((:file "clsql-uffi-package")
-                (:file "clsql-uffi-loader" :depends-on ("clsql-uffi-package"))
-                (:file "clsql-uffi" :depends-on ("clsql-uffi-loader")))
-    :depends-on (:uffi))
+(defsystem :clsql-uffi
+  :components
+  ((:module :uffi
+           :components
+           ((:file "clsql-uffi-package")
+            (:file "clsql-uffi-loader" :depends-on ("clsql-uffi-package"))
+            (:file "clsql-uffi" :depends-on ("clsql-uffi-loader")))))
+  :depends-on (:uffi :clsql-base))
+
 
+(defmethod source-file-type  ((c cl-source-file)
+                             (s (eql (find-system 'clsql-uffi)))) 
+   "cl")