X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=db-odbc%2Fodbc-sql.lisp;h=43bcfbb7b64b43453997f414b1b7a522e61dd554;hb=ef075568ce95ff8698ab67ac44665a00e54d1b32;hp=1d392729efc490c2c5f7482a60de765cc5c8e87b;hpb=d0f147d0e7d942b379bd7cd472f26b00c33916bc;p=clsql.git

diff --git a/db-odbc/odbc-sql.lisp b/db-odbc/odbc-sql.lisp
index 1d39272..43bcfbb 100644
--- a/db-odbc/odbc-sql.lisp
+++ b/db-odbc/odbc-sql.lisp
@@ -52,6 +52,7 @@
 	  db)
     (clsql-error (e)
       (error e))
+    #+ignore
     (error () 	;; Init or Connect failed
       (error 'clsql-connect-error
 	     :database-type database-type
@@ -103,6 +104,7 @@
       (odbc-dbi:sql sql-expression :db (database-odbc-conn database))
     (clsql-error (e)
       (error e))
+    #+ignore
     (error ()
       (error 'clsql-sql-error
 	     :database database
@@ -132,6 +134,7 @@
 	 (length column-names)
 	 nil ;; not able to return number of rows with odbc
 	 ))
+    #+ignore
     (error ()
       (error 'clsql-sql-error
 	     :database database