From faf1cd50492fd014267c22a0e988a75f1c337364 Mon Sep 17 00:00:00 2001 From: "Richard W.M. Jones" Date: Thu, 2 Dec 2010 11:35:57 +0000 Subject: [PATCH] Fix argv struct mixup over Int/Int64. --- generator/generator_c.ml | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) 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 -- 1.8.3.1