Module `Services.Forge`

val block : 
  ('a, 'b) Tezos_protocol_environment_genesis.RPC_path.path ->
  ([ `POST ],
    'a,
    'b,
    unit,
    (int32
     * int
     * Tezos_protocol_environment_genesis.Block_hash.t
     * Tezos_protocol_environment_genesis.Time.t
     * Tezos_protocol_environment_genesis.Fitness.t
     * Tezos_protocol_environment_genesis.Context_hash.t)
    * Data.Command.t,
    Tezos_protocol_environment_genesis.MBytes.t)
    Tezos_protocol_environment_genesis.RPC_service.service