Suyu/mbedtls
1
0
Fork 0
mirror of https://git.suyu.dev/suyu/mbedtls.git synced 2025-12-22 13:56:42 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

Fix warning from Perl 5.21 in helper script

Browse source
This commit is contained in:
Manuel Pégourié-Gonnard 2015-07-01 19:32:00 +02:00
parent 5791109707
commit ae738c29eb
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
tests/scripts/list-enum-consts.pl
View file

@ -14,7 +14,7 @@ my @consts;
my $state = 'out'; my $state = 'out';
while (<>) while (<>)
{ {
if( $state eq 'out' and /^(typedef )?enum {/ ) { if( $state eq 'out' and /^(typedef )?enum \{/ ) {
$state = 'in'; $state = 'in';
} elsif( $state eq 'out' and /^(typedef )?enum/ ) { } elsif( $state eq 'out' and /^(typedef )?enum/ ) {
$state = 'start'; $state = 'start';