diff options
| author | Jelmer Vernooij <jelmer@samba.org> | 2004-11-10 21:20:51 +0000 |
|---|---|---|
| committer | Gerald (Jerry) Carter <jerry@samba.org> | 2007-10-10 13:05:43 -0500 |
| commit | 0d696dc0e9867889fe198e61ed576af51ee732d1 (patch) | |
| tree | c41461d05cdfb72d62cabef049c364f4e5fef128 /source4/build/pidl/header.pm | |
| parent | f847f3a3e13d2d96f9b74a398047d84b4ad78127 (diff) | |
| download | samba-0d696dc0e9867889fe198e61ed576af51ee732d1.tar.gz samba-0d696dc0e9867889fe198e61ed576af51ee732d1.tar.bz2 samba-0d696dc0e9867889fe198e61ed576af51ee732d1.zip | |
r3667: Small COM fixes
(This used to be commit 7484b9be7423ccd7e37432951700939e8a53d513)
Diffstat (limited to 'source4/build/pidl/header.pm')
| -rw-r--r-- | source4/build/pidl/header.pm | 17 |
1 files changed, 14 insertions, 3 deletions
diff --git a/source4/build/pidl/header.pm b/source4/build/pidl/header.pm index cc9b804387..b981200781 100644 --- a/source4/build/pidl/header.pm +++ b/source4/build/pidl/header.pm @@ -350,16 +350,27 @@ sub HeaderInterface($) $res .= "NTSTATUS dcerpc_server_$interface->{NAME}_init(void);\n\n"; } - $count = $interface->{INHERITED_FUNCTIONS}; foreach my $d (@{$data}) { if ($d->{TYPE} eq "FUNCTION") { my $u_name = uc $d->{NAME}; - $res .= "#define DCERPC_$u_name " . sprintf("0x%02x", $count) . "\n"; + $res .= "#define DCERPC_$u_name ("; + + if (defined($interface->{BASE})) { + $res .= "DCERPC_" . uc $interface->{BASE} . "_CALL_COUNT + "; + } + + $res .= sprintf("0x%02x", $count) . ")\n"; $count++; } } - $res .= "\n\n"; + $res .= "\n#define DCERPC_" . uc $interface->{NAME} . "_CALL_COUNT ("; + + if (defined($interface->{BASE})) { + $res .= "DCERPC_" . uc $interface->{BASE} . "_CALL_COUNT + "; + } + + $res .= "$count)\n\n"; foreach my $d (@{$data}) { ($d->{TYPE} eq "CONST") && |