blob: bd5c615321a13d0aa6e74577551118cc6891285a [file] [log] [blame]
Chris Lattner6000dac2007-08-08 22:51:59 +00001//===--- StmtDumper.cpp - Dumping implementation for Stmt ASTs ------------===//
2//
3// The LLVM Compiler Infrastructure
4//
5// This file was developed by Chris Lattner and is distributed under
6// the University of Illinois Open Source License. See LICENSE.TXT for details.
7//
8//===----------------------------------------------------------------------===//
9//
10// This file implements the Stmt::dump/Stmt::print methods, which dump out the
11// AST in a form that exposes type details and other fields.
12//
13//===----------------------------------------------------------------------===//
14
15#include "clang/AST/StmtVisitor.h"
16#include "clang/AST/Decl.h"
17#include "clang/AST/ExprCXX.h"
Chris Lattnerc7229c32007-10-07 08:58:51 +000018#include "clang/Basic/IdentifierTable.h"
Chris Lattnere300c872007-08-30 06:17:34 +000019#include "clang/Basic/SourceManager.h"
Chris Lattner6000dac2007-08-08 22:51:59 +000020#include "llvm/Support/Compiler.h"
21#include <cstdio>
22using namespace clang;
23
24//===----------------------------------------------------------------------===//
25// StmtDumper Visitor
26//===----------------------------------------------------------------------===//
27
28namespace {
Chris Lattnerc5598cb2007-08-21 04:04:25 +000029 class VISIBILITY_HIDDEN StmtDumper : public StmtVisitor<StmtDumper> {
Chris Lattnere300c872007-08-30 06:17:34 +000030 SourceManager *SM;
Chris Lattner6000dac2007-08-08 22:51:59 +000031 FILE *F;
32 unsigned IndentLevel;
33
34 /// MaxDepth - When doing a normal dump (not dumpAll) we only want to dump
35 /// the first few levels of an AST. This keeps track of how many ast levels
36 /// are left.
37 unsigned MaxDepth;
Chris Lattnere300c872007-08-30 06:17:34 +000038
39 /// LastLocFilename/LastLocLine - Keep track of the last location we print
40 /// out so that we can print out deltas from then on out.
41 const char *LastLocFilename;
42 unsigned LastLocLine;
Chris Lattner6000dac2007-08-08 22:51:59 +000043 public:
Chris Lattnere300c872007-08-30 06:17:34 +000044 StmtDumper(SourceManager *sm, FILE *f, unsigned maxDepth)
45 : SM(sm), F(f), IndentLevel(0-1), MaxDepth(maxDepth) {
46 LastLocFilename = "";
47 LastLocLine = ~0U;
48 }
Chris Lattner6000dac2007-08-08 22:51:59 +000049
Chris Lattnerf9e05812007-08-09 18:03:18 +000050 void DumpSubTree(Stmt *S) {
Chris Lattner6000dac2007-08-08 22:51:59 +000051 // Prune the recursion if not using dump all.
52 if (MaxDepth == 0) return;
53
Chris Lattnerf9e05812007-08-09 18:03:18 +000054 ++IndentLevel;
Chris Lattner6000dac2007-08-08 22:51:59 +000055 if (S) {
Chris Lattnerc5598cb2007-08-21 04:04:25 +000056 Visit(S);
Chris Lattnerb3938792007-08-30 00:53:54 +000057
58 // Print out children.
59 Stmt::child_iterator CI = S->child_begin(), CE = S->child_end();
60 if (CI != CE) {
61 while (CI != CE) {
62 fprintf(F, "\n");
63 DumpSubTree(*CI++);
64 }
65 }
66 fprintf(F, ")");
Chris Lattner6000dac2007-08-08 22:51:59 +000067 } else {
68 Indent();
Chris Lattner4a70adb2007-08-26 03:53:29 +000069 fprintf(F, "<<<NULL>>>");
Chris Lattner6000dac2007-08-08 22:51:59 +000070 }
Chris Lattnerf9e05812007-08-09 18:03:18 +000071 --IndentLevel;
Chris Lattner6000dac2007-08-08 22:51:59 +000072 }
73
Chris Lattnerf9e05812007-08-09 18:03:18 +000074 void DumpDeclarator(Decl *D);
Chris Lattner6000dac2007-08-08 22:51:59 +000075
76 void Indent() const {
77 for (int i = 0, e = IndentLevel; i < e; ++i)
78 fprintf(F, " ");
79 }
80
Steve Naroff9dcbfa42007-09-01 21:08:38 +000081 void DumpType(QualType T) {
Chris Lattnerfd8f7da2007-08-09 00:36:22 +000082 fprintf(F, "'%s'", T.getAsString().c_str());
83
84 // If the type is directly a typedef, strip off typedefness to give at
85 // least one level of concreteness.
86 if (TypedefType *TDT = dyn_cast<TypedefType>(T))
87 fprintf(F, ":'%s'", TDT->LookThroughTypedefs().getAsString().c_str());
88 }
Steve Naroff9dcbfa42007-09-01 21:08:38 +000089 void DumpStmt(const Stmt *Node) {
Chris Lattner6000dac2007-08-08 22:51:59 +000090 Indent();
91 fprintf(F, "(%s %p", Node->getStmtClassName(), (void*)Node);
Steve Naroff9dcbfa42007-09-01 21:08:38 +000092 DumpSourceRange(Node);
Chris Lattner6000dac2007-08-08 22:51:59 +000093 }
Steve Naroff9dcbfa42007-09-01 21:08:38 +000094 void DumpExpr(const Expr *Node) {
Chris Lattner6000dac2007-08-08 22:51:59 +000095 DumpStmt(Node);
Chris Lattnerfd8f7da2007-08-09 00:36:22 +000096 fprintf(F, " ");
97 DumpType(Node->getType());
Chris Lattner6000dac2007-08-08 22:51:59 +000098 }
Steve Naroff9dcbfa42007-09-01 21:08:38 +000099 void DumpSourceRange(const Stmt *Node);
Chris Lattnere300c872007-08-30 06:17:34 +0000100 void DumpLocation(SourceLocation Loc);
Chris Lattnere300c872007-08-30 06:17:34 +0000101
Chris Lattner17a1a722007-08-30 01:00:35 +0000102 // Stmts.
Chris Lattnerc5598cb2007-08-21 04:04:25 +0000103 void VisitStmt(Stmt *Node);
Chris Lattner17a1a722007-08-30 01:00:35 +0000104 void VisitDeclStmt(DeclStmt *Node);
105 void VisitLabelStmt(LabelStmt *Node);
106 void VisitGotoStmt(GotoStmt *Node);
107
108 // Exprs
109 void VisitExpr(Expr *Node);
110 void VisitDeclRefExpr(DeclRefExpr *Node);
111 void VisitPreDefinedExpr(PreDefinedExpr *Node);
112 void VisitCharacterLiteral(CharacterLiteral *Node);
113 void VisitIntegerLiteral(IntegerLiteral *Node);
114 void VisitFloatingLiteral(FloatingLiteral *Node);
115 void VisitStringLiteral(StringLiteral *Str);
116 void VisitUnaryOperator(UnaryOperator *Node);
117 void VisitSizeOfAlignOfTypeExpr(SizeOfAlignOfTypeExpr *Node);
118 void VisitMemberExpr(MemberExpr *Node);
119 void VisitOCUVectorElementExpr(OCUVectorElementExpr *Node);
120 void VisitBinaryOperator(BinaryOperator *Node);
121 void VisitCompoundAssignOperator(CompoundAssignOperator *Node);
122 void VisitAddrLabelExpr(AddrLabelExpr *Node);
123 void VisitTypesCompatibleExpr(TypesCompatibleExpr *Node);
124
125 // C++
126 void VisitCXXCastExpr(CXXCastExpr *Node);
127 void VisitCXXBoolLiteralExpr(CXXBoolLiteralExpr *Node);
128
129 // ObjC
130 void VisitObjCEncodeExpr(ObjCEncodeExpr *Node);
Fariborz Jahanianb62f6812007-10-16 20:40:23 +0000131 void VisitObjCSelectorExpr(ObjCSelectorExpr *Node);
Chris Lattner6000dac2007-08-08 22:51:59 +0000132 };
133}
134
135//===----------------------------------------------------------------------===//
Chris Lattnere300c872007-08-30 06:17:34 +0000136// Utilities
137//===----------------------------------------------------------------------===//
138
139void StmtDumper::DumpLocation(SourceLocation Loc) {
140 SourceLocation PhysLoc = SM->getPhysicalLoc(Loc);
141
142 // The general format we print out is filename:line:col, but we drop pieces
143 // that haven't changed since the last loc printed.
144 const char *Filename = SM->getSourceName(PhysLoc);
145 unsigned LineNo = SM->getLineNumber(PhysLoc);
146 if (strcmp(Filename, LastLocFilename) != 0) {
147 fprintf(stderr, "%s:%u:%u", Filename, LineNo, SM->getColumnNumber(PhysLoc));
148 LastLocFilename = Filename;
149 LastLocLine = LineNo;
150 } else if (LineNo != LastLocLine) {
151 fprintf(stderr, "line:%u:%u", LineNo, SM->getColumnNumber(PhysLoc));
152 LastLocLine = LineNo;
153 } else {
154 fprintf(stderr, "col:%u", SM->getColumnNumber(PhysLoc));
155 }
156}
157
Steve Naroff9dcbfa42007-09-01 21:08:38 +0000158void StmtDumper::DumpSourceRange(const Stmt *Node) {
Chris Lattnere300c872007-08-30 06:17:34 +0000159 // Can't translate locations if a SourceManager isn't available.
160 if (SM == 0) return;
161
162 // TODO: If the parent expression is available, we can print a delta vs its
163 // location.
164 SourceRange R = Node->getSourceRange();
165
166 fprintf(stderr, " <");
167 DumpLocation(R.Begin());
168 if (R.Begin() != R.End()) {
169 fprintf(stderr, ", ");
170 DumpLocation(R.End());
171 }
172 fprintf(stderr, ">");
173
174 // <t2.c:123:421[blah], t2.c:412:321>
175
176}
177
178
179//===----------------------------------------------------------------------===//
Chris Lattner6000dac2007-08-08 22:51:59 +0000180// Stmt printing methods.
181//===----------------------------------------------------------------------===//
182
183void StmtDumper::VisitStmt(Stmt *Node) {
Chris Lattner17a1a722007-08-30 01:00:35 +0000184 DumpStmt(Node);
Chris Lattner6000dac2007-08-08 22:51:59 +0000185}
186
Chris Lattnerf9e05812007-08-09 18:03:18 +0000187void StmtDumper::DumpDeclarator(Decl *D) {
Chris Lattner6000dac2007-08-08 22:51:59 +0000188 // FIXME: Need to complete/beautify this... this code simply shows the
189 // nodes are where they need to be.
190 if (TypedefDecl *localType = dyn_cast<TypedefDecl>(D)) {
Chris Lattnerf9e05812007-08-09 18:03:18 +0000191 fprintf(F, "\"typedef %s %s\"",
192 localType->getUnderlyingType().getAsString().c_str(),
193 localType->getName());
Chris Lattner6000dac2007-08-08 22:51:59 +0000194 } else if (ValueDecl *VD = dyn_cast<ValueDecl>(D)) {
Chris Lattnerf9e05812007-08-09 18:03:18 +0000195 fprintf(F, "\"");
Chris Lattner6000dac2007-08-08 22:51:59 +0000196 // Emit storage class for vardecls.
197 if (VarDecl *V = dyn_cast<VarDecl>(VD)) {
198 switch (V->getStorageClass()) {
Chris Lattnerf9e05812007-08-09 18:03:18 +0000199 default: assert(0 && "Unknown storage class!");
200 case VarDecl::None: break;
201 case VarDecl::Extern: fprintf(F, "extern "); break;
202 case VarDecl::Static: fprintf(F, "static "); break;
203 case VarDecl::Auto: fprintf(F, "auto "); break;
204 case VarDecl::Register: fprintf(F, "register "); break;
Chris Lattner6000dac2007-08-08 22:51:59 +0000205 }
206 }
207
208 std::string Name = VD->getName();
209 VD->getType().getAsStringInternal(Name);
Chris Lattnerf9e05812007-08-09 18:03:18 +0000210 fprintf(F, "%s", Name.c_str());
Chris Lattner6000dac2007-08-08 22:51:59 +0000211
212 // If this is a vardecl with an initializer, emit it.
213 if (VarDecl *V = dyn_cast<VarDecl>(VD)) {
214 if (V->getInit()) {
Chris Lattnerf9e05812007-08-09 18:03:18 +0000215 fprintf(F, " =\n");
216 DumpSubTree(V->getInit());
Chris Lattner6000dac2007-08-08 22:51:59 +0000217 }
218 }
Chris Lattnerf9e05812007-08-09 18:03:18 +0000219 fprintf(F, "\"");
Chris Lattner6000dac2007-08-08 22:51:59 +0000220 } else {
221 // FIXME: "struct x;"
222 assert(0 && "Unexpected decl");
223 }
Chris Lattner6000dac2007-08-08 22:51:59 +0000224}
225
Chris Lattner6000dac2007-08-08 22:51:59 +0000226void StmtDumper::VisitDeclStmt(DeclStmt *Node) {
227 DumpStmt(Node);
Chris Lattnerf9e05812007-08-09 18:03:18 +0000228 fprintf(F, "\n");
Steve Naroff94745042007-09-13 23:52:58 +0000229 for (ScopedDecl *D = Node->getDecl(); D; D = D->getNextDeclarator()) {
Chris Lattnerf9e05812007-08-09 18:03:18 +0000230 ++IndentLevel;
Chris Lattner6000dac2007-08-08 22:51:59 +0000231 Indent();
Chris Lattnerf9e05812007-08-09 18:03:18 +0000232 fprintf(F, "%p ", (void*)D);
233 DumpDeclarator(D);
234 if (D->getNextDeclarator())
235 fprintf(F, "\n");
236 --IndentLevel;
Chris Lattner6000dac2007-08-08 22:51:59 +0000237 }
Chris Lattner6000dac2007-08-08 22:51:59 +0000238}
239
Chris Lattner6000dac2007-08-08 22:51:59 +0000240void StmtDumper::VisitLabelStmt(LabelStmt *Node) {
241 DumpStmt(Node);
242 fprintf(F, " '%s'\n", Node->getName());
Chris Lattner6000dac2007-08-08 22:51:59 +0000243}
244
Chris Lattner6000dac2007-08-08 22:51:59 +0000245void StmtDumper::VisitGotoStmt(GotoStmt *Node) {
246 DumpStmt(Node);
Chris Lattnerb3938792007-08-30 00:53:54 +0000247 fprintf(F, " '%s':%p", Node->getLabel()->getName(), (void*)Node->getLabel());
Chris Lattner6000dac2007-08-08 22:51:59 +0000248}
249
Chris Lattner6000dac2007-08-08 22:51:59 +0000250//===----------------------------------------------------------------------===//
251// Expr printing methods.
252//===----------------------------------------------------------------------===//
253
254void StmtDumper::VisitExpr(Expr *Node) {
255 DumpExpr(Node);
Chris Lattner6000dac2007-08-08 22:51:59 +0000256}
257
258void StmtDumper::VisitDeclRefExpr(DeclRefExpr *Node) {
259 DumpExpr(Node);
Ted Kremenekeb641f92007-09-10 17:32:55 +0000260
261 fprintf(F, " ");
262 switch (Node->getDecl()->getKind()) {
263 case Decl::Function: fprintf(F,"FunctionDecl"); break;
Chris Lattneraa9fc462007-10-08 21:37:32 +0000264 case Decl::BlockVar: fprintf(F,"BlockVar"); break;
265 case Decl::FileVar: fprintf(F,"FileVar"); break;
266 case Decl::ParmVar: fprintf(F,"ParmVar"); break;
Ted Kremenekeb641f92007-09-10 17:32:55 +0000267 case Decl::EnumConstant: fprintf(F,"EnumConstant"); break;
268 case Decl::Typedef: fprintf(F,"Typedef"); break;
269 case Decl::Struct: fprintf(F,"Struct"); break;
270 case Decl::Union: fprintf(F,"Union"); break;
271 case Decl::Class: fprintf(F,"Class"); break;
272 case Decl::Enum: fprintf(F,"Enum"); break;
273 case Decl::ObjcInterface: fprintf(F,"ObjcInterface"); break;
274 case Decl::ObjcClass: fprintf(F,"ObjcClass"); break;
275 default: fprintf(F,"Decl"); break;
276 }
277
278 fprintf(F, "='%s' %p", Node->getDecl()->getName(), (void*)Node->getDecl());
Chris Lattner6000dac2007-08-08 22:51:59 +0000279}
280
281void StmtDumper::VisitPreDefinedExpr(PreDefinedExpr *Node) {
282 DumpExpr(Node);
283 switch (Node->getIdentType()) {
284 default:
285 assert(0 && "unknown case");
286 case PreDefinedExpr::Func:
Chris Lattnerb3938792007-08-30 00:53:54 +0000287 fprintf(F, " __func__");
Chris Lattner6000dac2007-08-08 22:51:59 +0000288 break;
289 case PreDefinedExpr::Function:
Chris Lattnerb3938792007-08-30 00:53:54 +0000290 fprintf(F, " __FUNCTION__");
Chris Lattner6000dac2007-08-08 22:51:59 +0000291 break;
292 case PreDefinedExpr::PrettyFunction:
Chris Lattnerb3938792007-08-30 00:53:54 +0000293 fprintf(F, " __PRETTY_FUNCTION__");
Chris Lattner6000dac2007-08-08 22:51:59 +0000294 break;
295 }
296}
297
298void StmtDumper::VisitCharacterLiteral(CharacterLiteral *Node) {
Chris Lattnera0df31a2007-08-09 01:04:32 +0000299 DumpExpr(Node);
Chris Lattnerb3938792007-08-30 00:53:54 +0000300 fprintf(F, " %d", Node->getValue());
Chris Lattner6000dac2007-08-08 22:51:59 +0000301}
302
303void StmtDumper::VisitIntegerLiteral(IntegerLiteral *Node) {
304 DumpExpr(Node);
305
306 bool isSigned = Node->getType()->isSignedIntegerType();
Chris Lattnerb3938792007-08-30 00:53:54 +0000307 fprintf(F, " %s", Node->getValue().toString(10, isSigned).c_str());
Chris Lattner6000dac2007-08-08 22:51:59 +0000308}
309void StmtDumper::VisitFloatingLiteral(FloatingLiteral *Node) {
310 DumpExpr(Node);
Chris Lattnerc9bec4b2007-09-22 18:47:25 +0000311 fprintf(F, " %f", Node->getValueAsDouble());
Chris Lattner6000dac2007-08-08 22:51:59 +0000312}
Chris Lattner5d661452007-08-26 03:42:43 +0000313
Chris Lattner6000dac2007-08-08 22:51:59 +0000314void StmtDumper::VisitStringLiteral(StringLiteral *Str) {
Chris Lattnera0df31a2007-08-09 01:04:32 +0000315 DumpExpr(Str);
316 // FIXME: this doesn't print wstrings right.
Chris Lattner5fc61072007-08-09 17:14:24 +0000317 fprintf(F, " %s\"", Str->isWide() ? "L" : "");
Chris Lattnera0df31a2007-08-09 01:04:32 +0000318
Chris Lattner6000dac2007-08-08 22:51:59 +0000319 for (unsigned i = 0, e = Str->getByteLength(); i != e; ++i) {
Chris Lattner5fc61072007-08-09 17:14:24 +0000320 switch (char C = Str->getStrData()[i]) {
321 default:
322 if (isprint(C))
323 fputc(C, F);
324 else
325 fprintf(F, "\\%03o", C);
326 break;
Chris Lattner6000dac2007-08-08 22:51:59 +0000327 // Handle some common ones to make dumps prettier.
Chris Lattner5fc61072007-08-09 17:14:24 +0000328 case '\\': fprintf(F, "\\\\"); break;
329 case '"': fprintf(F, "\\\""); break;
330 case '\n': fprintf(F, "\\n"); break;
331 case '\t': fprintf(F, "\\t"); break;
332 case '\a': fprintf(F, "\\a"); break;
333 case '\b': fprintf(F, "\\b"); break;
Chris Lattner6000dac2007-08-08 22:51:59 +0000334 }
335 }
Chris Lattnerb3938792007-08-30 00:53:54 +0000336 fprintf(F, "\"");
Chris Lattner6000dac2007-08-08 22:51:59 +0000337}
Chris Lattner17a1a722007-08-30 01:00:35 +0000338
Chris Lattner6000dac2007-08-08 22:51:59 +0000339void StmtDumper::VisitUnaryOperator(UnaryOperator *Node) {
Chris Lattner13cb21f2007-08-09 17:35:30 +0000340 DumpExpr(Node);
Chris Lattnerb3938792007-08-30 00:53:54 +0000341 fprintf(F, " %s '%s'", Node->isPostfix() ? "postfix" : "prefix",
Chris Lattner13cb21f2007-08-09 17:35:30 +0000342 UnaryOperator::getOpcodeStr(Node->getOpcode()));
Chris Lattner6000dac2007-08-08 22:51:59 +0000343}
344void StmtDumper::VisitSizeOfAlignOfTypeExpr(SizeOfAlignOfTypeExpr *Node) {
Chris Lattner13cb21f2007-08-09 17:35:30 +0000345 DumpExpr(Node);
346 fprintf(F, " %s ", Node->isSizeOf() ? "sizeof" : "alignof");
347 DumpType(Node->getArgumentType());
Chris Lattner6000dac2007-08-08 22:51:59 +0000348}
Chris Lattner13cb21f2007-08-09 17:35:30 +0000349
Chris Lattner6000dac2007-08-08 22:51:59 +0000350void StmtDumper::VisitMemberExpr(MemberExpr *Node) {
Chris Lattner13cb21f2007-08-09 17:35:30 +0000351 DumpExpr(Node);
Chris Lattnerb3938792007-08-30 00:53:54 +0000352 fprintf(F, " %s%s %p", Node->isArrow() ? "->" : ".",
Chris Lattner13cb21f2007-08-09 17:35:30 +0000353 Node->getMemberDecl()->getName(), (void*)Node->getMemberDecl());
Chris Lattner6000dac2007-08-08 22:51:59 +0000354}
355void StmtDumper::VisitOCUVectorElementExpr(OCUVectorElementExpr *Node) {
Chris Lattner13cb21f2007-08-09 17:35:30 +0000356 DumpExpr(Node);
Chris Lattnerb3938792007-08-30 00:53:54 +0000357 fprintf(F, " %s", Node->getAccessor().getName());
Chris Lattner6000dac2007-08-08 22:51:59 +0000358}
Chris Lattner6000dac2007-08-08 22:51:59 +0000359void StmtDumper::VisitBinaryOperator(BinaryOperator *Node) {
360 DumpExpr(Node);
Chris Lattnerb3938792007-08-30 00:53:54 +0000361 fprintf(F, " '%s'", BinaryOperator::getOpcodeStr(Node->getOpcode()));
Chris Lattnereb14fe82007-08-25 02:00:02 +0000362}
363void StmtDumper::VisitCompoundAssignOperator(CompoundAssignOperator *Node) {
364 DumpExpr(Node);
365 fprintf(F, " '%s' ComputeTy=",
366 BinaryOperator::getOpcodeStr(Node->getOpcode()));
367 DumpType(Node->getComputationType());
Chris Lattner6000dac2007-08-08 22:51:59 +0000368}
Chris Lattner6000dac2007-08-08 22:51:59 +0000369
370// GNU extensions.
371
372void StmtDumper::VisitAddrLabelExpr(AddrLabelExpr *Node) {
Chris Lattner13cb21f2007-08-09 17:35:30 +0000373 DumpExpr(Node);
Chris Lattnerb3938792007-08-30 00:53:54 +0000374 fprintf(F, " %s %p", Node->getLabel()->getName(), (void*)Node->getLabel());
Chris Lattner6000dac2007-08-08 22:51:59 +0000375}
376
Chris Lattner6000dac2007-08-08 22:51:59 +0000377void StmtDumper::VisitTypesCompatibleExpr(TypesCompatibleExpr *Node) {
Chris Lattner13cb21f2007-08-09 17:35:30 +0000378 DumpExpr(Node);
379 fprintf(F, " ");
380 DumpType(Node->getArgType1());
381 fprintf(F, " ");
382 DumpType(Node->getArgType2());
Chris Lattner6000dac2007-08-08 22:51:59 +0000383}
384
Chris Lattnerf9e05812007-08-09 18:03:18 +0000385//===----------------------------------------------------------------------===//
386// C++ Expressions
387//===----------------------------------------------------------------------===//
Chris Lattner6000dac2007-08-08 22:51:59 +0000388
389void StmtDumper::VisitCXXCastExpr(CXXCastExpr *Node) {
Chris Lattner13cb21f2007-08-09 17:35:30 +0000390 DumpExpr(Node);
Chris Lattnerb3938792007-08-30 00:53:54 +0000391 fprintf(F, " %s", CXXCastExpr::getOpcodeStr(Node->getOpcode()));
Chris Lattner6000dac2007-08-08 22:51:59 +0000392}
393
394void StmtDumper::VisitCXXBoolLiteralExpr(CXXBoolLiteralExpr *Node) {
Chris Lattner13cb21f2007-08-09 17:35:30 +0000395 DumpExpr(Node);
Chris Lattnerb3938792007-08-30 00:53:54 +0000396 fprintf(F, " %s", Node->getValue() ? "true" : "false");
Chris Lattner6000dac2007-08-08 22:51:59 +0000397}
398
Anders Carlsson55085182007-08-21 17:43:55 +0000399//===----------------------------------------------------------------------===//
400// Obj-C Expressions
401//===----------------------------------------------------------------------===//
402
Anders Carlssonf9bcf012007-08-22 15:14:15 +0000403void StmtDumper::VisitObjCEncodeExpr(ObjCEncodeExpr *Node) {
404 DumpExpr(Node);
405
406 fprintf(F, " ");
407 DumpType(Node->getEncodedType());
Anders Carlssonf9bcf012007-08-22 15:14:15 +0000408}
409
Fariborz Jahanianb62f6812007-10-16 20:40:23 +0000410void StmtDumper::VisitObjCSelectorExpr(ObjCSelectorExpr *Node) {
411 DumpExpr(Node);
412
413 fprintf(F, " ");
414 Selector &selector = Node->getSelector();
415 if (selector.isUnarySelector())
416 fprintf(F, "%s", selector.getIdentifierInfoForSlot(0)->getName());
417 else {
418 for (unsigned i = 0, e = Node->getNumArgs(); i != e; ++i)
419 fprintf(F, "%s:", selector.getIdentifierInfoForSlot(i)->getName());
420 }
421}
422
Chris Lattner6000dac2007-08-08 22:51:59 +0000423//===----------------------------------------------------------------------===//
424// Stmt method implementations
425//===----------------------------------------------------------------------===//
426
427/// dump - This does a local dump of the specified AST fragment. It dumps the
428/// specified node and a few nodes underneath it, but not the whole subtree.
429/// This is useful in a debugger.
Chris Lattnere300c872007-08-30 06:17:34 +0000430void Stmt::dump(SourceManager &SM) const {
Chris Lattner0c727a32007-08-30 00:40:08 +0000431 StmtDumper P(&SM, stderr, 4);
Chris Lattnerb3938792007-08-30 00:53:54 +0000432 P.DumpSubTree(const_cast<Stmt*>(this));
Chris Lattner0c727a32007-08-30 00:40:08 +0000433 fprintf(stderr, "\n");
434}
435
436/// dump - This does a local dump of the specified AST fragment. It dumps the
437/// specified node and a few nodes underneath it, but not the whole subtree.
438/// This is useful in a debugger.
Chris Lattner6000dac2007-08-08 22:51:59 +0000439void Stmt::dump() const {
Chris Lattner0c727a32007-08-30 00:40:08 +0000440 StmtDumper P(0, stderr, 4);
Chris Lattnerb3938792007-08-30 00:53:54 +0000441 P.DumpSubTree(const_cast<Stmt*>(this));
Chris Lattner0c727a32007-08-30 00:40:08 +0000442 fprintf(stderr, "\n");
443}
444
445/// dumpAll - This does a dump of the specified AST fragment and all subtrees.
Chris Lattnere300c872007-08-30 06:17:34 +0000446void Stmt::dumpAll(SourceManager &SM) const {
Chris Lattner0c727a32007-08-30 00:40:08 +0000447 StmtDumper P(&SM, stderr, ~0U);
Chris Lattnerb3938792007-08-30 00:53:54 +0000448 P.DumpSubTree(const_cast<Stmt*>(this));
Chris Lattneree41ce52007-08-10 21:51:12 +0000449 fprintf(stderr, "\n");
Chris Lattner6000dac2007-08-08 22:51:59 +0000450}
451
452/// dumpAll - This does a dump of the specified AST fragment and all subtrees.
453void Stmt::dumpAll() const {
Chris Lattner0c727a32007-08-30 00:40:08 +0000454 StmtDumper P(0, stderr, ~0U);
Chris Lattnerb3938792007-08-30 00:53:54 +0000455 P.DumpSubTree(const_cast<Stmt*>(this));
Chris Lattneree41ce52007-08-10 21:51:12 +0000456 fprintf(stderr, "\n");
Chris Lattner6000dac2007-08-08 22:51:59 +0000457}