Disambiguate variant label
[tiger.ml.git] / compiler / src / exe / tigert.ml
1 let () =
2 let dir = ref "testcases" in
3 Arg.parse [("-dir", Arg.String (fun s -> dir := s), "")] (fun _ -> ()) "";
4 let dir = !dir in
5 Tiger.Test.run (Tiger.Test_cases.all ~dir)
This page took 0.039765 seconds and 4 git commands to generate.