using the proper entry point in the test..

This commit is contained in:
Lesenechal Remi 2019-10-18 14:42:36 +02:00
parent b721a19b00
commit 71548f8c7c

View File

@ -594,7 +594,7 @@ let condition () : unit result =
in in
let%bind _ = let%bind _ =
let make_expected = fun b -> e_int (if b then 42 else 1) in let make_expected = fun b -> e_int (if b then 42 else 1) in
expect_eq_b program "main" make_expected expect_eq_b program "foo" make_expected
in in
ok () ok ()