From: Kevin M. Rosenberg <kevin@rosenberg.net>
Date: Wed, 12 May 2004 17:18:41 +0000 (+0000)
Subject: r9318: define explicit lisp function name
X-Git-Tag: v3.8.6~477
X-Git-Url: http://git.kpe.io/?p=clsql.git;a=commitdiff_plain;h=7a01154e40dd4516ece2ebe2267a11dec1f9a18f

r9318: define explicit lisp function name
---

diff --git a/db-mysql/mysql-client-info.lisp b/db-mysql/mysql-client-info.lisp
index 75abdd0..23161ef 100644
--- a/db-mysql/mysql-client-info.lisp
+++ b/db-mysql/mysql-client-info.lisp
@@ -23,7 +23,7 @@
 (defvar *mysql-client-info* nil)
 
 (eval-when (:compile-toplevel :load-toplevel :execute)
-  (uffi:def-function "mysql_get_client_info"
+  (uffi:def-function ("mysql_get_client_info" mysql-get-client-info)
       ()
     :module "mysql"
     :returning :cstring)