X-Git-Url: http://git.cielonegro.org/gitweb.cgi?p=blackboard-dns.git;a=blobdiff_plain;f=data%2FGenDBModules.hs;fp=data%2FGenDBModules.hs;h=37a97d7a91350efeb9d1fca666b279215e508e93;hp=0000000000000000000000000000000000000000;hb=f46e263327d20c700179b2d3a5896be82d3b4aca;hpb=23aa8a3221ebacf5891def22006b9850497437de

diff --git a/data/GenDBModules.hs b/data/GenDBModules.hs
new file mode 100644
index 0000000..37a97d7
--- /dev/null
+++ b/data/GenDBModules.hs
@@ -0,0 +1,5 @@
+import           DDNS.DBInfo
+import           Database.HaskellDB.DBSpec.DBSpecToDBDirect
+
+main :: IO ()
+main = dbInfoToModuleFiles ".." "DDNS.DB" dbinfo