diff options
Diffstat (limited to 'tests/configuration_toml.ml')
| -rw-r--r-- | tests/configuration_toml.ml | 19 |
1 files changed, 8 insertions, 11 deletions
diff --git a/tests/configuration_toml.ml b/tests/configuration_toml.ml index 67f8d75..dc1f769 100644 --- a/tests/configuration_toml.ml +++ b/tests/configuration_toml.ml @@ -1,6 +1,6 @@ -open OUnit2 module Expression = ImportExpression.T module Path = ImportDataTypes.Path +open Test_migration let test_suit = [ @@ -27,11 +27,10 @@ let test_suit = } in - let printer s = - String.concat "," (List.map ImportConf.print_extern s) - in - - assert_equal ~printer [ expected ] result.externals ); + ignore + @@ Alcotest.check + (Alcotest.list Test_migration.extern_testable) + "" [ expected ] result.externals ); ( "parse_columns" >:: fun _ -> let toml = Otoml.Parser.from_file "configuration/simple.toml" in let toml = ImportConf.t_of_toml toml in @@ -57,11 +56,9 @@ let test_suit = ] in - List.iter2 - (fun expected result -> - assert_equal ~printer:ImportConf.print_path_expression expected - result) - expected result.columns ); + Alcotest.check + (Alcotest.list Test_migration.expression_testable) + "" expected result.columns ); ( "parse_csv" >:: fun _ -> let toml = Otoml.Parser.from_file "configuration/example_csv.toml" in let toml = ImportConf.t_of_toml toml in |