Skip to content

Commit

Permalink
Simplify test
Browse files Browse the repository at this point in the history
  • Loading branch information
mbarbin committed Feb 19, 2024
1 parent 1face98 commit ce98453
Showing 1 changed file with 7 additions and 9 deletions.
16 changes: 7 additions & 9 deletions test/test__introspection.ml
Original file line number Diff line number Diff line change
Expand Up @@ -26,15 +26,13 @@ let print_implements (Provider.T { t = _; interface }) =
;;

let%expect_test "introspection" =
require_does_not_raise [%here] (fun () ->
print_implements (Provider.T { t = (); interface = Provider.Interface.make [] });
[%expect
{|
((
implements (
(file_reader false)
(directory_reader false)))) |}]);
[%expect {||}];
print_implements (Provider.T { t = (); interface = Provider.Interface.make [] });
[%expect
{|
((
implements (
(file_reader false)
(directory_reader false)))) |}];
let unix_reader = Providers.Unix_reader.make () in
Eio_main.run
@@ fun env ->
Expand Down

0 comments on commit ce98453

Please sign in to comment.