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   location_t *locus = EXPR_LOCUS (t);
  36   if (locus)
  37     dump_int (di, "line", locus->line);
  38 }
  39
  40 /* Dump any C-specific tree codes and attributes of common codes.  */
  41
  42 bool
  43 c_dump_tree (void *dump_info, tree t)
  44 {
  45   enum tree_code code;
  46   dump_info_p di = (dump_info_p) dump_info;
  47
  48   /* Figure out what kind of node this is.  */
  49   code = TREE_CODE (t);
  50
  51   switch (code)
  52     {
  53     case FIELD_DECL:
  54       if (DECL_C_BIT_FIELD (t))
  55         dump_string (di, "bitfield");
  56       break;
  57
  58     case BREAK_STMT:
  59     case CONTINUE_STMT:
  60       dump_stmt (di, t);
  61       break;
  62
  63     case DECL_STMT:
  64       dump_stmt (di, t);
  65       dump_child ("decl", DECL_STMT_DECL (t));
  66       break;
  67
  68     case DO_STMT:
  69       dump_stmt (di, t);
  70       dump_child ("body", DO_BODY (t));
  71       dump_child ("cond", DO_COND (t));
  72       break;
  73
  74     case EXPR_STMT:
  75       dump_stmt (di, t);
  76       dump_child ("expr", EXPR_STMT_EXPR (t));
  77       break;
  78
  79     case FOR_STMT:
  80       dump_stmt (di, t);
  81       dump_child ("init", FOR_INIT_STMT (t));
  82       dump_child ("cond", FOR_COND (t));
  83       dump_child ("expr", FOR_EXPR (t));
  84       dump_child ("body", FOR_BODY (t));
  85       break;
  86
  87     case SWITCH_STMT:
  88       dump_stmt (di, t);
  89       dump_child ("cond", SWITCH_COND (t));
  90       dump_child ("body", SWITCH_BODY (t));
  91       break;
  92
  93     case WHILE_STMT:
  94       dump_stmt (di, t);
  95       dump_child ("cond", WHILE_COND (t));
  96       dump_child ("body", WHILE_BODY (t));
  97       break;
  98
  99     case STMT_EXPR:
 100       dump_child ("stmt", STMT_EXPR_STMT (t));
 101       break;
 102
 103     default:
 104       break;
 105     }
 106
 107   return false;
 108 }