svn commit: samba r12572 - in branches/SAMBA_4_0/source/pidl/lib/Parse/Pidl: .

[jelmer at samba.org]

Author: jelmer
Date: 2005-12-29 16:03:03 +0000 (Thu, 29 Dec 2005)
New Revision: 12572

WebSVN: http://websvn.samba.org/cgi-bin/viewcvs.cgi?view=rev&root=samba&rev=12572

Log:
No longer parse coclasses as interfaces

Modified:
   branches/SAMBA_4_0/source/pidl/lib/Parse/Pidl/NDR.pm


Changeset:
Modified: branches/SAMBA_4_0/source/pidl/lib/Parse/Pidl/NDR.pm
===================================================================
--- branches/SAMBA_4_0/source/pidl/lib/Parse/Pidl/NDR.pm	2005-12-29 15:11:04 UTC (rev 12571)
+++ branches/SAMBA_4_0/source/pidl/lib/Parse/Pidl/NDR.pm	2005-12-29 16:03:03 UTC (rev 12572)
@@ -642,7 +642,9 @@
 	
 	my @ndr = ();
 
-	push(@ndr, ParseInterface($_)) foreach (@{$idl});
+	foreach (@{$idl}) {
+		($_->{TYPE} eq "INTERFACE") && push(@ndr, ParseInterface($_));
+	}
 
 	return \@ndr;
 }