2019-03-13 14:04:26 +04:00
|
|
|
module Name = struct let name = "alpha" end
|
2019-09-04 22:19:09 +04:00
|
|
|
module Alpha_environment = Tezos_protocol_alpha.Protocol.Environment
|
|
|
|
|
|
2019-03-13 14:04:26 +04:00
|
|
|
|
|
|
|
|
type alpha_error = Alpha_environment.Error_monad.error
|
|
|
|
|
type 'a alpha_tzresult = 'a Alpha_environment.Error_monad.tzresult
|
|
|
|
|
module Alpha_error_monad = Alpha_environment.Error_monad
|
2019-09-04 22:19:09 +04:00
|
|
|
module Proto = Tezos_protocol_alpha
|
2019-03-13 14:04:26 +04:00
|
|
|
include Proto
|
