tdb:mksigs: correctly ignode multiline function typedefs
[ira/wip.git] / lib / tdb / script / mksigs.pl
index 28a2e747a07d70629e812ec2f75c74f3e23e5c4b..ab2e18ec520d29bd628262f302fce7855f9c4251 100755 (executable)
@@ -118,10 +118,6 @@ while (my $LINE = <>) {
                }
        }
 
-       next if ($LINE =~ /^typedef\s/);
-       next if ($LINE =~ /^enum\s+[^\{\(]+\s+\{/);
-       next if ($LINE =~ /^struct\s+[^\{\(]+\s+\{.*\}\s*;/);
-
        # concetenate function prototypes that stretch over multiple lines
        $REST = $LINE;
        my $parenthesis = 0;
@@ -155,6 +151,11 @@ while (my $LINE = <>) {
                }
        }
 
+       next if ($LINE =~ /^typedef\s/);
+       next if ($LINE =~ /^enum\s+[^\{\(]+\s+\{/);
+       next if ($LINE =~ /^struct\s+[^\{\(]+\s+\{.*\}\s*;/);
+       next if ($LINE =~ /^struct\s+[a-zA-Z0-9_]+\s*;/);
+
        # remove trailing spaces
        $LINE =~ s/(.*?)\s*$/$1/;