Fixed issue when passing duplicate paths to coverage was causing no coverage to be reported at all.

jgebal · jgebal · commit 530bd88f0811 · 2017-05-11T23:33:46.000+01:00
diff --git a/source/api/ut_runner.pkb b/source/api/ut_runner.pkb
@@ -71,9 +71,9 @@ create or replace package body ut_runner is
       schema_names    => a_coverage_schemes,
       exclude_objects => to_ut_object_list(a_exclude_objects),
       include_objects => to_ut_object_list(a_include_objects),
-      file_mappings   => a_source_file_mappings
+      file_mappings   => set(a_source_file_mappings)
     );
-    l_items_to_run := ut_run( ut_suite_manager.configure_execution_by_path(a_paths), a_paths, l_coverage_options, a_test_file_mappings );
+    l_items_to_run := ut_run( ut_suite_manager.configure_execution_by_path(a_paths), a_paths, l_coverage_options, set(a_test_file_mappings) );
     l_items_to_run.do_execute(l_listener);
 
     cleanup_temp_tables;
diff --git a/source/core/types/ut_file_mapping.tpb b/source/core/types/ut_file_mapping.tpb
@@ -0,0 +1,7 @@
+create or replace type body ut_file_mapping as
+  map member function pk return varchar2 is
+  begin
+    return file_name;
+  end;
+end;
+/
diff --git a/source/core/types/ut_file_mapping.tps b/source/core/types/ut_file_mapping.tps
@@ -2,6 +2,7 @@ create or replace type ut_file_mapping as object(
   file_name    varchar2(4000),
   object_owner varchar2(4000),
   object_name  varchar2(4000),
-  object_type  varchar2(4000)
+  object_type  varchar2(4000),
+  map member function pk return varchar2
 )
 /
diff --git a/source/install.sql b/source/install.sql
@@ -115,6 +115,7 @@ whenever sqlerror exit failure rollback
 @@core/types/ut_event_listener.tpb
 @@core/types/ut_expectation_result.tpb
 @@core/types/ut_reporter_base.tpb
+@@core/types/ut_file_mapping.tpb
 @@core/types/ut_executable.tpb
 @@core/types/ut_console_reporter_base.tps
 @@core/types/ut_console_reporter_base.tpb

Original file line number	Diff line number	Diff line change
`@@ -2,6 +2,7 @@ create or replace type ut_file_mapping as object(`
`2`	`2`	`file_name varchar2(4000),`
`3`	`3`	`object_owner varchar2(4000),`
`4`	`4`	`object_name varchar2(4000),`
`5`		`- object_type varchar2(4000)`
	`5`	`+ object_type varchar2(4000),`
	`6`	`+ map member function pk return varchar2`
`6`	`7`	`)`
`7`	`8`	`/`