diff options
| author | Jelmer Vernooij <jelmer@samba.org> | 2005-02-13 12:38:56 +0000 |
|---|---|---|
| committer | Gerald (Jerry) Carter <jerry@samba.org> | 2007-10-10 13:09:48 -0500 |
| commit | ff6e58a7c4da70880276aad482820b0d17be635b (patch) | |
| tree | 7627c7bcd3c5ff08df8165ae4a00a0e930f35423 /source4/build/pidl/idl.pm | |
| parent | ffa5c91d0fd63c789bb7d73cb91f50841fb4f503 (diff) | |
| download | samba-ff6e58a7c4da70880276aad482820b0d17be635b.tar.gz samba-ff6e58a7c4da70880276aad482820b0d17be635b.tar.bz2 samba-ff6e58a7c4da70880276aad482820b0d17be635b.zip | |
r5376: ORPC is NDR specific, so move it to ndr.pm.
Get rid of register_enum/register_bitmap, etc. (use list of
types in ndr.pm instead)
(This used to be commit efc2e41b8df3a0171cca57291929fb63760c1662)
Diffstat (limited to 'source4/build/pidl/idl.pm')
| -rw-r--r-- | source4/build/pidl/idl.pm | 24 |
1 files changed, 2 insertions, 22 deletions
diff --git a/source4/build/pidl/idl.pm b/source4/build/pidl/idl.pm index b18215ed34..6ae7cb463f 100644 --- a/source4/build/pidl/idl.pm +++ b/source4/build/pidl/idl.pm @@ -2383,28 +2383,8 @@ sub parse_idl($$) my $idl = $self->YYParse( yylex => \&_Lexer, yyerror => \&_Error ); foreach my $x (@{$idl}) { - # Add [in] ORPCTHIS *this, [out] ORPCTHAT *that - # for 'object' interfaces - if (util::has_property($x, "object")) { - foreach my $e (@{$x->{DATA}}) { - if($e->{TYPE} eq "FUNCTION") { - $e->{PROPERTIES}->{object} = 1; - unshift(@{$e->{ELEMENTS}}, - { 'NAME' => 'ORPCthis', - 'POINTERS' => 0, - 'PROPERTIES' => { 'in' => '1' }, - 'TYPE' => 'ORPCTHIS' - }); - unshift(@{$e->{ELEMENTS}}, - { 'NAME' => 'ORPCthat', - 'POINTERS' => 0, - 'PROPERTIES' => { 'out' => '1' }, - 'TYPE' => 'ORPCTHAT' - }); - } - } - } - + NdrParser::InterfaceORPC($x); + # Do the inheritance if (defined($x->{BASE}) and $x->{BASE} ne "") { my $parent = util::get_interface($idl, $x->{BASE}); |