1(** Msg tests. *) 2 3val suite : string * unit Alcotest.test_case list 4(** Alcotest suite for {!Space_wire.Msg}. *)