(:var-string 253)
(:string 254)))
-#-(or mysql-client-v3 mysql-client-v4)
+#-(or :mysql-client-v3 :mysql-client-v4)
(eval-when (:compile-toplevel :load-toplevel :execute)
(pushnew :mysql-client-v3 cl:*features*))
-#+mysql-client-v3
+#+:mysql-client-v3
(uffi:def-struct mysql-field
(name (* :char))
(table (* :char))
(decimals :unsigned-int))
;; structure changed in mysql 4 client
-#+mysql-client-v4
+#+:mysql-client-v4
(uffi:def-struct mysql-field
(name (* :char))
(table (* :char))
:module "mysql"
:returning (* mysql-mysql))
+#-mysql-client-v4
(declaim (inline mysql-connect))
+#-mysql-client-v4
(uffi:def-function "mysql_connect"
((mysql (* mysql-mysql))
(host :cstring)
:module "mysql"
:returning :int)
+#-mysql-client-v4
(declaim (inline mysql-create-db))
+#-mysql-client-v4
(uffi:def-function "mysql_create_db"
((mysql (* mysql-mysql))
(db :cstring))
:module "mysql"
:returning :int)
+#-mysql-client-v4
(declaim (inline mysql-drop-db))
+#-mysql-client-v4
(uffi:def-function "mysql_drop_db"
((mysql (* mysql-mysql))
(db :cstring))
+cl-sql (1.9.1-1) unstable; urgency=low
+
+ * Add better support for mysql v4
+
+ -- Kevin M. Rosenberg <kmr@debian.org> Wed, 31 Mar 2004 16:48:30 -0700
+
cl-sql (1.9.0-2) unstable; urgency=low
* Add cl-sql-sqlite binary package