unikernel/duniverse/pgx/pgx_async/test/dune

@@ -0,0 +1,4 @@
+(tests
+ (names test_pgx_async)
+ (package pgx_async)
+ (libraries alcotest alcotest-async pgx_async pgx_test))

unikernel/duniverse/pgx/pgx_async/test/test_pgx_async.ml

@@ -0,0 +1,13 @@
+module Alcotest_io = struct
+  type 'a test_case = 'a Alcotest_async.test_case
+
+  let test_case name speed f = Alcotest_async.test_case name speed f
+
+  let run name tests =
+    Async_unix.Thread_safe.block_on_async_exn @@ fun () -> Alcotest_async.run name tests
+  ;;
+end
+
+include Pgx_test.Make_tests (Pgx_async) (Alcotest_io)
+
+let () = run_tests ~library_name:"pgx_async"