# HG changeset patch
# User anatofuz
# Date 1579509008 -32400
# Node ID d00a1d0758cb4361d2414baf8fbec7525623047d
# Parent  f431400da994c44e17a627c2dc29733c19007048
tweak

diff -r f431400da994 -r d00a1d0758cb src/gearsTools/lib/Gears/Context.pm
--- a/src/gearsTools/lib/Gears/Context.pm	Mon Jan 20 17:10:58 2020 +0900
+++ b/src/gearsTools/lib/Gears/Context.pm	Mon Jan 20 17:30:08 2020 +0900
@@ -111,6 +111,7 @@
     }
     close $fh;
   }
+  use Data::Dumper;
 
   for my $cg_name (keys %include_pool) {
     my @tmp_cbc_file_names  = keys %{$include_pool{$cg_name}};
@@ -118,13 +119,13 @@
     if (exists $counter{interfaces}->{$cg_name}){
       push(@{$counter{interfaces}->{$cg_name}->{$tmp_cbc_file_name}},$include_pool{$cg_name}->{$tmp_cbc_file_name});
       delete $include_pool{$cg_name};
-      last;
+      next;
     }
 
     if (exists $counter{impl}->{$cg_name}){
       push(@{$counter{impl}->{$cg_name}->{$tmp_cbc_file_name}},$include_pool{$cg_name}->{$tmp_cbc_file_name});
       delete $include_pool{$cg_name};
-      last;
+      next;
     }
     push(@{$counter{interfaces}->{$cg_name}->{$tmp_cbc_file_name}},$include_pool{$cg_name}->{$tmp_cbc_file_name});
     delete $include_pool{$cg_name};
@@ -133,7 +134,6 @@
   $counter{interfaces}->{Meta}++;
   $counter{interfaces}->{TaskManager}++;
   print "-----------\n";
-  use Data::Dumper;
   print Dumper \%counter;
   print "-----------\n";
   return \%counter;