diff options
| author | Bruce Momjian <bruce@momjian.us> | 1997-10-30 05:00:56 +0000 |
|---|---|---|
| committer | Bruce Momjian <bruce@momjian.us> | 1997-10-30 05:00:56 +0000 |
| commit | 5680f8795f9eb615479948d8172534e82fe438a4 (patch) | |
| tree | 49a5a608d3ddae13c1bcdd49b144030d609397fa /src | |
| parent | 1dfde614a40fb28859cb537d838dff357433544c (diff) | |
| download | postgresql-5680f8795f9eb615479948d8172534e82fe438a4.tar.gz postgresql-5680f8795f9eb615479948d8172534e82fe438a4.zip | |
Fix for array handling, from Gerhard Hintermayer
Diffstat (limited to 'src')
| -rw-r--r-- | src/interfaces/libpgtcl/pgtclCmds.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interfaces/libpgtcl/pgtclCmds.c b/src/interfaces/libpgtcl/pgtclCmds.c index f747869ebd3..f52c20d1f18 100644 --- a/src/interfaces/libpgtcl/pgtclCmds.c +++ b/src/interfaces/libpgtcl/pgtclCmds.c @@ -7,7 +7,7 @@ * * * IDENTIFICATION - * $Header: /cvsroot/pgsql/src/interfaces/libpgtcl/Attic/pgtclCmds.c,v 1.16 1997/09/25 15:48:51 momjian Exp $ + * $Header: /cvsroot/pgsql/src/interfaces/libpgtcl/Attic/pgtclCmds.c,v 1.17 1997/10/30 05:00:56 momjian Exp $ * *------------------------------------------------------------------------- */ @@ -645,7 +645,7 @@ Pg_result(ClientData cData, Tcl_Interp * interp, int argc, char *argv[]) #ifdef TCL_ARRAYS for (i = 0; i < PQnfields(result); i++) { - Tcl_AppendElement(interp, tcl_value(PQgetvalue(result, tupno, i))); + Tcl_AppendElement(interp, PQgetvalue(result,tupno,i)); } #else /* Tcl_AppendResult(interp, PQgetvalue(result,tupno,0),NULL); */ |