1
2
3
4
5
6
7
8
9
10
11
12
13
14
open! Core
include Virtual_dom
include Bonsai_web
module Effect = struct
type 'a t = 'a Vdom.Effect.t
let no_op = Vdom.Effect.Ignore
let sequence xs = Vdom.Effect.Many xs
let external_ = External_event.inject
end
module Driver = Bonsai_test.Arrow.Driver
include Expect_test_helpers_core