# HG changeset patch
# User Steve Losh <steve@stevelosh.com>
# Date 1544911017 18000
# Node ID 1d0852c279f76e87ce6b848ea4ee8ff1896de4eb
# Parent  48e5788f61e316b50f7e3ca169c3a71e487eac67
Add auto-module ASDF to save typing.  Thanks, jackdaniel

diff -r 48e5788f61e3 -r 1d0852c279f7 rosalind.asd
--- a/rosalind.asd	Wed Nov 07 20:39:43 2018 -0500
+++ b/rosalind.asd	Sat Dec 15 16:56:57 2018 -0500
@@ -1,3 +1,14 @@
+(defclass auto-module (module) ())
+
+(defmethod component-children ((self auto-module))
+  (mapcar (lambda (p) (make-instance 'cl-source-file :type "lisp"
+                        :pathname p
+                        :name (pathname-name p)
+                        :parent (component-parent self)))
+          (directory-files (component-pathname self)
+                           (make-pathname :directory nil :name *wild* :type "lisp"))))
+
+
 (asdf:defsystem :rosalind
   :name "rosalind"
   :description "Rosalind solutions."
@@ -26,23 +37,4 @@
                (:file "package")
                (:module "src" :serial t
                 :components ((:file "utils")
-                             (:module "problems"
-                              :components ((:file "dna")
-                                           (:file "rna")
-                                           (:file "revc")
-                                           (:file "gc")
-                                           (:file "hamm")
-                                           (:file "prot")
-                                           (:file "perm")
-                                           (:file "fib")
-                                           (:file "subs")
-                                           (:file "iprb")
-                                           (:file "iev")
-                                           (:file "fibd")
-                                           (:file "cons")
-                                           (:file "grph")
-                                           (:file "prtm")
-                                           (:file "mrna")
-                                           (:file "splc")
-                                           (:file "lcsm")))))))
-
+                             (:auto-module "problems")))))