r11657: 25 Apr 2007 Kevin Rosenberg <kevin@rosenberg.net>
[clsql.git] / db-sqlite3 / sqlite3-api.lisp
index 22d1966..856b990 100644 (file)
                     (sqlite3-error-code condition) 
                     (sqlite3-error-message condition)))))
 
+(defgeneric signal-sqlite3-error (db))
 (defmethod signal-sqlite3-error (db)
   (let ((condition
         (make-condition 'sqlite3-error