r5697: Give an error message when a ref pointer is NULL (requested by tpot)
authorJelmer Vernooij <jelmer@samba.org>
Tue, 8 Mar 2005 22:24:47 +0000 (22:24 +0000)
committerGerald (Jerry) Carter <jerry@samba.org>
Wed, 10 Oct 2007 18:11:00 +0000 (13:11 -0500)
(This used to be commit 7ecc2e6130d7f284906cbc50dda86c742f139fae)

source4/build/pidl/ndr.pm

index ac65f16d95e3857d6ca30e4345a8dcd14793e4fe..fce7f26f9398e09da117a42e495118fb309dc751 100644 (file)
@@ -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");
                }               
        }