1 2 3 4 5 6 7 8
let tests = [ "test1", Test1.defs; "test2", Test2.defs; ] ;; let run_all () = List.iter Run_interp.run tests ;; run_all () ;;