diff options
Diffstat (limited to 'src/interfaces/ecpg/preproc/check_rules.pl')
| -rwxr-xr-x | src/interfaces/ecpg/preproc/check_rules.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interfaces/ecpg/preproc/check_rules.pl b/src/interfaces/ecpg/preproc/check_rules.pl index 7dc6ca46fb..3a796493d5 100755 --- a/src/interfaces/ecpg/preproc/check_rules.pl +++ b/src/interfaces/ecpg/preproc/check_rules.pl @@ -102,7 +102,7 @@ while (<GRAM>) { $block = $block . $arr[$fieldIndexer]; } } -} +} close GRAM; @@ -113,7 +113,7 @@ line: while (<ECPG>) { @Fld = split(' ', $_, -1); if (!/^ECPG:/) { - next line; + next line; } if ($found{$Fld[2]} ne 'found') { |