Merge pull request #9 from odo/master

logging test names and success/failure
wooga · Aug 16, 2013 · 16c0332 · 16c0332
2 parents 52a7ad1 + 52cad22
commit 16c0332
Showing 1 changed file with 8 additions and 1 deletion.
diff --git a/src/etest_runner.erl b/src/etest_runner.erl
@@ -41,9 +41,11 @@ run(Module) ->
     ToRun = lists:flatten([BeforeSuite, FunsWithCallbacks, AfterSuite]),
     TryTest = fun (Test) ->
         try
-            Test()
+            Test(),
+            io:format("Etest passed.\n")
         catch
             _:Error ->
+                io:format("Etest failed.\n"),
                 inc(errors),
                 io:format("::~p~n", [Error]),
                 CleanTrace = clean_trace(erlang:get_stacktrace()),
@@ -79,6 +81,11 @@ testfuns(Module) ->
     MakeApplicative = fun({FunName, _}) ->
         fun() ->
             inc(tests),
+            Msg = lists:flatten(io_lib:format("~p:~p ", [Module, FunName])),
+            io:format(
+                string:left(Msg, 80, $.) ++ "\n" ++
+                string:left("",  80, $=) ++ "\n"
+            ),
             Module:FunName(),
             inc(success)
         end