3
3
* procedural language
4
4
*
5
5
* IDENTIFICATION
6
- * $Header: /cvsroot/pgsql/src/pl/plpgsql/src/pl_comp.c,v 1.3 1998/09/01 04:40:20 momjian Exp $
6
+ * $Header: /cvsroot/pgsql/src/pl/plpgsql/src/pl_comp.c,v 1.4 1998/11/27 20:07:22 vadim Exp $
7
7
*
8
8
* This software is copyrighted by Jan Wieck - Hamburg.
9
9
*
@@ -620,7 +620,7 @@ plpgsql_parse_word(char *word)
620
620
typ = (PLpgSQL_type * ) malloc (sizeof (PLpgSQL_type ));
621
621
622
622
typ -> typname = strdup (nameout (& (typeStruct -> typname )));
623
- typ -> typoid = typeTup -> t_oid ;
623
+ typ -> typoid = typeTup -> t_data -> t_oid ;
624
624
fmgr_info (typeStruct -> typinput , & (typ -> typinput ));
625
625
typ -> typbyval = typeStruct -> typbyval ;
626
626
typ -> atttypmod = -1 ;
@@ -943,7 +943,7 @@ plpgsql_parse_wordtype(char *word)
943
943
typ = (PLpgSQL_type * ) malloc (sizeof (PLpgSQL_type ));
944
944
945
945
typ -> typname = strdup (nameout (& (typeStruct -> typname )));
946
- typ -> typoid = typeTup -> t_oid ;
946
+ typ -> typoid = typeTup -> t_data -> t_oid ;
947
947
fmgr_info (typeStruct -> typinput , & (typ -> typinput ));
948
948
typ -> typbyval = typeStruct -> typbyval ;
949
949
typ -> atttypmod = -1 ;
@@ -1060,7 +1060,7 @@ plpgsql_parse_dblwordtype(char *string)
1060
1060
* ----------
1061
1061
*/
1062
1062
attrtup = SearchSysCacheTuple (ATTNAME ,
1063
- ObjectIdGetDatum (classtup -> t_oid ),
1063
+ ObjectIdGetDatum (classtup -> t_data -> t_oid ),
1064
1064
PointerGetDatum (word2 ), 0 , 0 );
1065
1065
if (!HeapTupleIsValid (attrtup ))
1066
1066
{
@@ -1087,7 +1087,7 @@ plpgsql_parse_dblwordtype(char *string)
1087
1087
typ = (PLpgSQL_type * ) malloc (sizeof (PLpgSQL_type ));
1088
1088
1089
1089
typ -> typname = strdup (nameout (& (typeStruct -> typname )));
1090
- typ -> typoid = typetup -> t_oid ;
1090
+ typ -> typoid = typetup -> t_data -> t_oid ;
1091
1091
fmgr_info (typeStruct -> typinput , & (typ -> typinput ));
1092
1092
typ -> typbyval = typeStruct -> typbyval ;
1093
1093
typ -> atttypmod = attrStruct -> atttypmod ;
@@ -1163,7 +1163,7 @@ plpgsql_parse_wordrowtype(char *string)
1163
1163
1164
1164
row -> dtype = PLPGSQL_DTYPE_ROW ;
1165
1165
row -> nfields = classStruct -> relnatts ;
1166
- row -> rowtypeclass = typetup -> t_oid ;
1166
+ row -> rowtypeclass = typetup -> t_data -> t_oid ;
1167
1167
row -> fieldnames = malloc (sizeof (char * ) * row -> nfields );
1168
1168
row -> varnos = malloc (sizeof (int ) * row -> nfields );
1169
1169
@@ -1174,7 +1174,7 @@ plpgsql_parse_wordrowtype(char *string)
1174
1174
* ----------
1175
1175
*/
1176
1176
attrtup = SearchSysCacheTuple (ATTNUM ,
1177
- ObjectIdGetDatum (classtup -> t_oid ),
1177
+ ObjectIdGetDatum (classtup -> t_data -> t_oid ),
1178
1178
(Datum ) (i + 1 ), 0 , 0 );
1179
1179
if (!HeapTupleIsValid (attrtup ))
1180
1180
{
@@ -1215,7 +1215,7 @@ plpgsql_parse_wordrowtype(char *string)
1215
1215
strcat (var -> refname , cp );
1216
1216
var -> datatype = malloc (sizeof (PLpgSQL_type ));
1217
1217
var -> datatype -> typname = strdup (nameout (& (typeStruct -> typname )));
1218
- var -> datatype -> typoid = typetup -> t_oid ;
1218
+ var -> datatype -> typoid = typetup -> t_data -> t_oid ;
1219
1219
fmgr_info (typeStruct -> typinput , & (var -> datatype -> typinput ));
1220
1220
var -> datatype -> typbyval = typeStruct -> typbyval ;
1221
1221
var -> datatype -> atttypmod = attrStruct -> atttypmod ;
0 commit comments