diff options
Diffstat (limited to 'tests/sql_trim.ml')
| -rw-r--r-- | tests/sql_trim.ml | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/tests/sql_trim.ml b/tests/sql_trim.ml index 77e755e..dfa29e1 100644 --- a/tests/sql_trim.ml +++ b/tests/sql_trim.ml @@ -1,11 +1,13 @@ -open OUnit2 +open Test_migration + +let check = Alcotest.check Test_migration.sql_testable let test_suit = [ ( "Trim" >:: fun _ -> let text = Sqlite3.Data.TEXT " \nABC \n" in - assert_equal (Sqlite3.Data.TEXT "ABC") (ImportSQL.Trim.f text) ); + check "trim" (Sqlite3.Data.TEXT "ABC") (ImportSQL.Trim.f text) ); ] -let tests = "sql_trim" >::: test_suit +let tests = ("sql_trim", test_suit) |