pgindent run.

[postgresql] / src / backend / nodes / nodeFuncs.c

diff --git a/src/backend/nodes/nodeFuncs.c b/src/backend/nodes/nodeFuncs.c
index e1e6bc6f140c096d035dc9f42020800cd1bffd03..84dd85ad5f88e0e520aee464b08dad75aae3a183 100644 (file)
--- a/src/backend/nodes/nodeFuncs.c
+++ b/src/backend/nodes/nodeFuncs.c
@@ -1,121 +1,74 @@
 /*-------------------------------------------------------------------------
  *
- * nodeFuncs.c--
- *    All node routines more complicated than simple access/modification
+ * nodeFuncs.c
+ *       All node routines more complicated than simple access/modification
  *
- * Copyright (c) 1994, Regents of the University of California
+ * Portions Copyright (c) 1996-2002, PostgreSQL Global Development Group
+ * Portions Copyright (c) 1994, Regents of the University of California
  *
  *
  * IDENTIFICATION
- *    $Header: /cvsroot/pgsql/src/backend/nodes/nodeFuncs.c,v 1.3 1997/08/19 21:31:41 momjian Exp $
+ *       $Header: /cvsroot/pgsql/src/backend/nodes/nodeFuncs.c,v 1.22 2003/06/29 00:33:43 tgl Exp $
  *
  *-------------------------------------------------------------------------
  */
-
-#include <sys/types.h> 
-
 #include "postgres.h"
 
-#include "nodes/primnodes.h"
-#include "nodes/plannodes.h"
-#include "nodes/pg_list.h"
-#include "nodes/relation.h"
 #include "nodes/nodeFuncs.h"
-#include "utils/lsyscache.h"
+
 
 static bool var_is_inner(Var *var);
 
-/*    
+
+/*
  * single_node -
- *    Returns t if node corresponds to a single-noded expression
+ *       Returns t if node corresponds to a single-noded expression
  */
 bool
 single_node(Node *node)
 {
-    if(IsA(node,Ident) || IsA(node,Const) || IsA(node,Var) || IsA(node,Param)) 
-       return(true);
-    else
-       return(false);
+       if (IsA(node, Const) ||
+               IsA(node, Var) ||
+               IsA(node, Param))
+               return true;
+       else
+               return false;
 }
 
 /*****************************************************************************
- *     VAR nodes
+ *             VAR nodes
  *****************************************************************************/
 
-/*    
- *     var_is_outer
- *     var_is_inner
- *     var_is_mat
- *     var_is_rel
- *    
- *     Returns t iff the var node corresponds to (respectively):
- *     the outer relation in a join
- *     the inner relation of a join
- *     a materialized relation
- *     a base relation (i.e., not an attribute reference, a variable from
- *             some lower join level, or a sort result)
- *      var node is an array reference
- *    
+/*
+ *             var_is_outer
+ *             var_is_inner
+ *             var_is_mat
+ *             var_is_rel
+ *
+ *             Returns t iff the var node corresponds to (respectively):
+ *             the outer relation in a join
+ *             the inner relation of a join
+ *             a materialized relation
+ *             a base relation (i.e., not an attribute reference, a variable from
+ *                             some lower join level, or a sort result)
+ *             var node is an array reference
+ *
  */
 bool
-var_is_outer (Var *var)
+var_is_outer(Var *var)
 {
-    return((bool)(var->varno == OUTER));
+       return (bool) (var->varno == OUTER);
 }
 
 static bool
-var_is_inner (Var *var)
-{
-    return ( (bool) (var->varno == INNER));
-}
-
-bool
-var_is_rel (Var *var)
-{
-    return (bool)
-       ! (var_is_inner (var) ||  var_is_outer (var));
-}
-
-/*****************************************************************************
- *     OPER nodes
- *****************************************************************************/
-
-/*    
- * replace_opid -
- *    
- *     Given a oper node, resets the opfid field with the
- *     procedure OID (regproc id).
- *    
- *     Returns the modified oper node.
- *    
- */
-Oper *
-replace_opid (Oper *oper)
+var_is_inner(Var *var)
 {
-    oper->opid = get_opcode(oper->opno);
-    oper->op_fcache = NULL;
-    return(oper);
+       return (bool) (var->varno == INNER);
 }
 
-/*****************************************************************************
- *     constant (CONST, PARAM) nodes
- *****************************************************************************/
-
-/*    
- * 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)
+var_is_rel(Var *var)
 {
-    
-    if ( IsA(c,Const) && ! ((Const*)c)->constisnull )
-       return(true);
-    else
-       return(false);
+       return (bool)
+               !(var_is_inner(var) || var_is_outer(var));
 }
-
-
-