From 704e46af9c054fe3571884989c992dfd7d8284e5 Mon Sep 17 00:00:00 2001
From: "Richard W.M. Jones" <rjones@redhat.com>
Date: Wed, 15 Aug 2012 14:50:29 +0100
Subject: java: Fix bindtests when passing 64 bit integer literals.

---
 generator/generator_bindtests.ml | 4 ++--
 1 file 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 "," (
-- 
cgit