Postgresql integration.

backend/brminv.scm

@@ -31,7 +31,8 @@
 	(chicken tcp)
 	intarweb
 	uri-common
-	(chicken string))
+	(chicken string)
+	postgresql)
 
 (define -port- (make-parameter #f))
 (define -certificate- (make-parameter #f))
@@ -73,6 +74,9 @@
   (print "  Certificate:" (-certificate-))
   (print "  Key:" (-key-)))
 
+(define dbconn (connect "postgresql:///brmbar"))
+(print dbconn)
+
 (define listener
   (if ssl?
       (ssl-listen port)