ligo/test/bin_tests.ml

open Trace
open Ligo.Run
open Test_helpers

let compile_contract_basic () : unit result =
  let%bind _ =
    compile_contract_file "./contracts/dispatch-counter.ligo" "main" (Syntax_name "pascaligo")
  in
  ok ()

let main = test_suite "Bin" [
    test "compile contract basic" compile_contract_basic ;
]
initial commit 2019-05-12 20:56:22 +00:00			`open Trace`
various refactorings to prepare tests; tests for ligodity don't pass 2019-05-31 19:56:51 +00:00			`open Ligo.Run`
initial commit 2019-05-12 20:56:22 +00:00			`open Test_helpers`

			`let compile_contract_basic () : unit result =`
			`let%bind _ =`
Fix auto-detection of syntax, use a polymorphic variant to ensure all functions were updated. 2019-06-13 01:43:16 +02:00			`compile_contract_file "./contracts/dispatch-counter.ligo" "main" (Syntax_name "pascaligo")`
initial commit 2019-05-12 20:56:22 +00:00			`in`
			`ok ()`

add test hierarchy 2019-06-05 06:43:33 +00:00			`let main = test_suite "Bin" [`
initial commit 2019-05-12 20:56:22 +00:00			`test "compile contract basic" compile_contract_basic ;`
			`]`