package octez-protocol-020-PsParisC-libs

You can search for identifiers within the package.

in-package search v0.2.0

Package contains no libraries

type t = {

tokenPool : Z.t;
xtzPool : Tezos_protocol_020_PsParisC.Protocol.Alpha_context.Tez.t;
lqtTotal : Z.t;
tokenAddress : Tezos_protocol_020_PsParisC.Protocol.Contract_hash.t;
lqtAddress : Tezos_protocol_020_PsParisC.Protocol.Contract_hash.t;

}

val zero : t

val to_string : t -> string

val pp : Format.formatter -> t -> unit

val eq : 'a -> 'b -> bool

val to_expr : 
  loc:int ->
  t ->
  (int, Tezos_protocol_020_PsParisC.Protocol.Michelson_v1_primitives.prim)
    Tezos_micheline.Micheline.node

val to_michelson_string : t -> string

type exn +=

| Invalid_storage_expr of string

val of_expr_exn : 
  ('a, Tezos_protocol_020_PsParisC.Protocol.Michelson_v1_primitives.prim)
    Tezos_micheline.Micheline.node ->
  t

Note: parses a storage unparsed in readable mode (as e.g. returned by Alpha_services.Contract.storage), so that contracts are represented by strings.

val get : 
  Context.t ->
  contract:Tezos_protocol_020_PsParisC.Protocol.Alpha_context.Contract.t ->
  t Tezos_base.TzPervasives.tzresult Lwt.t

val of_tuple : 
  (Z.t
   * Tezos_protocol_020_PsParisC.Protocol.Alpha_context.Tez.t
   * Z.t
   * Tezos_protocol_020_PsParisC.Protocol.Contract_hash.t
   * Tezos_protocol_020_PsParisC.Protocol.Contract_hash.t) ->
  t

val to_tuple : 
  t ->
  Z.t
  * Tezos_protocol_020_PsParisC.Protocol.Alpha_context.Tez.t
  * Z.t
  * Tezos_protocol_020_PsParisC.Protocol.Contract_hash.t
  * Tezos_protocol_020_PsParisC.Protocol.Contract_hash.t

val valid : t -> bool