X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;f=generator%2Fgenerator_fish.ml;h=61916a3573779a1bd17d607ae0cc0438aa18d52a;hb=9b60f3a9f3b38c085e9265e56ddb839dabe6e416;hp=516c5b197121efbee6f84a20c88124a0908a6d58;hpb=272b754093ef824486993540a893d39be8e7e9f0;p=libguestfs.git

diff --git a/generator/generator_fish.ml b/generator/generator_fish.ml
index 516c5b1..61916a3 100644
--- a/generator/generator_fish.ml
+++ b/generator/generator_fish.ml
@@ -459,10 +459,12 @@ Guestfish will prompt for these separately."
                      "The Int type in the generator is a signed 31 bit int." in
                    Some (min, max, comment) in
                  let expr = sprintf "&argv[i][%d]" (len+1) in
-                 parse_integer expr "xstrtoll" "long long" "int" range name
+                 parse_integer expr "xstrtoll" "long long" "int" range
+                   (sprintf "optargs_s.%s" n)
              | Int64 n ->
                  let expr = sprintf "&argv[i][%d]" (len+1) in
-                 parse_integer expr "xstrtoll" "long long" "int64_t" None name
+                 parse_integer expr "xstrtoll" "long long" "int64_t" None
+                   (sprintf "optargs_s.%s" n)
              | String n ->
                  pr "      optargs_s.%s = &argv[i][%d];\n" n (len+1);
              | _ -> assert false