diff options
author | Sébastien Dailly <sebastien@dailly.me> | 2025-01-17 20:48:43 +0100 |
---|---|---|
committer | Sébastien Dailly <sebastien@dailly.me> | 2025-01-22 12:22:26 +0100 |
commit | 8e012f4804ecf1665819e761283120a3c0e73643 (patch) | |
tree | c168efe3e1f0edf5e45695c643e62b3e5447be37 /lib/errors | |
parent | bf2af26d896bb499f2c312a4f1ecd3210e2d7780 (diff) |
Switched from OUnit to alcotest
Diffstat (limited to 'lib/errors')
-rw-r--r-- | lib/errors/dune | 1 | ||||
-rw-r--r-- | lib/errors/importErrors.ml | 4 |
2 files changed, 3 insertions, 2 deletions
diff --git a/lib/errors/dune b/lib/errors/dune index ab71219..c39f47f 100644 --- a/lib/errors/dune +++ b/lib/errors/dune @@ -1,6 +1,7 @@ (library (name importErrors) (libraries + ppx_deriving.runtime csv sqlite3 importCSV diff --git a/lib/errors/importErrors.ml b/lib/errors/importErrors.ml index 97a6259..f888725 100644 --- a/lib/errors/importErrors.ml +++ b/lib/errors/importErrors.ml @@ -43,8 +43,8 @@ let repr_error = function | TypeError { expected; actual; expression; subset } -> Printf.sprintf "In this expression %s has type %s but %s was expected:\n%s" subset - (ImportDataTypes.Types.string_of_t actual) - (ImportDataTypes.Types.string_of_t expected) + (ImportDataTypes.Types.show actual) + (ImportDataTypes.Types.show expected) expression | Unknown_extension ext -> Printf.sprintf "Unknown file extension %s" ext | UnknowFunction name -> |