Displaying 3 results from an estimated 3 matches for "test_neg64".
Did you mean:
test_neg
2015 Jan 23
0
[PATCH 2/2] mllib: add simple tests for the JSON module
...string_of_doc ~fmt:JSON.Indented doc)
+
+let test_int () =
+ let doc = [ "test_zero", JSON.Int 0;
+ "test_pos", JSON.Int 5;
+ "test_neg", JSON.Int (-5);
+ "test_pos64", JSON.Int64 (Int64.of_int 10);
+ "test_neg64", JSON.Int64 (Int64.of_int (-10)); ] in
+ assert_equal_string
+ "{ \"test_zero\": 0, \"test_pos\": 5, \"test_neg\": -5, \"test_pos64\": 10, \"test_neg64\": -10 }"
+ (JSON.string_of_doc doc);
+ assert_equal_string
+ "{...
2015 Jan 23
2
[PATCH 1/2] mllib: tests: add tests for string_lines_split
---
mllib/common_utils_tests.ml | 18 ++++++++++++++++++
1 file changed, 18 insertions(+)
diff --git a/mllib/common_utils_tests.ml b/mllib/common_utils_tests.ml
index 09d5c51..283e9a1 100644
--- a/mllib/common_utils_tests.ml
+++ b/mllib/common_utils_tests.ml
@@ -27,6 +27,7 @@ let prog = "common_utils_tests"
let assert_equal_string = assert_equal ~printer:(fun x -> x)
let
2018 Aug 20
6
[PATCH 0/4] mltools: JSON unification
An evolution of:
https://www.redhat.com/archives/libguestfs/2018-August/msg00155.html