Displaying 3 results from an estimated 3 matches for "test_false".
Did you mean:
ret_false
2015 Jan 23
0
[PATCH 2/2] mllib: add simple tests for the JSON module
...\": \"foo\" }"
+ (JSON.string_of_doc doc);
+ assert_equal_string "{
+ \"test_string\": \"foo\"
+}"
+ (JSON.string_of_doc ~fmt:JSON.Indented doc)
+
+let test_bool () =
+ let doc = [ "test_true", JSON.Bool true;
+ "test_false", JSON.Bool false ] in
+ assert_equal_string
+ "{ \"test_true\": true, \"test_false\": false }"
+ (JSON.string_of_doc doc);
+ assert_equal_string
+ "{
+ \"test_true\": true,
+ \"test_false\": false
+}"
+ (JSON.string_o...
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
2015 May 11
3
[PATCH 1/2] mllib: Require OUnit2 for tests.
...\"test_string\": \"foo\" }"
(JSON.string_of_doc doc);
@@ -39,7 +39,7 @@ let test_string () =
}"
(JSON.string_of_doc ~fmt:JSON.Indented doc)
-let test_bool () =
+let test_bool ctx =
let doc = [ "test_true", JSON.Bool true;
"test_false", JSON.Bool false ] in
assert_equal_string
@@ -52,7 +52,7 @@ let test_bool () =
}"
(JSON.string_of_doc ~fmt:JSON.Indented doc)
-let test_int () =
+let test_int ctx =
let doc = [ "test_zero", JSON.Int 0;
"test_pos", JSON.Int 5;...