Author: metze Date: 2006-01-10 16:54:21 +0000 (Tue, 10 Jan 2006) New Revision: 12831
WebSVN: http://websvn.samba.org/cgi-bin/viewcvs.cgi?view=rev&root=samba&rev=12831 Log: add 'extern' to public prototypes metze Modified: branches/SAMBA_4_0/source/script/mkproto.pl Changeset: Modified: branches/SAMBA_4_0/source/script/mkproto.pl =================================================================== --- branches/SAMBA_4_0/source/script/mkproto.pl 2006-01-10 16:51:46 UTC (rev 12830) +++ branches/SAMBA_4_0/source/script/mkproto.pl 2006-01-10 16:54:21 UTC (rev 12831) @@ -120,6 +120,7 @@ while (my $line = <FH>) { my $target = $private_file; + my $is_public = 0; # these are ordered for maximum speed next if ($line =~ /^\s/); @@ -128,11 +129,12 @@ next if ($line =~ /^\/|[;]/); - if ($line =~ s/^_PUBLIC_[\t ]//) { + if ($line =~ s/^_PUBLIC_[\t ]/extern /) { $target = $public_file; + $is_public = 1; } - next unless ( $line =~ / + next unless ( $is_public || $line =~ / ^void|^BOOL|^int|^struct|^char|^const|^\w+_[tT]\s|^uint|^unsigned|^long| ^NTSTATUS|^ADS_STATUS|^enum\s.*\(|^DATA_BLOB|^WERROR|^XFILE|^FILE|^DIR| ^double|^TDB_CONTEXT|^TDB_DATA|^TALLOC_CTX|^NTTIME|^FN_|^init_module|
