X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;f=generator%2Fgenerator_c.ml;fp=generator%2Fgenerator_c.ml;h=24f4e2cb9a147f90a719229047c15dde21ee50cb;hb=faf1cd50492fd014267c22a0e988a75f1c337364;hp=d8b13a57c147f94cf9e76d22020ae757267d8ada;hpb=3451d73a693091ae1a33e7dbefbe56c1b93f426a;p=libguestfs.git

diff --git a/generator/generator_c.ml b/generator/generator_c.ml
index d8b13a5..24f4e2c 100644
--- a/generator/generator_c.ml
+++ b/generator/generator_c.ml
@@ -511,8 +511,8 @@ extern void *guestfs_get_private (guestfs_h *g, const char *key);
             let c_type =
               match argt with
               | Bool n -> "int "
-              | Int n -> "int64_t "
-              | Int64 n -> "int "
+              | Int n -> "int "
+              | Int64 n -> "int64_t "
               | String n -> "const char *"
               | _ -> assert false (* checked in generator_checks *) in
             let uc_shortname = String.uppercase shortname in