diff --git a/generator/daemon.ml b/generator/daemon.ml
index 5e2a78b91..78a2412d2 100644
--- a/generator/daemon.ml
+++ b/generator/daemon.ml
@@ -835,7 +835,7 @@ let generate_daemon_caml_stubs () =
        | RInt _ ->
           pr "  CAMLreturnT (int, Int_val (retv));\n"
        | RInt64 _ ->
-          pr "  CAMLreturnT (int, Int64_val (retv));\n"
+          pr "  CAMLreturnT (int64_t, Int64_val (retv));\n"
        | RBool _ ->
           pr "  CAMLreturnT (int, Bool_val (retv));\n"
        | RConstString _ -> assert false