From 1923e0e159b0c8140cf28d5378bd7c34b2ac1fa6 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Andr=C3=A9=20Hentschel?= Date: Thu, 4 Aug 2011 21:08:37 +0200 Subject: [PATCH] c2man: Mark the file used if a comment is found. --- tools/c2man.pl | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) diff --git a/tools/c2man.pl b/tools/c2man.pl index ce8a4447e92..7eca8c43084 100755 --- a/tools/c2man.pl +++ b/tools/c2man.pl @@ -300,6 +300,9 @@ sub process_source_file($) { if ( /^\/\**$/ ) { + # This file is used by the DLL - Make sure we get our contributors right + @{$spec_files{$comment->{DLL_NAME}}[0]->{CURRENT_EXTRA}} = (); + push (@{$spec_files{$comment->{DLL_NAME}}[0]->{SOURCES}},$comment->{FILE}); # Found a comment start $comment->{COMMENT_NAME} = ""; $comment->{ALT_NAME} = ""; @@ -419,10 +422,6 @@ sub process_source_file($) if ($parse_state == 4) # Reading in the function definition { - # This file is used by the DLL - Make sure we get our contributors right - @{$spec_files{$comment->{DLL_NAME}}[0]->{CURRENT_EXTRA}} = (); - push (@{$spec_files{$comment->{DLL_NAME}}[0]->{SOURCES}},$comment->{FILE}); - push (@{$comment->{PROTOTYPE}},$_); # Strip comments from the line before checking for ')' my $stripped_line = $_;