Author: jelmer Date: 2006-09-06 12:30:26 +0000 (Wed, 06 Sep 2006) New Revision: 18171
WebSVN: http://websvn.samba.org/cgi-bin/viewcvs.cgi?view=rev&root=samba&rev=18171 Log: Generate prototypes for functions returning bool. 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-09-06 12:29:45 UTC (rev 18170) +++ branches/SAMBA_4_0/source/script/mkproto.pl 2006-09-06 12:30:26 UTC (rev 18171) @@ -125,13 +125,14 @@ { my ($file,$line) = @_; - if ($line =~ /^_PUBLIC_ FN_(GLOBAL|LOCAL)_(CONST_STRING|STRING|BOOL|CHAR|INTEGER|LIST)\((\w+),.*\)/o) { + if ($line =~ /^_PUBLIC_ FN_(GLOBAL|LOCAL)_(CONST_STRING|STRING|BOOL|bool|CHAR|INTEGER|LIST)\((\w+),.*\)/o) { my $scope = $1; my $type = $2; my $name = $3; my %tmap = ( "BOOL" => "BOOL ", + "bool" => "bool ", "CONST_STRING" => "const char *", "STRING" => "const char *", "INTEGER" => "int ", @@ -182,7 +183,7 @@ } next unless ( $is_public || $line =~ / - ^void|^BOOL|^int|^struct|^char|^const|^\w+_[tT]\s|^uint|^unsigned|^long| + ^void|^BOOL|^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| ^GtkWidget|^GType|^smb_ucs2_t