Environemt: add equality for Z.t
This commit is contained in:
parent
636fecb6ff
commit
441149880c
@ -141,6 +141,7 @@ module Make (Context : CONTEXT) = struct
|
||||
and type RPC_service.meth = RPC_service.meth
|
||||
and type (+'m,'pr,'p,'q,'i,'o) RPC_service.t = ('m,'pr,'p,'q,'i,'o) RPC_service.t
|
||||
and type Error_monad.shell_error = Error_monad.error
|
||||
and type Z.t = Z.t
|
||||
|
||||
type error += Ecoproto_error of Error_monad.error
|
||||
val wrap_error : 'a Error_monad.tzresult -> 'a tzresult
|
||||
|
@ -134,6 +134,7 @@ module Make (Context : CONTEXT) : sig
|
||||
and type RPC_service.meth = RPC_service.meth
|
||||
and type (+'m,'pr,'p,'q,'i,'o) RPC_service.t = ('m,'pr,'p,'q,'i,'o) RPC_service.t
|
||||
and type Error_monad.shell_error = Error_monad.error
|
||||
and type Z.t = Z.t
|
||||
|
||||
type error += Ecoproto_error of Error_monad.error
|
||||
val wrap_error : 'a Error_monad.tzresult -> 'a tzresult
|
||||
|
Loading…
Reference in New Issue
Block a user