exercism/ocaml/hello-world/test.ml
2017-08-12 09:01:07 -05:00

14 lines
276 B
OCaml

(* Test/exercise version: "1.0.0" *)
open Core
open OUnit2
open Hello_world
let ae exp got _test_ctxt = assert_equal ~printer:String.to_string exp got
let tests = [
"Say Hi!" >:: ae "Hello, World!" hello;
]
let () =
run_test_tt_main ("Hello World tests" >::: tests)