diff options
author | Vadim B. Mikheev <vadim4o@yahoo.com> | 1998-11-27 20:09:56 +0000 |
---|---|---|
committer | Vadim B. Mikheev <vadim4o@yahoo.com> | 1998-11-27 20:09:56 +0000 |
commit | 971175fa0c63befed59b4809ce8bf0a40a8a00cc (patch) | |
tree | b0791e8d21c7bf632f77cfa400a7a6eec096760d /src/pl/tcl/pltcl.c | |
parent | 6beba218d7f6f764e946751df6dc0d0180da05fa (diff) |
New HeapTuple structure/interface.
Diffstat (limited to 'src/pl/tcl/pltcl.c')
-rw-r--r-- | src/pl/tcl/pltcl.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/pl/tcl/pltcl.c b/src/pl/tcl/pltcl.c index 3ce921b0378..c97e17558a5 100644 --- a/src/pl/tcl/pltcl.c +++ b/src/pl/tcl/pltcl.c @@ -3,7 +3,7 @@ * procedural language (PL) * * IDENTIFICATION - * $Header: /cvsroot/pgsql/src/pl/tcl/pltcl.c,v 1.7 1998/10/09 16:57:10 momjian Exp $ + * $Header: /cvsroot/pgsql/src/pl/tcl/pltcl.c,v 1.8 1998/11/27 20:05:27 vadim Exp $ * * This software is copyrighted by Jan Wieck - Hamburg. * @@ -1613,7 +1613,7 @@ pltcl_SPI_prepare(ClientData cdata, Tcl_Interp * interp, 0, 0, 0); if (!HeapTupleIsValid(typeTup)) elog(ERROR, "pltcl: Cache lookup of type %s failed", args[i]); - qdesc->argtypes[i] = typeTup->t_oid; + qdesc->argtypes[i] = typeTup->t_data->t_oid; fmgr_info(((Form_pg_type) GETSTRUCT(typeTup))->typinput, &(qdesc->arginfuncs[i])); qdesc->argtypelems[i] = ((Form_pg_type) GETSTRUCT(typeTup))->typelem; |