Blob Blame History Raw
--- ocaml-mysql-1.1.3.old/mysql_stubs.c	2014-10-16 16:35:05.000000000 +0100
+++ ocaml-mysql-1.1.3/mysql_stubs.c	2014-11-03 13:12:11.562441200 +0000
@@ -508,14 +508,14 @@
 
 EXTERNAL value
 db_to_row(value result, value offset) {
-  int64 off = Int64_val(offset);
+  int64_t off = Int64_val(offset);
   MYSQL_RES *res;
 
   res = RESval(result);
   if (!res) 
     mysqlfailwith("Mysql.to_row: result did not return fetchable data");
 
-  if (off < 0 || off > (int64)mysql_num_rows(res)-1)
+  if (off < 0 || off > (int64_t)mysql_num_rows(res)-1)
     invalid_argument("Mysql.to_row: offset out of range");
 
   mysql_data_seek(res, off);
@@ -640,13 +640,13 @@
 {
   CAMLparam1(result);
   MYSQL_RES *res;
-  int64 size;
+  int64_t size;
 
   res = RESval(result);
   if (!res)
     size = 0;
   else
-    size = (int64)(mysql_num_rows(res));
+    size = (int64_t)(mysql_num_rows(res));
   
   CAMLreturn(copy_int64(size));
 }