type fa12_script = {name : string list;build_storage : Account.key -> string;mint_entrypoint : string;mint_arg : Account.key -> Tez.t -> string;}val fa12_reference : fa12_scriptfa12_script for mini_scenarios/fa12_reference.
val lqt_fa12 : fa12_scriptfa12_script for mini_scenarios/lqt_fa12.mligo.
val fa12_scripts : fa12_script listList of fa12_scripts that can be used in generic FA1.2 tests.
val originate_fa12 :
src:string ->
admin:Account.key ->
fa12_script:fa12_script ->
Client.t ->
Protocol.t ->
(string * string) Lwt.toriginate_fa12 ~src ~admin ~fa12_script client protocol originates FA1.2 contract fa12_script from src with administrator set to admin.
Returns a pair (alias * address) for the originated contract.
val mint :
admin:Account.key ->
mint:Tez.t ->
dest:Account.key ->
fa12_address:string ->
fa12_script:fa12_script ->
Client.t ->
unit Lwt.tmint ~admin ~mint ~dest ~fa12_address ~fa12_script client mints mint for dest using the administrator admin.