diff options
| -rw-r--r-- | generator/generator_bindtests.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generator/generator_bindtests.ml b/generator/generator_bindtests.ml index b6ad6311..bc0e846d 100644 --- a/generator/generator_bindtests.ml +++ b/generator/generator_bindtests.ml @@ -449,7 +449,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 ^ "\");" ) optargs @ @@ -469,7 +469,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 "," ( |