summaryrefslogtreecommitdiff
path: root/source4/build/pidl/pidl.pl
diff options
context:
space:
mode:
authorAndrew Tridgell <tridge@samba.org>2003-11-14 13:15:20 +0000
committerAndrew Tridgell <tridge@samba.org>2003-11-14 13:15:20 +0000
commit492282316795af676b249fcdee51759866cc8129 (patch)
treef3b94d900da200a90d2536621a3ea4dce34c1429 /source4/build/pidl/pidl.pl
parent15b258051cf3bbf8592eac0fd5e3d747d7172101 (diff)
downloadsamba-492282316795af676b249fcdee51759866cc8129.tar.gz
samba-492282316795af676b249fcdee51759866cc8129.tar.bz2
samba-492282316795af676b249fcdee51759866cc8129.zip
* make pidl.pl exit with an error on a parse error
* fixed a buffers/scalars bug in structures (This used to be commit e66daf527357c65228db55a3d3319a0c20d8f51c)
Diffstat (limited to 'source4/build/pidl/pidl.pl')
-rwxr-xr-xsource4/build/pidl/pidl.pl1
1 files changed, 1 insertions, 0 deletions
diff --git a/source4/build/pidl/pidl.pl b/source4/build/pidl/pidl.pl
index cd2ad9d7fc..2b856b2e47 100755
--- a/source4/build/pidl/pidl.pl
+++ b/source4/build/pidl/pidl.pl
@@ -111,6 +111,7 @@ my($pidl_file) = util::ChangeExtension($opt_output, "pidl");
if ($opt_parse) {
print "Generating $pidl_file from $idl_file\n";
my($idl) = IdlParse($idl_file);
+ defined $idl || die "Failed to parse $idl_file";
util::SaveStructure($pidl_file, $idl) || die "Failed to save $pidl_file";
}