File: test_suite.ml

package info (click to toggle)
ounit 1.0.2-8
  • links: PTS, VCS
  • area: main
  • in suites: lenny
  • size: 160 kB
  • ctags: 119
  • sloc: ml: 406; xml: 190; makefile: 92; sh: 17
file content (10 lines) | stat: -rw-r--r-- 208 bytes parent folder | download | duplicates (5) 
1
2
3
4
5
6
7
8
9
10
 
open OUnit

(* Collect the tests of different modules into one test suite *)
let suite = "OUnit Example" >::: 
  [Test_list.suite; 
   Test_list2.suite;
   Test_stack.suite]

let _ =
  run_test_tt_main suite