From 63737a00cf3ce448be3eb5f808a9392efc33453f Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Wed, 1 Feb 2012 19:19:20 +0000 Subject: (parse_pm) ignore forward declarations --- fake_packages/gen.pl | 2 ++ 1 file changed, 2 insertions(+) (limited to 'fake_packages') diff --git a/fake_packages/gen.pl b/fake_packages/gen.pl index aefb948..aaf4a4d 100755 --- a/fake_packages/gen.pl +++ b/fake_packages/gen.pl @@ -106,6 +106,8 @@ sub parse_pm { $current_package = $1; } elsif (!$current_package) { # waiting for the package line + } elsif (/^sub\s*(\S*);/) { + # forget it } elsif (/^sub\s*(\S*)/) { $name = $1; $l{$current_package}{$name} = [] if !defined($l{$current_package}{$name}); -- cgit v1.2.1