;+ ; Runs unit tests. ; ; @param tests {in}{optional}{type=strarr} ; array of test suites and/or test cases ; @keyword log_file {in}{optional}{type=string} ; name of file to send output to; if not present sends output to the ; output log ;- pro mgunit, tests, log_file=logFile compile_opt strictarr testRunner = obj_new('MGtestCliRunner', log_file=logFile) if (n_elements(tests) gt 0) then begin testsuite = obj_new('MGtestSuite', test_runner=testRunner) testsuite->add, tests testsuite->run obj_destroy, testsuite endif obj_destroy, testRunner end