summaryrefslogtreecommitdiff
path: root/source4
diff options
context:
space:
mode:
authorAndrew Tridgell <tridge@samba.org>2003-11-23 02:00:40 +0000
committerAndrew Tridgell <tridge@samba.org>2003-11-23 02:00:40 +0000
commit4df03a892122edefc46ad040aa0b8ccd2b2f06c2 (patch)
tree6e74c92f15796fced5828d1d9ffbc3aa5a9c227f /source4
parentd47d14f2ffc7a6d2cc306530b777f364767998b3 (diff)
downloadsamba-4df03a892122edefc46ad040aa0b8ccd2b2f06c2.tar.gz
samba-4df03a892122edefc46ad040aa0b8ccd2b2f06c2.tar.bz2
samba-4df03a892122edefc46ad040aa0b8ccd2b2f06c2.zip
nicer base type handling
(This used to be commit e58384eb53b654768d2eb53c222529849674753c)
Diffstat (limited to 'source4')
-rw-r--r--source4/script/mkproto.pl12
1 files changed, 6 insertions, 6 deletions
diff --git a/source4/script/mkproto.pl b/source4/script/mkproto.pl
index b13c4b1fbb..1ef17ae55d 100644
--- a/source4/script/mkproto.pl
+++ b/source4/script/mkproto.pl
@@ -24,7 +24,7 @@ sub print_footer {
sub handle_loadparm {
my $line = shift;
-
+
if ($line =~ /^FN_GLOBAL_STRING/o) {
my $fnName = (split(/[\(,]/, $line))[1];
print "char *$fnName(void);\n";
@@ -114,11 +114,11 @@ sub process_files {
# I'm going to leave these as is for now - perl can probably handle larger regex, though -- vance
# I've also sort of put these in approximate order of most commonly called
- elsif ( $line =~ /^NTSTATUS|^void|^BOOL|^int|^struct|^char|^const|^\w+_[tT]\s|^uint|^ADS_STATUS|^enum\s.*\(|^DATA_BLOB|^WERROR/o ) {
- $gotstart = 1;
- } elsif ( $line =~ /^long|^XFILE|^FILE|^unsigned|^DIR/o) {
- $gotstart = 1;
- } elsif ( $line =~ /^double|^TDB_CONTEXT|^TDB_DATA|^TALLOC_CTX|^NTTIME/o ) {
+ if ( $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
+ /x) {
$gotstart = 1;
}