--- /dev/null
+Index: ocaml-mysql-1.2.0/mysql_stubs.c
+===================================================================
+--- ocaml-mysql-1.2.0.orig/mysql_stubs.c
++++ ocaml-mysql-1.2.0/mysql_stubs.c
+@@ -508,14 +508,14 @@ db_fetch (value result)
+
+ 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 @@ db_size(value result)
+ {
+ 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));
+ }