X-Git-Url: http://git.kpe.io/?p=clsql.git;a=blobdiff_plain;f=db-mysql%2Fmysql-api.lisp;h=480345d4be28320349d62b6546b5108e687b87d8;hp=b3220b7bc99a44b72041cdc3bebe6e5191f3ebca;hb=5dfea0c629f967d7ace700b63adf62eb11f88d9b;hpb=adbb571cf319c49f1cad47f22c83982b5253d4b5 diff --git a/db-mysql/mysql-api.lisp b/db-mysql/mysql-api.lisp index b3220b7..480345d 100644 --- a/db-mysql/mysql-api.lisp +++ b/db-mysql/mysql-api.lisp @@ -106,10 +106,6 @@ (:var-string 253) (:string 254))) -#-(or :mysql-client-v3 :mysql-client-v4) -(eval-when (:compile-toplevel :load-toplevel :execute) - (pushnew :mysql-client-v3 cl:*features*)) - #+:mysql-client-v3 (uffi:def-struct mysql-field (name (* :char)) @@ -370,12 +366,6 @@ :module "mysql" :returning :cstring) -(declaim (inline mysql-get-client-info)) -(uffi:def-function "mysql_get_client_info" - () - :module "mysql" - :returning :cstring) - (declaim (inline mysql-get-host-info)) (uffi:def-function "mysql_get_host_info" ((mysql (* mysql-mysql)))