summaryrefslogtreecommitdiff
path: root/source4/pidl
diff options
context:
space:
mode:
authorJelmer Vernooij <jelmer@samba.org>2008-09-16 04:35:34 +0200
committerJelmer Vernooij <jelmer@samba.org>2008-09-16 04:35:34 +0200
commite970efc721abafb9d0a30579454d18b1d502a272 (patch)
treed89f071b3e9a8199f84965d7805d09dfe05e11ed /source4/pidl
parente9d44b2e1cbfe4f5b318086423649ece39ce6ef9 (diff)
downloadsamba-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.pm1
-rw-r--r--source4/pidl/lib/Parse/Pidl/ODL.pm1
-rwxr-xr-xsource4/pidl/pidl7
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";