Test_scenario.Inconsistency_errortype t = [ | `Empty_protocol_list| `Too_many_protocols of Mavryk_protocol.t Internal_pervasives.list| `Too_many_timestamp_delays of Mavryk_protocol.t Internal_pervasives.list ]val should_be_one_protocol :
'a Internal_pervasives.list ->
('a,
[> `Empty_protocol_list
| `Too_many_protocols of 'a Internal_pervasives.list
| `Too_many_timestamp_delays of 'a Internal_pervasives.list ])
Internal_pervasives.Asynchronous_result.tval pp :
Stdlib.Format.formatter ->
[< `Empty_protocol_list
| `Too_many_protocols of 'a Base.List.t
| `Too_many_timestamp_delays of 'a Base.List.t ] ->
Internal_pervasives.unit