diff options
Diffstat (limited to '')
| -rw-r--r-- | test/unit/backend/Storage.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/test/unit/backend/Storage.ml b/test/unit/backend/Storage.ml index 970e2c4..76bda8b 100644 --- a/test/unit/backend/Storage.ml +++ b/test/unit/backend/Storage.ml @@ -2,6 +2,7 @@ open Rnt module Make (S : Abstract.Storage.STORAGE) (C : Helpers.Storage.CONFIGURATOR) = struct open Alcotest + module H = Helpers.Storage.Make (S) (C) let storage_and_retrieval conn = @@ -25,8 +26,7 @@ module Make (S : Abstract.Storage.STORAGE) (C : Helpers.Storage.CONFIGURATOR) = let suite prefix = ( "storage/" ^ prefix, - [ test_case "storage-and-retrieval" `Quick - (H.with_connection storage_and_retrieval "storage-test") ] ) + [test_case "storage-and-retrieval" `Quick (H.with_connection storage_and_retrieval "storage-test")] ) end module LMDB = Make (Rnt.Backend.Storage.LMDB) (Helpers.Storage.LMDB_Configurator) |