-(defsystem clsql-mysql\r
- :default-component-class clsql-cl-source-file\r
- :pathname "cl-library:clsql-mysql;"\r
- :components ((:file "mysql-package")\r
- (:file "mysql-loader" :depends-on ("mysql-package"))\r
- (:file "mysql-api" :depends-on ("mysql-loader"))\r
- (:file "mysql-sql" :depends-on ("mysql-api"))\r
- (:file "mysql-usql" :depends-on ("mysql-sql")))\r
- :depends-on (:uffi :clsql-base :clsql-uffi))\r
-\r
-\r
-\r
-\r
-\r
+(defsystem :clsql-mysql\r
+ :components\r
+ ((:module :mysql\r
+ :components\r
+ ((:file "mysql-package")\r
+ (:file "mysql-loader" :depends-on ("mysql-package"))\r
+ (:file "mysql-api" :depends-on ("mysql-loader"))\r
+ (:file "mysql-sql" :depends-on ("mysql-api"))\r
+ (:file "mysql-usql" :depends-on ("mysql-sql")))))\r
+ :depends-on (:uffi :clsql-base :clsql-uffi))\r
+ \r
+(defmethod source-file-type ((c cl-source-file)\r
+ (s (eql (find-system 'clsql-mysql)))) \r
+ "cl")\r