From 4e1bac41f4b89afee79dc9d9165e70e2f4cbb940 Mon Sep 17 00:00:00 2001 From: Andrew Tridgell Date: Sun, 7 Dec 2003 13:39:45 +0000 Subject: make pidl a little less verbose (This used to be commit 76f48affe5d1e8fd96d5dc9af2ec1059f3dd741c) --- source4/build/pidl/pidl.pl | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) (limited to 'source4/build') diff --git a/source4/build/pidl/pidl.pl b/source4/build/pidl/pidl.pl index 4799389fc4..4e79eb92f6 100755 --- a/source4/build/pidl/pidl.pl +++ b/source4/build/pidl/pidl.pl @@ -101,8 +101,9 @@ sub process_file($) my($pidl_file) = util::ChangeExtension($output, "pidl"); + print "Compiling $idl_file\n"; + 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"; @@ -118,21 +119,18 @@ sub process_file($) if ($opt_header) { my($idl) = util::LoadStructure($pidl_file); my($header) = util::ChangeExtension($output, "h"); - print "Generating $header\n"; util::FileSave($header, IdlHeader::Parse($idl)); } if ($opt_parser) { my($idl) = util::LoadStructure($pidl_file); my($parser) = util::ChangeExtension($output, "c"); - print "Generating $parser\n"; IdlParser::Parse($idl, $parser); } if ($opt_eparser) { my($idl) = util::LoadStructure($pidl_file); my($parser) = util::ChangeExtension($output, "c"); - print "Generating $parser for ethereal\n"; util::FileSave($parser, IdlEParser::Parse($idl)); } -- cgit