X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;f=generator%2Fgenerator_java.ml;h=0152bb3b5e6b5a11b1f3ea48e3813cc53b13bb73;hb=319e946b92e175c05cdd1fdcb85c9b86f5631011;hp=4d51c537f613af0f7a573bf0e1b99004915cb315;hpb=d7da4807e83d4a960daca8f36bbc8a826063b135;p=libguestfs.git

diff --git a/generator/generator_java.ml b/generator/generator_java.ml
index 4d51c53..0152bb3 100644
--- a/generator/generator_java.ml
+++ b/generator/generator_java.ml
@@ -390,7 +390,6 @@ Java_com_redhat_et_libguestfs_GuestFS__1close
       pr "JNICALL\n";
       pr "Java_com_redhat_et_libguestfs_GuestFS_";
       pr "%s" (replace_str ("_" ^ name) "_" "_1");
-      pr "\n";
       pr "  (JNIEnv *env, jobject obj, jlong jg";
       List.iter (
         function
@@ -486,6 +485,11 @@ Java_com_redhat_et_libguestfs_GuestFS__1close
             pr "  %s %s;\n" t n
       ) args;
 
+      if optargs <> [] then (
+        pr "  struct guestfs_%s_argv optargs_s;\n" name;
+        pr "  const struct guestfs_%s_argv *optargs = &optargs_s;\n" name
+      );
+
       let needs_i =
         (match ret with
          | RStringList _ | RStructList _ | RHashtable _ -> true
@@ -537,8 +541,6 @@ Java_com_redhat_et_libguestfs_GuestFS__1close
       ) args;
 
       if optargs <> [] then (
-        pr "  struct guestfs_%s_argv optargs_s;\n" name;
-        pr "  const struct guestfs_%s_argv *optargs = &optargs_s;\n" name;
         pr "  optargs_s.bitmask = joptargs_bitmask;\n";
         List.iter (
           function
@@ -553,6 +555,8 @@ Java_com_redhat_et_libguestfs_GuestFS__1close
         ) optargs;
       );
 
+      pr "\n";
+
       (* Make the call. *)
       if optargs = [] then
         pr "  r = guestfs_%s " name
@@ -561,6 +565,8 @@ Java_com_redhat_et_libguestfs_GuestFS__1close
       generate_c_call_args ~handle:"g" style;
       pr ";\n";
 
+      pr "\n";
+
       (* Release the parameters. *)
       List.iter (
         function
@@ -599,6 +605,8 @@ Java_com_redhat_et_libguestfs_GuestFS__1close
         | _ -> assert false
       ) optargs;
 
+      pr "\n";
+
       (* Check for errors. *)
       (match errcode_of_ret ret with
        | `CannotReturnError -> ()