Commit7157114

committed

Remove long-unused and broken TCL_ARRAYS.

1 parentc67f6f2 commit7157114Copy full SHA for 7157114

File tree

-18

lines changed

-18

lines changed

Lines changed: 1 addition & 7 deletions

Original file line number	Diff line number	Diff line change
`@@ -8,7 +8,7 @@`
`8`	`8`	`*`
`9`	`9`	`*`
`10`	`10`	`* IDENTIFICATION`
`11`		`- * $PostgreSQL: pgsql/src/backend/utils/adt/arrayfuncs.c,v 1.140 2008/01/01 19:45:52 momjian Exp $`
	`11`	`+ * $PostgreSQL: pgsql/src/backend/utils/adt/arrayfuncs.c,v 1.141 2008/02/29 20:58:33 alvherre Exp $`
`12`	`12`	`*`
`13`	`13`	`*-------------------------------------------------------------------------`
`14`	`14`	`*/`
`@@ -1030,9 +1030,7 @@ array_out(PG_FUNCTION_ARGS)`
`1030`	`1030`	`if (ch=='"'\|\|ch=='\\')`
`1031`	`1031`	`{`
`1032`	`1032`	`needquote= true;`
`1033`		`-#ifndefTCL_ARRAYS`
`1034`	`1033`	`overall_length+=1;`
`1035`		`-#endif`
`1036`	`1034`	`}`
`1037`	`1035`	`elseif (ch=='{'\|\|ch=='}'\|\|ch==typdelim\|\|`
`1038`	`1036`	`isspace((unsignedchar)ch))`
`@@ -1103,7 +1101,6 @@ array_out(PG_FUNCTION_ARGS)`
`1103`	`1101`	`if (needquotes[k])`
`1104`	`1102`	`{`
`1105`	`1103`	`APPENDCHAR('"');`
`1106`		`-#ifndefTCL_ARRAYS`
`1107`	`1104`	`for (tmp=values[k];*tmp;tmp++)`
`1108`	`1105`	`{`
`1109`	`1106`	`charch=*tmp;`
`@@ -1113,9 +1110,6 @@ array_out(PG_FUNCTION_ARGS)`
`1113`	`1110`	`*p++=ch;`
`1114`	`1111`	`}`
`1115`	`1112`	`*p='\0';`
`1116`		`-#else`
`1117`		`-APPENDSTR(values[k]);`
`1118`		`-#endif`
`1119`	`1113`	`APPENDCHAR('"');`
`1120`	`1114`	`}`
`1121`	`1115`	`else`

Lines changed: 1 addition & 11 deletions

Original file line number	Diff line number	Diff line change
`@@ -6,7 +6,7 @@`
`6`	`6`	`* for developers.If you edit any of these, be sure to do a full`
`7`	`7`	`* rebuild (and an initdb if noted).`
`8`	`8`	`*`
`9`		`- * $PostgreSQL: pgsql/src/include/pg_config_manual.h,v 1.27 2007/06/08 18:23:53 tgl Exp $`
	`9`	`+ * $PostgreSQL: pgsql/src/include/pg_config_manual.h,v 1.28 2008/02/29 20:58:33 alvherre Exp $`
`10`	`10`	`*------------------------------------------------------------------------`
`11`	`11`	`*/`
`12`	`12`
`@@ -99,16 +99,6 @@`
`99`	`99`	`*/`
`100`	`100`	`#defineNUM_USER_DEFINED_LWLOCKS4`
`101`	`101`
`102`		`-/*`
`103`		`- * Define this to make libpgtcl's "pg_result -assign" command process`
`104`		`- * C-style backslash sequences in returned tuple data and convert`
`105`		`- * PostgreSQL array values into Tcl lists.CAUTION: This conversion`
`106`		`- * is wrong unless you install the routines in`
`107`		`- * contrib/string/string_io to make the server produce C-style`
`108`		`- * backslash sequences in the first place.`
`109`		`- */`
`110`		`-/* #define TCL_ARRAYS */`
`111`		`-`
`112`	`102`	`/*`
`113`	`103`	`* Define this if you want psql to _always_ ask for a username and a`
`114`	`104`	`* password for password authentication.`

Comments

(0)