Merge pull request #372 from Pazus/issue-351

jgebal · web-flow · commit e49f6dfb5c59 · 2017-07-02T14:58:14.000+01:00
implemented timing reporting for documentation reporter
diff --git a/source/reporters/ut_documentation_reporter.tpb b/source/reporters/ut_documentation_reporter.tpb
@@ -50,7 +50,7 @@ create or replace type body ut_documentation_reporter is
     l_message varchar2(4000);
 
   begin
-    l_message := coalesce(a_test.description, a_test.name);
+    l_message := coalesce(a_test.description, a_test.name)||' ['||round(a_test.execution_time,3)||' sec]';
     --if test failed, then add it to the failures list, print failure with number
     if a_test.result = ut_utils.tr_disabled then
       self.print_yellow_text(l_message || ' (IGNORED)');
diff --git a/tests/RunAll.sql b/tests/RunAll.sql
@@ -136,6 +136,7 @@ exec ut_coverage.coverage_start_develop();
 @@lib/RunTest.sql ut_reporters/ut_html_reporter.DefaultSchemaCoverage.sql
 @@lib/RunTest.sql ut_reporters/ut_xunit_reporter.ReportOnSuiteWithoutDesc.sql
 @@lib/RunTest.sql ut_reporters/ut_xunit_reporter.ReportOnTestWithoutDesc.sql
+@@lib/RunTest.sql ut_reporters/ut_documentation_reporter.reportTestTiming.sql
 
 @@lib/RunTest.sql ut/ut.run.AcceptsCoverageFileList.sql
 @@lib/RunTest.sql ut/ut.run.AcceptsCoverageFileListWithSutePaths.sql
@@ -229,7 +230,6 @@ exec ut_coverage.coverage_start_develop();
 @@lib/RunTest.sql ut_test_suite/ut_test_suite.Rollback_type.ManualOnFailure.sql
 
 @@ut_utils/ut_utils.clob_to_table.sql
-@@ut_utils/ut_utils.clob_to_table_multibyte.sql
 @@ut_utils/ut_utils.table_to_clob.sql
 @@lib/RunTest.sql ut_utils/ut_utils.append_to_clob.worksWithMultiByteChars.sql
 @@lib/RunTest.sql ut_utils/ut_utils.test_result_to_char.RunsWithInvalidValues.sql
diff --git a/tests/ut_reporters/ut_documentation_reporter.reportTestTiming.sql b/tests/ut_reporters/ut_documentation_reporter.reportTestTiming.sql
@@ -0,0 +1,50 @@
+set termout off
+create or replace package tst_doc_reporter_timing as
+  --%suite
+
+  --%test
+  procedure test1;
+  
+  --%test
+  procedure test2;
+end;
+/
+
+create or replace package body tst_doc_reporter_timing as
+  procedure test1 is begin ut.expect(1).to_equal(1); end;
+  procedure test2 is begin ut.expect(1).to_equal(2); end;
+end;
+/
+
+set termout on
+
+declare
+  l_test_report ut_varchar2_list;
+  l_output_data       ut_varchar2_list;
+  l_output            varchar2(32767);
+  l_expected          varchar2(32767);
+begin
+  l_expected := q'[tst_doc_reporter_timing
+%test1 [%sec]
+%test2 [%sec] (FAILED - 1)
+%Failures:%
+Finished in % seconds
+2 tests, 1 failed, 0 errored, 0 disabled, 0 warning(s)%]';
+
+  --act
+  select *
+  bulk collect into l_output_data
+  from table(ut.run('tst_doc_reporter_timing',ut_documentation_reporter()));
+
+  l_output := ut_utils.table_to_clob(l_output_data);
+
+  --assert
+  if l_output like l_expected then
+    :test_result := ut_utils.tr_success;
+  else
+    dbms_output.put_line('Actual:"'||l_output||'"');
+  end if;
+end;
+/
+
+drop package tst_doc_reporter_timing;
