Index: src/bin/psql/describe.c
===================================================================
RCS file: /projects/cvsroot/pgsql/src/bin/psql/describe.c,v
retrieving revision 1.140
diff -c -r1.140 describe.c
*** src/bin/psql/describe.c	14 Jun 2006 16:49:02 -0000	1.140
--- src/bin/psql/describe.c	16 Jul 2006 06:10:10 -0000
***************
*** 170,177 ****
  					  "SELECT n.nspname as \"%s\",\n"
  					  "  p.proname as \"%s\",\n"
  					  "  CASE WHEN p.proretset THEN 'setof ' ELSE '' END ||\n"
! 				  "  pg_catalog.format_type(p.prorettype, NULL) as \"%s\",\n"
! 					  "  pg_catalog.oidvectortypes(p.proargtypes) as \"%s\"",
  					  _("Schema"), _("Name"), _("Result data type"),
  					  _("Argument data types"));
  
--- 170,198 ----
  					  "SELECT n.nspname as \"%s\",\n"
  					  "  p.proname as \"%s\",\n"
  					  "  CASE WHEN p.proretset THEN 'setof ' ELSE '' END ||\n"
! 					  "  pg_catalog.format_type(p.prorettype, NULL) as \"%s\",\n"
! 					  "  CASE WHEN proallargtypes IS NOT NULL THEN\n"
! 					  "    array_to_string(ARRAY(\n"
! 					  "      SELECT\n"
! 					  "        CASE\n"
! 					  "          WHEN p.proargmodes[s.i] = 'i' THEN ''\n"
! 					  "          WHEN p.proargmodes[s.i] = 'o' THEN ' OUT '\n"
! 					  "          WHEN p.proargmodes[s.i] = 'b' THEN ' INOUT '\n"
! 					  "        END ||\n"
! 					  "        COALESCE(p.proargnames[s.i] || ' ','') ||\n"
! 					  "        format_type(p.proallargtypes[s.i],-1)\n"
! 					  "      FROM\n"
! 					  "        generate_series(1,array_upper(p.proallargtypes,1)) AS s(i)\n"
! 					  "    ), ',')\n"
! 					  "  ELSE\n"
! 					  "    array_to_string(ARRAY(\n"
! 					  "      SELECT\n"
! 					  "        COALESCE(p.proargnames[s.i+1] || ' ', '') ||\n"
! 					  "        format_type(p.proargtypes[s.i],-1)\n"
! 					  "      FROM\n"
! 					  "        generate_series(0,array_upper(p.proargtypes,1)) AS s(i)\n"
! 					  "    ), ',')\n"
! 					  "  END AS  \"%s\"",
  					  _("Schema"), _("Name"), _("Result data type"),
  					  _("Argument data types"));