svn commit: samba r5073 - in branches/SAMBA_4_0/source/build/pidl: .
tpot at samba.org
tpot at samba.org
Sat Jan 29 01:39:51 GMT 2005
Author: tpot
Date: 2005-01-29 01:39:50 +0000 (Sat, 29 Jan 2005)
New Revision: 5073
WebSVN: http://websvn.samba.org/cgi-bin/viewcvs.cgi?view=rev&root=samba&rev=5073
Log:
Call new autogenerator function for swig stuff instead of old one.
Modified:
branches/SAMBA_4_0/source/build/pidl/pidl.pl
Changeset:
Modified: branches/SAMBA_4_0/source/build/pidl/pidl.pl
===================================================================
--- branches/SAMBA_4_0/source/build/pidl/pidl.pl 2005-01-29 00:19:23 UTC (rev 5072)
+++ branches/SAMBA_4_0/source/build/pidl/pidl.pl 2005-01-29 01:39:50 UTC (rev 5073)
@@ -145,6 +145,12 @@
my($eparserhdr) = dirname($output) . "/packet-dcerpc-$basename.h";
IdlEParser::RewriteHeader($pidl, $header, $eparserhdr);
}
+ if ($opt_swig) {
+ my($filename) = $output;
+ $filename =~ s/\/ndr_/\//;
+ $filename = util::ChangeExtension($filename, ".i");
+ IdlSwig::RewriteHeader($pidl, $header, $filename);
+ }
}
if ($opt_client) {
@@ -210,12 +216,6 @@
my($eparser) = dirname($output) . "/packet-dcerpc-$basename.c";
IdlEParser::RewriteC($pidl, $parser, $eparser);
}
- if ($opt_swig) {
- my($filename) = $output;
- $filename =~ s/\/ndr_/\//;
- $filename = util::ChangeExtension($filename, ".i");
- util::FileSave($filename, IdlSwig::Parse($pidl));
- }
}
if ($opt_diff) {
More information about the samba-cvs
mailing list