Zkapp_account_update (archive_lib.Archive_lib.Processor.Zkapp_account

type t = {

body_id : int;

}

val body_id : t -> int

module Fields : sig ... end

val to_hlist : t -> ( unit, int -> unit ) H_list.t

val of_hlist : ( unit, int -> unit ) H_list.t -> t

val typ : t Caqti_type.t

val table_name : string

val add_if_doesn't_exist : 
  (module Caqti_async.CONNECTION) ->
  Mina_base.Account_update.Simple.t ->
  ( int, [> Caqti_error.call_or_retrieve ] ) Async_kernel__Deferred_result.t

val load : 
  (module Caqti_async.CONNECTION) ->
  int ->
  ( t, [> Caqti_error.call_or_retrieve ] ) Stdlib.result
    Async_kernel.Deferred.t