Add some more node print routines for debugging only

 (inside of #ifdef PARSEDEBUG blocks).

diff --git a/src/backend/nodes/outfuncs.c b/src/backend/nodes/outfuncs.c
index d322c8ee3e2d8eae4f2ddb7f32d52525b10468d0..c29730db2fe14e15458d46b7d8ab08da4c09163b 100644 (file)
--- a/src/backend/nodes/outfuncs.c
+++ b/src/backend/nodes/outfuncs.c
@@ -7,7 +7,7 @@
  *
  *
  * IDENTIFICATION
- *       $Header: /cvsroot/pgsql/src/backend/nodes/outfuncs.c,v 1.34 1998/04/27 02:58:05 momjian Exp $
+ *       $Header: /cvsroot/pgsql/src/backend/nodes/outfuncs.c,v 1.35 1998/05/09 23:46:35 thomas Exp $
  *
  * NOTES
  *       Every (plan) node in POSTGRES has an associated "out" routine which
@@ -45,6 +45,10 @@
 #include "catalog/pg_type.h"
 #include "lib/stringinfo.h"
 
+#ifdef PARSEDEBUG
+#include "../parse.h"
+#endif
+
 static void _outDatum(StringInfo str, Datum value, Oid type);
 static void _outNode(StringInfo str, void *obj);
 
@@ -107,6 +111,26 @@ _outIndexStmt(StringInfo str, IndexStmt *node)
        appendStringInfo(str, (node->unique ? "true" : "false"));
 }
 
+#ifdef PARSEDEBUG
+static void
+_outSelectStmt(StringInfo str, SelectStmt *node)
+{
+       appendStringInfo(str, "SELECT");
+
+       appendStringInfo(str, " :where ");
+       _outNode(str, node->whereClause);
+}
+
+static void
+_outFuncCall(StringInfo str, FuncCall *node)
+{
+       appendStringInfo(str, "FUNCTION ");
+       appendStringInfo(str, node->funcname);
+       appendStringInfo(str, " :args ");
+       _outNode(str, node->args);
+}
+#endif
+
 static void
 _outColumnDef(StringInfo str, ColumnDef *node)
 {
@@ -1534,7 +1558,31 @@ static void
 _outAExpr(StringInfo str, A_Expr *node)
 {
        appendStringInfo(str, "EXPR ");
-       appendStringInfo(str, node->opname);
+#ifdef PARSEDEBUG
+       switch (node->oper)
+       {
+               case AND:
+                       appendStringInfo(str, "AND");
+                       break;
+               case OR:
+                       appendStringInfo(str, "OR");
+                       break;
+               case NOT:
+                       appendStringInfo(str, "NOT");
+                       break;
+               case ISNULL:
+                       appendStringInfo(str, "ISNULL");
+                       break;
+               case NOTNULL:
+                       appendStringInfo(str, "NOTNULL");
+                       break;
+               default:
+#endif
+                       appendStringInfo(str, node->opname);
+#ifdef PARSEDEBUG
+                       break;
+       }
+#endif
        _outNode(str, node->lexpr);
        _outNode(str, node->rexpr);
        return;
@@ -1634,6 +1682,17 @@ _outNode(StringInfo str, void *obj)
                                _outIndexElem(str, obj);
                                break;
 
+#ifdef PARSEDEBUG
+                       case T_VariableSetStmt:
+                               break;
+                       case T_SelectStmt:
+                               _outSelectStmt(str, obj);
+                               break;
+                       case T_FuncCall:
+                               _outFuncCall(str, obj);
+                               break;
+#endif
+
                        case T_Query:
                                _outQuery(str, obj);
                                break;