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

[jelmer at samba.org]

Author: jelmer
Date: 2006-04-24 18:18:20 +0000 (Mon, 24 Apr 2006)
New Revision: 15220

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

Log:
Another attempt to fix the bug found by the IBM Checker

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


Changeset:
Modified: branches/SAMBA_4_0/source/pidl/lib/Parse/Pidl/Samba4/EJS.pm
===================================================================
--- branches/SAMBA_4_0/source/pidl/lib/Parse/Pidl/Samba4/EJS.pm	2006-04-24 18:00:46 UTC (rev 15219)
+++ branches/SAMBA_4_0/source/pidl/lib/Parse/Pidl/Samba4/EJS.pm	2006-04-24 18:18:20 UTC (rev 15220)
@@ -154,7 +154,11 @@
 	my ($e, $l, $var, $name, $env) = @_;
 	pidl "if (ejs_pull_null(ejs, v, $name)) {";
 	indent;
-	pidl "$var = NULL;";
+	if ($l->{POINTER_TYPE} eq "ref") {
+		pidl "return NT_STATUS_INVALID_PARAMETER_MIX;";
+	} else {
+		pidl "$var = NULL;";
+	}
 	deindent;
 	pidl "} else {";
 	indent;