diff options
author | Jelmer Vernooij <jelmer@samba.org> | 2008-09-16 04:35:34 +0200 |
---|---|---|
committer | Jelmer Vernooij <jelmer@samba.org> | 2008-09-16 04:35:34 +0200 |
commit | e970efc721abafb9d0a30579454d18b1d502a272 (patch) | |
tree | d89f071b3e9a8199f84965d7805d09dfe05e11ed /source4/pidl | |
parent | e9d44b2e1cbfe4f5b318086423649ece39ce6ef9 (diff) | |
download | samba-e970efc721abafb9d0a30579454d18b1d502a272.tar.gz samba-e970efc721abafb9d0a30579454d18b1d502a272.tar.bz2 samba-e970efc721abafb9d0a30579454d18b1d502a272.zip |
Support restricted.
Diffstat (limited to 'source4/pidl')
-rw-r--r-- | source4/pidl/lib/Parse/Pidl/NDR.pm | 1 | ||||
-rw-r--r-- | source4/pidl/lib/Parse/Pidl/ODL.pm | 1 | ||||
-rwxr-xr-x | source4/pidl/pidl | 7 |
3 files changed, 6 insertions, 3 deletions
diff --git a/source4/pidl/lib/Parse/Pidl/NDR.pm b/source4/pidl/lib/Parse/Pidl/NDR.pm index 5eb5cbc195..9b61a370e2 100644 --- a/source4/pidl/lib/Parse/Pidl/NDR.pm +++ b/source4/pidl/lib/Parse/Pidl/NDR.pm @@ -856,6 +856,7 @@ my %property_list = ( "pointer_default" => ["INTERFACE"], "helper" => ["INTERFACE"], "authservice" => ["INTERFACE"], + "restricted" => ["INTERFACE"], # dcom "object" => ["INTERFACE"], diff --git a/source4/pidl/lib/Parse/Pidl/ODL.pm b/source4/pidl/lib/Parse/Pidl/ODL.pm index f6df34afa8..5c2cc8bfbf 100644 --- a/source4/pidl/lib/Parse/Pidl/ODL.pm +++ b/source4/pidl/lib/Parse/Pidl/ODL.pm @@ -110,6 +110,7 @@ sub ODL2IDL LINE => undef }) if ($addedorpc); + return $odl; } diff --git a/source4/pidl/pidl b/source4/pidl/pidl index 0a6b0a97ca..e58442ba1b 100755 --- a/source4/pidl/pidl +++ b/source4/pidl/pidl @@ -612,10 +612,11 @@ sub process_file($) $pidl = Parse::Pidl::IDL::parse_file($idl_file, \@opt_incdirs); defined @$pidl || die "Failed to parse $idl_file"; - require Parse::Pidl::Typelist; - Parse::Pidl::Typelist::LoadIdl($pidl); } - + + require Parse::Pidl::Typelist; + Parse::Pidl::Typelist::LoadIdl($pidl); + if (defined($opt_dump_idl_tree)) { my($pidl_file) = ($opt_dump_idl_tree or "$outputdir/$basename.pidl"); SaveStructure($pidl_file, $pidl) or die "Failed to save $pidl_file\n"; |