diff --git a/util/perl/OpenSSL/ParseC.pm b/util/perl/OpenSSL/ParseC.pm index 2db43e2a61..392e61faf2 100644 --- a/util/perl/OpenSSL/ParseC.pm +++ b/util/perl/OpenSSL/ParseC.pm @@ -561,7 +561,7 @@ my @chandlers = ( # Note that the main parse function has a special hack for 'extern "C" {' # which can't be done in handlers # We simply ignore it. - { regexp => qr/extern "C" (.*;)/, + { regexp => qr/^extern "C" (.*(?:;|>>>))/, massager => sub { return ($1); }, }, # any other extern is just ignored