Commit 4d0fc1d5 authored by Tom Lane's avatar Tom Lane

Don't use "#" as an abbreviation for "number" in PL/Tcl error messages.

Also, rewrite one error message to make it follow our message style
guidelines better.

Euler Taveira and Tom Lane
parent ad584a08
...@@ -1055,7 +1055,7 @@ pltcl_trigger_handler(PG_FUNCTION_ARGS, bool pltrusted) ...@@ -1055,7 +1055,7 @@ pltcl_trigger_handler(PG_FUNCTION_ARGS, bool pltrusted)
if (ret_numvals % 2 != 0) if (ret_numvals % 2 != 0)
ereport(ERROR, ereport(ERROR,
(errcode(ERRCODE_E_R_I_E_TRIGGER_PROTOCOL_VIOLATED), (errcode(ERRCODE_E_R_I_E_TRIGGER_PROTOCOL_VIOLATED),
errmsg("invalid return list from trigger - must have even # of elements"))); errmsg("trigger's return list must have even number of elements")));
modattrs = (int *) palloc(tupdesc->natts * sizeof(int)); modattrs = (int *) palloc(tupdesc->natts * sizeof(int));
modvalues = (Datum *) palloc(tupdesc->natts * sizeof(Datum)); modvalues = (Datum *) palloc(tupdesc->natts * sizeof(Datum));
...@@ -2345,7 +2345,7 @@ pltcl_SPI_execute_plan(ClientData cdata, Tcl_Interp *interp, ...@@ -2345,7 +2345,7 @@ pltcl_SPI_execute_plan(ClientData cdata, Tcl_Interp *interp,
if (strlen(nulls) != qdesc->nargs) if (strlen(nulls) != qdesc->nargs)
{ {
Tcl_SetResult(interp, Tcl_SetResult(interp,
"length of nulls string doesn't match # of arguments", "length of nulls string doesn't match number of arguments",
TCL_STATIC); TCL_STATIC);
return TCL_ERROR; return TCL_ERROR;
} }
...@@ -2370,12 +2370,12 @@ pltcl_SPI_execute_plan(ClientData cdata, Tcl_Interp *interp, ...@@ -2370,12 +2370,12 @@ pltcl_SPI_execute_plan(ClientData cdata, Tcl_Interp *interp,
return TCL_ERROR; return TCL_ERROR;
/************************************************************ /************************************************************
* Check that the # of arguments matches * Check that the number of arguments matches
************************************************************/ ************************************************************/
if (callnargs != qdesc->nargs) if (callnargs != qdesc->nargs)
{ {
Tcl_SetResult(interp, Tcl_SetResult(interp,
"argument list length doesn't match # of arguments for query", "argument list length doesn't match number of arguments for query",
TCL_STATIC); TCL_STATIC);
ckfree((char *) callargs); ckfree((char *) callargs);
return TCL_ERROR; return TCL_ERROR;
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment