diff options
Diffstat (limited to 'src/backend/nodes/readfuncs.c')
| -rw-r--r-- | src/backend/nodes/readfuncs.c | 12 |
1 files changed, 8 insertions, 4 deletions
diff --git a/src/backend/nodes/readfuncs.c b/src/backend/nodes/readfuncs.c index d0bcf13875f..4406d9e89d8 100644 --- a/src/backend/nodes/readfuncs.c +++ b/src/backend/nodes/readfuncs.c @@ -7,7 +7,7 @@ * * * IDENTIFICATION - * $Header: /cvsroot/pgsql/src/backend/nodes/readfuncs.c,v 1.22 1998/01/20 22:11:15 momjian Exp $ + * $Header: /cvsroot/pgsql/src/backend/nodes/readfuncs.c,v 1.23 1998/02/10 04:01:03 momjian Exp $ * * NOTES * Most of the read functions for plan nodes are tested. (In fact, they @@ -706,9 +706,9 @@ _readResdom() token = lsptok(NULL, &length); /* get restype */ local_node->restype = atol(token); - token = lsptok(NULL, &length); /* eat :reslen */ - token = lsptok(NULL, &length); /* get reslen */ - local_node->reslen = atoi(token); + token = lsptok(NULL, &length); /* eat :restypmod */ + token = lsptok(NULL, &length); /* get restypmod */ + local_node->restypmod = atoi(token); token = lsptok(NULL, &length); /* eat :resname */ token = lsptok(NULL, &length); /* get the name */ @@ -814,6 +814,10 @@ _readVar() token = lsptok(NULL, &length); /* get vartype */ local_node->vartype = (Oid) atol(token); + token = lsptok(NULL, &length); /* eat :vartypmod */ + token = lsptok(NULL, &length); /* get vartypmod */ + local_node->vartypmod = (Oid) atol(token); + token = lsptok(NULL, &length); /* eat :varlevelsup */ token = lsptok(NULL, &length); /* get varlevelsup */ local_node->varlevelsup = (Oid) atol(token); |