svn commit: samba r5697 - in branches/SAMBA_4_0/source/build/pidl: .

jelmer at samba.org jelmer at samba.org
Tue Mar 8 22:24:47 GMT 2005


Author: jelmer
Date: 2005-03-08 22:24:47 +0000 (Tue, 08 Mar 2005)
New Revision: 5697

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

Log:
Give an error message when a ref pointer is NULL (requested by tpot)

Modified:
   branches/SAMBA_4_0/source/build/pidl/ndr.pm


Changeset:
Modified: branches/SAMBA_4_0/source/build/pidl/ndr.pm
===================================================================
--- branches/SAMBA_4_0/source/build/pidl/ndr.pm	2005-03-08 21:04:36 UTC (rev 5696)
+++ branches/SAMBA_4_0/source/build/pidl/ndr.pm	2005-03-08 22:24:47 UTC (rev 5697)
@@ -1793,6 +1793,9 @@
 
 	foreach my $e (@{$fn->{ELEMENTS}}) {
 		if (util::has_property($e, "in")) {
+			if (util::has_property($e, "ref")) {
+				check_null_pointer("*r->in.$e->{NAME}");
+			} 
 			ParseFunctionElementPush($e, "in");
 		}		
 	}
@@ -1803,6 +1806,9 @@
 
 	foreach my $e (@{$fn->{ELEMENTS}}) {
 		if (util::has_property($e, "out")) {
+			if (util::has_property($e, "ref")) {
+				check_null_pointer("*r->out.$e->{NAME}");
+			} 
 			ParseFunctionElementPush($e, "out");
 		}		
 	}



More information about the samba-cvs mailing list