* procedural language
*
* IDENTIFICATION
- * $PostgreSQL: pgsql/src/pl/plpgsql/src/pl_comp.c,v 1.82 2004/09/13 20:09:20 tgl Exp $
+ * $PostgreSQL: pgsql/src/pl/plpgsql/src/pl_comp.c,v 1.83 2004/11/30 03:50:29 neilc Exp $
*
* This software is copyrighted by Jan Wieck - Hamburg.
*
function->fn_retset = procStruct->proretset;
/*
- * Lookup the functions return type
+ * Lookup the function's return type
*/
typeTup = SearchSysCache(TYPEOID,
ObjectIdGetDatum(rettypeid),
plpgsql_add_initdatums(NULL);
/*
- * Now parse the functions text
+ * Now parse the function's text
*/
parse_rc = plpgsql_yyparse();
if (parse_rc != 0)
pfree(proc_source);
/*
- * If that was successful, complete the functions info.
+ * If that was successful, complete the function's info.
*/
function->fn_nargs = procStruct->pronargs;
for (i = 0; i < function->fn_nargs; i++)
* procedural language
*
* IDENTIFICATION
- * $PostgreSQL: pgsql/src/pl/plpgsql/src/pl_exec.c,v 1.122 2004/11/21 22:27:34 tgl Exp $
+ * $PostgreSQL: pgsql/src/pl/plpgsql/src/pl_exec.c,v 1.123 2004/11/30 03:50:29 neilc Exp $
*
* This software is copyrighted by Jan Wieck - Hamburg.
*
&fcinfo->isnull);
/*
- * If the functions return type isn't by value, copy the value
+ * If the function's return type isn't by value, copy the value
* into upper executor memory context.
*/
if (!fcinfo->isnull && !func->fn_retbyval)
error_context_stack = plerrcontext.previous;
/*
- * Return the functions result
+ * Return the function's result
*/
return estate.retval;
}