22 * pltcl.c- PostgreSQL support for Tcl as
33 * procedural language (PL)
44 *
5- * $PostgreSQL: pgsql/src/pl/tcl/pltcl.c,v 1.125 2009/01/07 13:44:37 tgl Exp $
5+ * $PostgreSQL: pgsql/src/pl/tcl/pltcl.c,v 1.126 2009/01/14 20:01:52 petere Exp $
66 *
77 **********************************************************************/
88
@@ -1198,7 +1198,7 @@ compile_pltcl_function(Oid fn_oid, Oid tgreloid)
11981198free (prodesc );
11991199ereport (ERROR ,
12001200(errcode (ERRCODE_FEATURE_NOT_SUPPORTED ),
1201- errmsg ("pltcl functions cannot return type %s" ,
1201+ errmsg ("PL/Tcl functions cannot return type %s" ,
12021202format_type_be (procStruct -> prorettype ))));
12031203}
12041204}
@@ -1210,7 +1210,7 @@ compile_pltcl_function(Oid fn_oid, Oid tgreloid)
12101210free (prodesc );
12111211ereport (ERROR ,
12121212(errcode (ERRCODE_FEATURE_NOT_SUPPORTED ),
1213- errmsg ("pltcl functions cannot returntuples yet " )));
1213+ errmsg ("PL/Tcl functions cannot returncomposite types " )));
12141214}
12151215
12161216perm_fmgr_info (typeStruct -> typinput ,& (prodesc -> result_in_func ));
@@ -1250,7 +1250,7 @@ compile_pltcl_function(Oid fn_oid, Oid tgreloid)
12501250free (prodesc );
12511251ereport (ERROR ,
12521252(errcode (ERRCODE_FEATURE_NOT_SUPPORTED ),
1253- errmsg ("pltcl functions cannottake type %s" ,
1253+ errmsg ("PL/Tcl functions cannotaccept type %s" ,
12541254format_type_be (procStruct -> proargtypes .values [i ]))));
12551255}
12561256