firebird/firebird-mirror
firebird/firebird-mirror
8
0
Fork 1
mirror of https://github.com/FirebirdSQL/firebird.git synced 2025-01-23 14:03:07 +01:00
Code Issues

Corrections.

Browse Source
This commit is contained in:
dimitr 2009-12-24 12:02:29 +00:00
parent 85aec02b83
commit e3a3594f12
1 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
src/dsql/DdlNodes.epp
View File

@ -1262,7 +1262,7 @@ void CreateAlterFunctionNode::compile(thread_db* tdbb, jrd_tra* /*transaction*/)
statement->append_uchar(blr_message);
statement->append_uchar(1);
statement->append_ushort(2);
statement->append_ushort(3);
statement->put_debug_argument(fb_dbg_arg_output, 0, "");
putType(returnType, true);
@ -1275,6 +1275,10 @@ void CreateAlterFunctionNode::compile(thread_db* tdbb, jrd_tra* /*transaction*/)
variables.add(var);
outputVariables.add(var);
// add slot for EOS
statement->append_uchar(blr_short);
statement->append_uchar(0);
if (parameters.getCount() != 0)
{
statement->append_uchar(blr_receive);
@ -1321,7 +1325,7 @@ void CreateAlterFunctionNode::compile(thread_db* tdbb, jrd_tra* /*transaction*/)
statement->setType(DsqlCompiledStatement::TYPE_DDL);
statement->append_uchar(blr_end);
GEN_return(dsqlScratch, outputVariables, false);
GEN_return(dsqlScratch, outputVariables, true);
statement->append_uchar(blr_end);
statement->append_uchar(blr_eoc);