Data.Command
type t =
| Activate of {
protocol : Mavryk_protocol_environment_000_Ps9mPmXa.Protocol_hash.t;
fitness : Mavryk_protocol_environment_000_Ps9mPmXa.Fitness.t;
protocol_parameters : Mavryk_protocol_environment_000_Ps9mPmXa.MBytes.t;
}
| Activate_testchain of {
protocol : Mavryk_protocol_environment_000_Ps9mPmXa.Protocol_hash.t;
delay : Mavryk_protocol_environment_000_Ps9mPmXa.Int64.t;
}
val mk_case :
string ->
'a Mavryk_protocol_environment_000_Ps9mPmXa.Data_encoding.encoding ->
'b Mavryk_protocol_environment_000_Ps9mPmXa.Data_encoding.encoding
val encoding :
t Mavryk_protocol_environment_000_Ps9mPmXa.Data_encoding.encoding