diff --git a/tests/ounit-integration/test.ml b/tests/ounit-integration/test.ml index 604c51c8..1032900c 100644 --- a/tests/ounit-integration/test.ml +++ b/tests/ounit-integration/test.ml @@ -26,7 +26,6 @@ let test_suite = let suite = "all" >::: [ test_suite; - ] + ];; -let _ = - run_test_tt_main suite +run_test_tt_main suite diff --git a/tests/report/reference.bisect b/tests/report/reference.bisect index 4dd90cbc..cfeb7e02 100644 Binary files a/tests/report/reference.bisect and b/tests/report/reference.bisect differ diff --git a/tests/report/reference.csv b/tests/report/reference.csv index 724870b2..19a1475c 100644 --- a/tests/report/reference.csv +++ b/tests/report/reference.csv @@ -1,2 +1,2 @@ --;6;6;4;6;1;1;0;4;0;1;0;0;5;15;0;0;0;0;0;0;0;0;1;1;2;2;19;36 -source.ml;6;6;4;6;1;1;0;4;0;1;0;0;5;15;0;0;0;0;0;0;0;0;1;1;2;2;19;36 +-;6;6;4;6;1;1;0;4;0;1;0;0;5;16;0;0;0;0;0;0;0;0;0;0;2;2;18;36 +source.ml;6;6;4;6;1;1;0;4;0;1;0;0;5;16;0;0;0;0;0;0;0;0;0;0;2;2;18;36 diff --git a/tests/report/reference.dump b/tests/report/reference.dump index 1ecd5a70..564064dc 100644 --- a/tests/report/reference.dump +++ b/tests/report/reference.dump @@ -34,4 +34,4 @@ file "source.ml" point match/function at offset 726: 2 point match/function at offset 742: 0 point sequence at offset 764: 2 - point toplevel expression at offset 780: 2 + point match/function at offset 782: 0 diff --git a/tests/report/reference.html b/tests/report/reference.html index 7a9667f5..b8be9776 100644 --- a/tests/report/reference.html +++ b/tests/report/reference.html @@ -11,7 +11,7 @@

source.ml

-

52.78%

+

50.00%

@@ -80,7 +81,7 @@

52.78%

- +
@@ -186,7 +187,7 @@

52.78%

(0, 0) |> ignore -let _ = "a string to confound Buffer.add_substitute $(" +let f _ = "a string to confound Buffer.add_substitute $("
diff --git a/tests/report/reference.text b/tests/report/reference.text index 75103cd9..fdf34ef3 100644 --- a/tests/report/reference.text +++ b/tests/report/reference.text @@ -5,14 +5,14 @@ Summary: - 'if/then' points: 0/4 (0.00%) - 'try' points: 0/1 (0.00%) - 'while' points: none - - 'match/function' points: 5/15 (33.33%) + - 'match/function' points: 5/16 (31.25%) - 'class expression' points: none - 'class initializer' points: none - 'class method' points: none - 'class value' points: none - - 'toplevel expression' points: 1/1 (100.00%) + - 'toplevel expression' points: none - 'lazy operator' points: 2/2 (100.00%) - - total: 19/36 (52.78%) + - total: 18/36 (50.00%) File 'source.ml': - 'binding' points: 6/6 (100.00%) - 'sequence' points: 4/6 (66.67%) @@ -20,11 +20,11 @@ File 'source.ml': - 'if/then' points: 0/4 (0.00%) - 'try' points: 0/1 (0.00%) - 'while' points: none - - 'match/function' points: 5/15 (33.33%) + - 'match/function' points: 5/16 (31.25%) - 'class expression' points: none - 'class initializer' points: none - 'class method' points: none - 'class value' points: none - - 'toplevel expression' points: 1/1 (100.00%) + - 'toplevel expression' points: none - 'lazy operator' points: 2/2 (100.00%) - - total: 19/36 (52.78%) + - total: 18/36 (50.00%) diff --git a/tests/report/reference.xml b/tests/report/reference.xml index 2bdceabe..4f51b0d4 100644 --- a/tests/report/reference.xml +++ b/tests/report/reference.xml @@ -7,14 +7,14 @@ - + - + - + @@ -24,14 +24,14 @@ - + - + - + @@ -68,6 +68,6 @@ - + diff --git a/tests/report/reference.xml-emma b/tests/report/reference.xml-emma index fd4d02d8..326f42c5 100644 --- a/tests/report/reference.xml-emma +++ b/tests/report/reference.xml-emma @@ -11,7 +11,7 @@ - + diff --git a/tests/report/source.ml b/tests/report/source.ml index 1652bb67..16ab6599 100644 --- a/tests/report/source.ml +++ b/tests/report/source.ml @@ -47,4 +47,4 @@ let () = (0, 0) |> ignore -let _ = "a string to confound Buffer.add_substitute $(" +let f _ = "a string to confound Buffer.add_substitute $("