From 8e012f4804ecf1665819e761283120a3c0e73643 Mon Sep 17 00:00:00 2001 From: Sébastien Dailly Date: Fri, 17 Jan 2025 20:48:43 +0100 Subject: Switched from OUnit to alcotest --- lib/sql/db.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lib/sql/db.ml') diff --git a/lib/sql/db.ml b/lib/sql/db.ml index 0f06f15..f1aee8c 100644 --- a/lib/sql/db.ml +++ b/lib/sql/db.ml @@ -16,7 +16,7 @@ let reset = T.reset let insert_header = Header.insert_header let query_headers = Header.query_headers -let with_db : string -> (Sqlite3.db -> unit T.result) -> unit T.result = +let with_db : string -> (Sqlite3.db -> 'b T.result) -> 'b T.result = fun filename f -> let db = Sqlite3.db_open filename in -- cgit v1.2.3