X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=db-mysql%2Fmysql-api.lisp;h=19d1f91d74a40651e557630c364ecd534173d500;hb=HEAD;hp=45328153b20bf356c3e33ef8c9f464cc5a011d32;hpb=406feeb749bb475bec8077a2716a5b6089bd9072;p=clsql.git

diff --git a/db-mysql/mysql-api.lisp b/db-mysql/mysql-api.lisp
index 4532815..19d1f91 100644
--- a/db-mysql/mysql-api.lisp
+++ b/db-mysql/mysql-api.lisp
@@ -290,6 +290,12 @@
   :module "mysql"
   :returning :void)
 
+(declaim (inline mysql-next-result))
+(uffi:def-function "mysql_next_result"
+    ((mysql mysql-mysql))
+  :module "mysql"
+  :returning :int)
+
 (declaim (inline mysql-fetch-row))
 (uffi:def-function "mysql_fetch_row"
     ((res mysql-mysql-res))