Internal_command (archive_lib.Archive_lib.Processor.Internal

type t = {

command_type : string;

receiver_id : int;

fee : string;

hash : string;

}

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

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

val hash : t -> string

val fee : t -> string

val receiver_id : t -> int

val command_type : t -> string

module Fields : sig ... end

val typ : t Caqti_type.t

val table_name : string

val find_opt : 
  (module Caqti_async.CONNECTION) ->
  transaction_hash:Mina_transaction.Transaction_hash.t ->
  command_type:string ->
  ( int option, [> Caqti_error.call_or_retrieve ] ) Stdlib.result
    Async_kernel.Deferred.t

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

val add_extensional_if_doesn't_exist : 
  (module Caqti_async.CONNECTION) ->
  Extensional.Internal_command.t ->
  ( int, [> Caqti_error.call_or_retrieve ] ) Async_kernel__Deferred_result.t