Make sure to count __all__ lines, also those who start a new "scope" (anything that finishes with "end")
git-svn-id: svn+ssh://svn.gna.org/svn/warzone/trunk@5439 4a71c877-e1ca-e34f-864e-861f7616d084master
parent
3b57831282
commit
f8f4ce0854
|
@ -18,6 +18,7 @@ sub parseEnum
|
|||
|
||||
@{$curEnum{"comment"}} = @$comment;
|
||||
@$comment = ();
|
||||
$$count++;
|
||||
|
||||
while (<>)
|
||||
{
|
||||
|
@ -55,6 +56,8 @@ sub readTillEnd
|
|||
{
|
||||
my ($output, $count) = @_;
|
||||
|
||||
$$count++;
|
||||
|
||||
while (<>)
|
||||
{
|
||||
chomp;
|
||||
|
@ -78,6 +81,7 @@ sub parseStruct
|
|||
|
||||
@{$curStruct{"comment"}} = @$comment;
|
||||
@$comment = ();
|
||||
$$count++;
|
||||
|
||||
while (<>)
|
||||
{
|
||||
|
|
Loading…
Reference in New Issue