2019-05-13 00:56:22 +04:00
|
|
|
open Trace
|
2019-05-31 23:56:51 +04:00
|
|
|
open Ligo.Run
|
2019-05-13 00:56:22 +04:00
|
|
|
open Test_helpers
|
|
|
|
|
|
|
|
let compile_contract_basic () : unit result =
|
|
|
|
let%bind _ =
|
2019-05-31 23:56:51 +04:00
|
|
|
compile_contract_file "./contracts/dispatch-counter.ligo" "main" "pascaligo"
|
2019-05-13 00:56:22 +04:00
|
|
|
in
|
|
|
|
ok ()
|
|
|
|
|
|
|
|
let main = "Bin", [
|
|
|
|
test "compile contract basic" compile_contract_basic ;
|
|
|
|
]
|