gcc/c-dump.c

   1 /* Tree-dumping functionality for C-family languages.
   2    Copyright (C) 2002, 2004 Free Software Foundation, Inc.
   3    Written by Mark Mitchell <mark@codesourcery.com>
   4
   5 This file is part of GCC.
   6
   7 GCC is free software; you can redistribute it and/or modify it under
   8 the terms of the GNU General Public License as published by the Free
   9 Software Foundation; either version 2, or (at your option) any later
  10 version.
  11
  12 GCC is distributed in the hope that it will be useful, but WITHOUT ANY
  13 WARRANTY; without even the implied warranty of MERCHANTABILITY or
  14 FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  15 for more details.
  16
  17 You should have received a copy of the GNU General Public License
  18 along with GCC; see the file COPYING.  If not, write to the Free
  19 Software Foundation, 59 Temple Place - Suite 330, Boston, MA
  20 02111-1307, USA.  */
  21
  22 #include "config.h"
  23 #include "system.h"
  24 #include "coretypes.h"
  25 #include "tm.h"
  26 #include "tree.h"
  27 #include "c-tree.h"
  28 #include "tree-dump.h"
  29
  30 /* Dump information common to statements from STMT.  */
  31
  32 void
  33 dump_stmt (dump_info_p di, tree t)
  34 {
  35   if (EXPR_HAS_LOCATION (t))
  36     dump_int (di, "line", EXPR_LINENO (t));
  37 }
  38
  39 /* Dump any C-specific tree codes and attributes of common codes.  */
  40
  41 bool
  42 c_dump_tree (void *dump_info, tree t)
  43 {
  44   enum tree_code code;
  45   dump_info_p di = (dump_info_p) dump_info;
  46
  47   /* Figure out what kind of node this is.  */
  48   code = TREE_CODE (t);
  49
  50   switch (code)
  51     {
  52     case FIELD_DECL:
  53       if (DECL_C_BIT_FIELD (t))
  54         dump_string (di, "bitfield");
  55       break;
  56
  57     case BREAK_STMT:
  58     case CONTINUE_STMT:
  59       dump_stmt (di, t);
  60       break;
  61
  62     case DO_STMT:
  63       dump_stmt (di, t);
  64       dump_child ("body", DO_BODY (t));
  65       dump_child ("cond", DO_COND (t));
  66       break;
  67
  68     case EXPR_STMT:
  69       dump_stmt (di, t);
  70       dump_child ("expr", EXPR_STMT_EXPR (t));
  71       break;
  72
  73     case FOR_STMT:
  74       dump_stmt (di, t);
  75       dump_child ("init", FOR_INIT_STMT (t));
  76       dump_child ("cond", FOR_COND (t));
  77       dump_child ("expr", FOR_EXPR (t));
  78       dump_child ("body", FOR_BODY (t));
  79       break;
  80
  81     case SWITCH_STMT:
  82       dump_stmt (di, t);
  83       dump_child ("cond", SWITCH_COND (t));
  84       dump_child ("body", SWITCH_BODY (t));
  85       break;
  86
  87     case WHILE_STMT:
  88       dump_stmt (di, t);
  89       dump_child ("cond", WHILE_COND (t));
  90       dump_child ("body", WHILE_BODY (t));
  91       break;
  92
  93     case STMT_EXPR:
  94       dump_child ("stmt", STMT_EXPR_STMT (t));
  95       break;
  96
  97     default:
  98       break;
  99     }
 100
 101   return false;
 102 }