[Firebird-checkins] CVS: firebird2/src/dsql parse.y,1.161,1.162

[Nickolay S. <sk...@us...>]

Build Version :  T2.0.0.9576 Firebird 2.0 UNSTABLE

(writeBuildNum.sh,v 1.9580 2004/11/25 00:45:24 skidder Exp  )

Update of /cvsroot/firebird/firebird2/src/dsql
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv6351

Modified Files:
	parse.y 
Log Message:
Dmitry asked me to add support for calling UDF routines ignoring return arguments so did I

Index: parse.y
===================================================================
RCS file: /cvsroot/firebird/firebird2/src/dsql/parse.y,v
retrieving revision 1.161
retrieving revision 1.162
diff -b -U3 -r1.161 -r1.162
--- parse.y	24 Nov 2004 09:07:39 -0000	1.161
+++ parse.y	25 Nov 2004 00:45:03 -0000	1.162
@@ -1619,6 +1619,7 @@
 			{ $$ = make_node (nod_exit, 0, NULL); }
 		| breakleave
 		| cursor_statement ';'
+		| exec_udf ';'
 		;
 
 excp_statement	: EXCEPTION symbol_exception_name ';'
@@ -3315,6 +3316,10 @@
 			{ $$ = make_node (nod_assign, 2, $3, $1); }
 		;
 
+exec_udf	: udf
+			{ $$ = make_node (nod_assign, 2, $1, make_node (nod_null, 0, NULL)); }
+		;
+
 
 /* BLOB get and put */