summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard W.M. Jones <rjones@redhat.com>2012-08-15 14:50:29 +0100
committerRichard W.M. Jones <rjones@redhat.com>2012-08-15 17:49:48 +0100
commit704e46af9c054fe3571884989c992dfd7d8284e5 (patch)
tree99829934ee303e0f84e77179c1413fece6895688
parent9526f632d80f8d66ecf8a7da5444e1446129fceb (diff)
downloadlibguestfs-704e46af9c054fe3571884989c992dfd7d8284e5.tar.gz
libguestfs-704e46af9c054fe3571884989c992dfd7d8284e5.tar.xz
libguestfs-704e46af9c054fe3571884989c992dfd7d8284e5.zip
java: Fix bindtests when passing 64 bit integer literals.
-rw-r--r--generator/generator_bindtests.ml4
1 files changed, 2 insertions, 2 deletions
diff --git a/generator/generator_bindtests.ml b/generator/generator_bindtests.ml
index 371ad880..f0376342 100644
--- a/generator/generator_bindtests.ml
+++ b/generator/generator_bindtests.ml
@@ -522,7 +522,7 @@ public class Bindtests {
| CallOInt (n, v) ->
" put(\"" ^ n ^ "\", " ^ string_of_int v ^ ");"
| CallOInt64 (n, v) ->
- " put(\"" ^ n ^ "\", " ^ Int64.to_string v ^ "l);"
+ " put(\"" ^ n ^ "\", " ^ Int64.to_string v ^ "L);"
| CallOString (n, v) ->
" put(\"" ^ n ^ "\", \"" ^ v ^ "\");"
| CallOStringList (n, xs) ->
@@ -547,7 +547,7 @@ public class Bindtests {
"new String[]{" ^
String.concat "," (List.map (sprintf "\"%s\"") xs) ^ "}"
| CallInt i -> string_of_int i
- | CallInt64 i -> Int64.to_string i
+ | CallInt64 i -> Int64.to_string i ^ "L"
| CallBool b -> string_of_bool b
| CallBuffer s ->
"new byte[] { " ^ String.concat "," (