X-Git-Url: http://git.kpe.io/?p=clsql.git;a=blobdiff_plain;f=db-sqlite3%2Fsqlite3-api.lisp;h=856b990d2248b80eea9c70e3ff02816e08cfedc2;hp=22d196660d8f407a1748f43c44a8984812301894;hb=1b07d2fd927cf8f1943ac0a0b8c980d1dc707076;hpb=d3d9487458df1c55d472676a07622470eaaf98a2

diff --git a/db-sqlite3/sqlite3-api.lisp b/db-sqlite3/sqlite3-api.lisp
index 22d1966..856b990 100644
--- a/db-sqlite3/sqlite3-api.lisp
+++ b/db-sqlite3/sqlite3-api.lisp
@@ -170,6 +170,7 @@
 		     (sqlite3-error-code condition) 
 		     (sqlite3-error-message condition)))))
 
+(defgeneric signal-sqlite3-error (db))
 (defmethod signal-sqlite3-error (db)
   (let ((condition
 	 (make-condition 'sqlite3-error