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