From 1bbaa12437f3703728a4755c49a14ecdabbbd7da Mon Sep 17 00:00:00 2001
From: Jelmer Vernooij <jelmer@samba.org>
Date: Tue, 8 Mar 2005 22:24:47 +0000
Subject: r5697: Give an error message when a ref pointer is NULL (requested by
 tpot) (This used to be commit 7ecc2e6130d7f284906cbc50dda86c742f139fae)

---
 source4/build/pidl/ndr.pm | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/source4/build/pidl/ndr.pm b/source4/build/pidl/ndr.pm
index ac65f16d95..fce7f26f93 100644
--- a/source4/build/pidl/ndr.pm
+++ b/source4/build/pidl/ndr.pm
@@ -1793,6 +1793,9 @@ sub ParseFunctionPush($)
 
 	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 @@ sub ParseFunctionPush($)
 
 	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");
 		}		
 	}
-- 
cgit