测试添加

src/testCase/utTryCatchCase.erl

@@ -238,7 +238,14 @@ testTryCatch2(Type, TestLoop) ->
       Type:Reason:Strace ->
          case TestLoop of
             true -> Strace;
-            false -> io:format("try .. catch block caught exception of ~p: ~p: ~p:~n", [Type, Reason, Strace])
+            false ->
+               S1 = utParseStack:parseStack(Strace),
+               S2 = utParseStack:parseStack(element(2, erlang:process_info(self(), current_stacktrace))),
+               io:format(S1),
+               io:format(S2),
+               io:format("try .. catch block caught exception of ~p: ~p: ~n ~s:~n", [Type, Reason, io_lib:format(S1, [])]),
+               io:format("try .. catch block caught exception of ~p: ~p: ~n ~s:~n", [Type, Reason, io_lib:format(S2, [])])
+
          end
    end.