From: Nathan Bird <nathan@acceleration.net>
Date: Wed, 22 Feb 2012 21:59:23 +0000 (-0500)
Subject: If running on a threaded lisp try loading libmysqlclient_r
X-Git-Tag: v6.1.1~15
X-Git-Url: http://git.kpe.io/?p=clsql.git;a=commitdiff_plain;h=7127589ca079f4f4279be601ebd272b7488906b4

If running on a threaded lisp try loading libmysqlclient_r

http://dev.mysql.com/doc/refman/5.1/en/threaded-clients.html
---

diff --git a/ChangeLog b/ChangeLog
index 8b7aecf..69b8168 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,10 @@
+2012-02-22  Nathan Bird  <nathan@acceleration.net>
+
+	* db-mysql/mysql-loader.lisp (*mysql-library-candidate-names*): If
+	running on a threaded lisp try loading libmysqlclient_r (the
+	threaded build) first. from
+	http://dev.mysql.com/doc/refman/5.1/en/threaded-clients.html
+
 2012-01-05  Nathan Bird  <nathan@acceleration.net>
 
 	* db-odbc/odbc-dbi.lisp: handle sql decimal type in the same way
diff --git a/db-mysql/mysql-loader.lisp b/db-mysql/mysql-loader.lisp
index afea3e5..cb75e5e 100644
--- a/db-mysql/mysql-loader.lisp
+++ b/db-mysql/mysql-loader.lisp
@@ -22,7 +22,12 @@
     "clsql_mysql"))
 
 (defvar *mysql-library-candidate-names*
-  '("libmysqlclient" "libmysql"))
+  '(
+    #+(or allegro cmu lispworks openmcl sb-thread scl) "libmysqlclient_r"
+    "libmysqlclient"
+    "libmysql"))
+
+
 
 (defvar *mysql-supporting-libraries* '("c")
   "Used only by CMU. List of library flags needed to be passed to ld to