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