| commit | ae738c29eb0e091d2399fc6abec5bd8405e67f38 | [log] [tgz] |
|---|---|---|
| author | Manuel Pégourié-Gonnard <mpg@elzevir.fr> | Wed Jul 01 19:32:00 2015 +0200 |
| committer | Manuel Pégourié-Gonnard <mpg@elzevir.fr> | Wed Jul 01 19:32:00 2015 +0200 |
| tree | a703622fa978fc6afeef6cb7b81126a87261c715 | |
| parent | 5791109707c85283bfea25210d2ef13ea68751b4 [diff] |
Fix warning from Perl 5.21 in helper script
diff --git a/tests/scripts/list-enum-consts.pl b/tests/scripts/list-enum-consts.pl index c8e2636..633e3fd 100755 --- a/tests/scripts/list-enum-consts.pl +++ b/tests/scripts/list-enum-consts.pl
@@ -14,7 +14,7 @@ my $state = 'out'; while (<>) { - if( $state eq 'out' and /^(typedef )?enum {/ ) { + if( $state eq 'out' and /^(typedef )?enum \{/ ) { $state = 'in'; } elsif( $state eq 'out' and /^(typedef )?enum/ ) { $state = 'start';