Commit 1923e0e1 authored by André Hentschel's avatar André Hentschel Committed by Alexandre Julliard

c2man: Mark the file used if a comment is found.

parent 812a3148
...@@ -300,6 +300,9 @@ sub process_source_file($) ...@@ -300,6 +300,9 @@ sub process_source_file($)
{ {
if ( /^\/\**$/ ) 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 # Found a comment start
$comment->{COMMENT_NAME} = ""; $comment->{COMMENT_NAME} = "";
$comment->{ALT_NAME} = ""; $comment->{ALT_NAME} = "";
...@@ -419,10 +422,6 @@ sub process_source_file($) ...@@ -419,10 +422,6 @@ sub process_source_file($)
if ($parse_state == 4) # Reading in the function definition 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}},$_); push (@{$comment->{PROTOTYPE}},$_);
# Strip comments from the line before checking for ')' # Strip comments from the line before checking for ')'
my $stripped_line = $_; my $stripped_line = $_;
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment