# HG changeset patch
# User anatofuz
# Date 1576126866 -32400
# Node ID 7f9dac064c5f8d69becc99614d6da45ea77959a7
# Parent  fb75c5e661c262a53a7dd94d5e8ba38efbe7b573
remove dead code at perl scripts

diff -r fb75c5e661c2 -r 7f9dac064c5f src/gearsTools/update_context.pl
--- a/src/gearsTools/update_context.pl	Thu Dec 12 13:52:45 2019 +0900
+++ b/src/gearsTools/update_context.pl	Thu Dec 12 14:01:06 2019 +0900
@@ -56,25 +56,6 @@
   return (\@first_context_headers,\@last_context_headers);
 }
 
-sub dump_h2context {
-  my $h2context = shift;
-  my $context = '';
-  my $space = '    ';
-  #print "${space}struct $h2context->{name} {\n";
-  $context =  "${space}struct $h2context->{name} {\n";
-  for my $datum (@{$h2context->{data}}) {
-    #print "${space}${space}$datum; \n";
-    $context .= "${space}${space}$datum;\n";
-  }
-  for my $code (@{$h2context->{codes}}) {
-    #print "${space}${space}enum Code $code;\n";
-    $context .= "${space}${space}enum Code $code;\n";
-  }
-  #print "${space}} $h2context->{name};\n";
-  $context .= "${space}} $h2context->{name};\n";
-  return $context;
-}
-
 sub context_dump {
   for my $line (@_) {
     print "$line";