diff options
Diffstat (limited to 'src/backend/nodes/nodeFuncs.c')
| -rw-r--r-- | src/backend/nodes/nodeFuncs.c | 47 |
1 files changed, 10 insertions, 37 deletions
diff --git a/src/backend/nodes/nodeFuncs.c b/src/backend/nodes/nodeFuncs.c index f2bfb0a7d2d..299c910cc3b 100644 --- a/src/backend/nodes/nodeFuncs.c +++ b/src/backend/nodes/nodeFuncs.c @@ -8,12 +8,10 @@ * * * IDENTIFICATION - * $Header: /cvsroot/pgsql/src/backend/nodes/nodeFuncs.c,v 1.19 2002/09/02 02:47:02 momjian Exp $ + * $Header: /cvsroot/pgsql/src/backend/nodes/nodeFuncs.c,v 1.20 2002/12/12 15:49:28 tgl Exp $ * *------------------------------------------------------------------------- */ - - #include "postgres.h" #include "nodes/nodeFuncs.h" @@ -21,6 +19,7 @@ static bool var_is_inner(Var *var); + /* * single_node - * Returns t if node corresponds to a single-noded expression @@ -79,41 +78,15 @@ var_is_rel(Var *var) *****************************************************************************/ /* - * replace_opid - - * - * Given a oper node, resets the opfid field with the - * procedure OID (regproc id). - * - * Returns the modified oper node. + * set_opfuncid - * + * Set the opfuncid (procedure OID) in an OpExpr node, + * if it hasn't been set already. */ -Oper * -replace_opid(Oper *oper) +void +set_opfuncid(OpExpr *opexpr) { - oper->opid = get_opcode(oper->opno); - oper->op_fcache = NULL; - return oper; + if (opexpr->opfuncid == InvalidOid) + opexpr->opfuncid = get_opcode(opexpr->opno); + opexpr->op_fcache = NULL; /* XXX will go away soon */ } - -/***************************************************************************** - * constant (CONST, PARAM) nodes - *****************************************************************************/ - -#ifdef NOT_USED -/* - * non_null - - * Returns t if the node is a non-null constant, e.g., if the node has a - * valid `constvalue' field. - */ -bool -non_null(Expr *c) -{ - - if (IsA(c, Const) && - !((Const *) c)->constisnull) - return true; - else - return false; -} - -#endif |