X-Git-Url: http://git.kpe.io/?p=clsql.git;a=blobdiff_plain;f=base%2Fdb-interface.lisp;fp=base%2Fdb-interface.lisp;h=b2ba6e5533a1f20735a017757d517dd85553b7a7;hp=4f1dc209ee4eb218d9085cac8854618e4fe3323c;hb=6c70be35cc348b559d8aa869ecd0e14e27d5edbc;hpb=cd64aa8907160d3a2c2d0e531c831f1db44c7a61

diff --git a/base/db-interface.lisp b/base/db-interface.lisp
index 4f1dc20..b2ba6e5 100644
--- a/base/db-interface.lisp
+++ b/base/db-interface.lisp
@@ -254,3 +254,7 @@ the given lisp type and parameters."))
 (defmethod database-abort-transaction :before ((database database))
   (unless (is-database-open database)
     (signal-closed-database-error database)))
+
+(defgeneric describe-table (table &key database)
+  (:documentation "Describes a table, returns a list of name/type for columns in table"))
+