]> CyberLeo.Net >> Repos - FreeBSD/FreeBSD.git/blob - lib/AST/StmtPrinter.cpp
Update clang to r104832.
[FreeBSD/FreeBSD.git] / lib / AST / StmtPrinter.cpp
1 //===--- StmtPrinter.cpp - Printing implementation for Stmt ASTs ----------===//
2 //
3 //                     The LLVM Compiler Infrastructure
4 //
5 // This file is distributed under the University of Illinois Open Source
6 // License. See LICENSE.TXT for details.
7 //
8 //===----------------------------------------------------------------------===//
9 //
10 // This file implements the Stmt::dumpPretty/Stmt::printPretty methods, which
11 // pretty print the AST back out to C code.
12 //
13 //===----------------------------------------------------------------------===//
14
15 #include "clang/AST/StmtVisitor.h"
16 #include "clang/AST/DeclCXX.h"
17 #include "clang/AST/DeclObjC.h"
18 #include "clang/AST/PrettyPrinter.h"
19 #include "llvm/Support/Format.h"
20 #include "clang/AST/Expr.h"
21 using namespace clang;
22
23 //===----------------------------------------------------------------------===//
24 // StmtPrinter Visitor
25 //===----------------------------------------------------------------------===//
26
27 namespace  {
28   class StmtPrinter : public StmtVisitor<StmtPrinter> {
29     llvm::raw_ostream &OS;
30     ASTContext &Context;
31     unsigned IndentLevel;
32     clang::PrinterHelper* Helper;
33     PrintingPolicy Policy;
34
35   public:
36     StmtPrinter(llvm::raw_ostream &os, ASTContext &C, PrinterHelper* helper,
37                 const PrintingPolicy &Policy,
38                 unsigned Indentation = 0)
39       : OS(os), Context(C), IndentLevel(Indentation), Helper(helper),
40         Policy(Policy) {}
41
42     void PrintStmt(Stmt *S) {
43       PrintStmt(S, Policy.Indentation);
44     }
45
46     void PrintStmt(Stmt *S, int SubIndent) {
47       IndentLevel += SubIndent;
48       if (S && isa<Expr>(S)) {
49         // If this is an expr used in a stmt context, indent and newline it.
50         Indent();
51         Visit(S);
52         OS << ";\n";
53       } else if (S) {
54         Visit(S);
55       } else {
56         Indent() << "<<<NULL STATEMENT>>>\n";
57       }
58       IndentLevel -= SubIndent;
59     }
60
61     void PrintRawCompoundStmt(CompoundStmt *S);
62     void PrintRawDecl(Decl *D);
63     void PrintRawDeclStmt(DeclStmt *S);
64     void PrintRawIfStmt(IfStmt *If);
65     void PrintRawCXXCatchStmt(CXXCatchStmt *Catch);
66
67     void PrintExpr(Expr *E) {
68       if (E)
69         Visit(E);
70       else
71         OS << "<null expr>";
72     }
73
74     llvm::raw_ostream &Indent(int Delta = 0) {
75       for (int i = 0, e = IndentLevel+Delta; i < e; ++i)
76         OS << "  ";
77       return OS;
78     }
79
80     bool PrintOffsetOfDesignator(Expr *E);
81     void VisitUnaryOffsetOf(UnaryOperator *Node);
82
83     void Visit(Stmt* S) {
84       if (Helper && Helper->handledStmt(S,OS))
85           return;
86       else StmtVisitor<StmtPrinter>::Visit(S);
87     }
88
89     void VisitStmt(Stmt *Node);
90 #define STMT(CLASS, PARENT) \
91     void Visit##CLASS(CLASS *Node);
92 #include "clang/AST/StmtNodes.inc"
93   };
94 }
95
96 //===----------------------------------------------------------------------===//
97 //  Stmt printing methods.
98 //===----------------------------------------------------------------------===//
99
100 void StmtPrinter::VisitStmt(Stmt *Node) {
101   Indent() << "<<unknown stmt type>>\n";
102 }
103
104 /// PrintRawCompoundStmt - Print a compound stmt without indenting the {, and
105 /// with no newline after the }.
106 void StmtPrinter::PrintRawCompoundStmt(CompoundStmt *Node) {
107   OS << "{\n";
108   for (CompoundStmt::body_iterator I = Node->body_begin(), E = Node->body_end();
109        I != E; ++I)
110     PrintStmt(*I);
111
112   Indent() << "}";
113 }
114
115 void StmtPrinter::PrintRawDecl(Decl *D) {
116   D->print(OS, Policy, IndentLevel);
117 }
118
119 void StmtPrinter::PrintRawDeclStmt(DeclStmt *S) {
120   DeclStmt::decl_iterator Begin = S->decl_begin(), End = S->decl_end();
121   llvm::SmallVector<Decl*, 2> Decls;
122   for ( ; Begin != End; ++Begin)
123     Decls.push_back(*Begin);
124
125   Decl::printGroup(Decls.data(), Decls.size(), OS, Policy, IndentLevel);
126 }
127
128 void StmtPrinter::VisitNullStmt(NullStmt *Node) {
129   Indent() << ";\n";
130 }
131
132 void StmtPrinter::VisitDeclStmt(DeclStmt *Node) {
133   Indent();
134   PrintRawDeclStmt(Node);
135   OS << ";\n";
136 }
137
138 void StmtPrinter::VisitCompoundStmt(CompoundStmt *Node) {
139   Indent();
140   PrintRawCompoundStmt(Node);
141   OS << "\n";
142 }
143
144 void StmtPrinter::VisitCaseStmt(CaseStmt *Node) {
145   Indent(-1) << "case ";
146   PrintExpr(Node->getLHS());
147   if (Node->getRHS()) {
148     OS << " ... ";
149     PrintExpr(Node->getRHS());
150   }
151   OS << ":\n";
152
153   PrintStmt(Node->getSubStmt(), 0);
154 }
155
156 void StmtPrinter::VisitDefaultStmt(DefaultStmt *Node) {
157   Indent(-1) << "default:\n";
158   PrintStmt(Node->getSubStmt(), 0);
159 }
160
161 void StmtPrinter::VisitLabelStmt(LabelStmt *Node) {
162   Indent(-1) << Node->getName() << ":\n";
163   PrintStmt(Node->getSubStmt(), 0);
164 }
165
166 void StmtPrinter::PrintRawIfStmt(IfStmt *If) {
167   OS << "if (";
168   PrintExpr(If->getCond());
169   OS << ')';
170
171   if (CompoundStmt *CS = dyn_cast<CompoundStmt>(If->getThen())) {
172     OS << ' ';
173     PrintRawCompoundStmt(CS);
174     OS << (If->getElse() ? ' ' : '\n');
175   } else {
176     OS << '\n';
177     PrintStmt(If->getThen());
178     if (If->getElse()) Indent();
179   }
180
181   if (Stmt *Else = If->getElse()) {
182     OS << "else";
183
184     if (CompoundStmt *CS = dyn_cast<CompoundStmt>(Else)) {
185       OS << ' ';
186       PrintRawCompoundStmt(CS);
187       OS << '\n';
188     } else if (IfStmt *ElseIf = dyn_cast<IfStmt>(Else)) {
189       OS << ' ';
190       PrintRawIfStmt(ElseIf);
191     } else {
192       OS << '\n';
193       PrintStmt(If->getElse());
194     }
195   }
196 }
197
198 void StmtPrinter::VisitIfStmt(IfStmt *If) {
199   Indent();
200   PrintRawIfStmt(If);
201 }
202
203 void StmtPrinter::VisitSwitchStmt(SwitchStmt *Node) {
204   Indent() << "switch (";
205   PrintExpr(Node->getCond());
206   OS << ")";
207
208   // Pretty print compoundstmt bodies (very common).
209   if (CompoundStmt *CS = dyn_cast<CompoundStmt>(Node->getBody())) {
210     OS << " ";
211     PrintRawCompoundStmt(CS);
212     OS << "\n";
213   } else {
214     OS << "\n";
215     PrintStmt(Node->getBody());
216   }
217 }
218
219 void StmtPrinter::VisitSwitchCase(SwitchCase*) {
220   assert(0 && "SwitchCase is an abstract class");
221 }
222
223 void StmtPrinter::VisitWhileStmt(WhileStmt *Node) {
224   Indent() << "while (";
225   PrintExpr(Node->getCond());
226   OS << ")\n";
227   PrintStmt(Node->getBody());
228 }
229
230 void StmtPrinter::VisitDoStmt(DoStmt *Node) {
231   Indent() << "do ";
232   if (CompoundStmt *CS = dyn_cast<CompoundStmt>(Node->getBody())) {
233     PrintRawCompoundStmt(CS);
234     OS << " ";
235   } else {
236     OS << "\n";
237     PrintStmt(Node->getBody());
238     Indent();
239   }
240
241   OS << "while (";
242   PrintExpr(Node->getCond());
243   OS << ");\n";
244 }
245
246 void StmtPrinter::VisitForStmt(ForStmt *Node) {
247   Indent() << "for (";
248   if (Node->getInit()) {
249     if (DeclStmt *DS = dyn_cast<DeclStmt>(Node->getInit()))
250       PrintRawDeclStmt(DS);
251     else
252       PrintExpr(cast<Expr>(Node->getInit()));
253   }
254   OS << ";";
255   if (Node->getCond()) {
256     OS << " ";
257     PrintExpr(Node->getCond());
258   }
259   OS << ";";
260   if (Node->getInc()) {
261     OS << " ";
262     PrintExpr(Node->getInc());
263   }
264   OS << ") ";
265
266   if (CompoundStmt *CS = dyn_cast<CompoundStmt>(Node->getBody())) {
267     PrintRawCompoundStmt(CS);
268     OS << "\n";
269   } else {
270     OS << "\n";
271     PrintStmt(Node->getBody());
272   }
273 }
274
275 void StmtPrinter::VisitObjCForCollectionStmt(ObjCForCollectionStmt *Node) {
276   Indent() << "for (";
277   if (DeclStmt *DS = dyn_cast<DeclStmt>(Node->getElement()))
278     PrintRawDeclStmt(DS);
279   else
280     PrintExpr(cast<Expr>(Node->getElement()));
281   OS << " in ";
282   PrintExpr(Node->getCollection());
283   OS << ") ";
284
285   if (CompoundStmt *CS = dyn_cast<CompoundStmt>(Node->getBody())) {
286     PrintRawCompoundStmt(CS);
287     OS << "\n";
288   } else {
289     OS << "\n";
290     PrintStmt(Node->getBody());
291   }
292 }
293
294 void StmtPrinter::VisitGotoStmt(GotoStmt *Node) {
295   Indent() << "goto " << Node->getLabel()->getName() << ";\n";
296 }
297
298 void StmtPrinter::VisitIndirectGotoStmt(IndirectGotoStmt *Node) {
299   Indent() << "goto *";
300   PrintExpr(Node->getTarget());
301   OS << ";\n";
302 }
303
304 void StmtPrinter::VisitContinueStmt(ContinueStmt *Node) {
305   Indent() << "continue;\n";
306 }
307
308 void StmtPrinter::VisitBreakStmt(BreakStmt *Node) {
309   Indent() << "break;\n";
310 }
311
312
313 void StmtPrinter::VisitReturnStmt(ReturnStmt *Node) {
314   Indent() << "return";
315   if (Node->getRetValue()) {
316     OS << " ";
317     PrintExpr(Node->getRetValue());
318   }
319   OS << ";\n";
320 }
321
322
323 void StmtPrinter::VisitAsmStmt(AsmStmt *Node) {
324   Indent() << "asm ";
325
326   if (Node->isVolatile())
327     OS << "volatile ";
328
329   OS << "(";
330   VisitStringLiteral(Node->getAsmString());
331
332   // Outputs
333   if (Node->getNumOutputs() != 0 || Node->getNumInputs() != 0 ||
334       Node->getNumClobbers() != 0)
335     OS << " : ";
336
337   for (unsigned i = 0, e = Node->getNumOutputs(); i != e; ++i) {
338     if (i != 0)
339       OS << ", ";
340
341     if (!Node->getOutputName(i).empty()) {
342       OS << '[';
343       OS << Node->getOutputName(i);
344       OS << "] ";
345     }
346
347     VisitStringLiteral(Node->getOutputConstraintLiteral(i));
348     OS << " ";
349     Visit(Node->getOutputExpr(i));
350   }
351
352   // Inputs
353   if (Node->getNumInputs() != 0 || Node->getNumClobbers() != 0)
354     OS << " : ";
355
356   for (unsigned i = 0, e = Node->getNumInputs(); i != e; ++i) {
357     if (i != 0)
358       OS << ", ";
359
360     if (!Node->getInputName(i).empty()) {
361       OS << '[';
362       OS << Node->getInputName(i);
363       OS << "] ";
364     }
365
366     VisitStringLiteral(Node->getInputConstraintLiteral(i));
367     OS << " ";
368     Visit(Node->getInputExpr(i));
369   }
370
371   // Clobbers
372   if (Node->getNumClobbers() != 0)
373     OS << " : ";
374
375   for (unsigned i = 0, e = Node->getNumClobbers(); i != e; ++i) {
376     if (i != 0)
377       OS << ", ";
378
379     VisitStringLiteral(Node->getClobber(i));
380   }
381
382   OS << ");\n";
383 }
384
385 void StmtPrinter::VisitObjCAtTryStmt(ObjCAtTryStmt *Node) {
386   Indent() << "@try";
387   if (CompoundStmt *TS = dyn_cast<CompoundStmt>(Node->getTryBody())) {
388     PrintRawCompoundStmt(TS);
389     OS << "\n";
390   }
391
392   for (unsigned I = 0, N = Node->getNumCatchStmts(); I != N; ++I) {
393     ObjCAtCatchStmt *catchStmt = Node->getCatchStmt(I);
394     Indent() << "@catch(";
395     if (catchStmt->getCatchParamDecl()) {
396       if (Decl *DS = catchStmt->getCatchParamDecl())
397         PrintRawDecl(DS);
398     }
399     OS << ")";
400     if (CompoundStmt *CS = dyn_cast<CompoundStmt>(catchStmt->getCatchBody())) {
401       PrintRawCompoundStmt(CS);
402       OS << "\n";
403     }
404   }
405
406   if (ObjCAtFinallyStmt *FS = static_cast<ObjCAtFinallyStmt *>(
407         Node->getFinallyStmt())) {
408     Indent() << "@finally";
409     PrintRawCompoundStmt(dyn_cast<CompoundStmt>(FS->getFinallyBody()));
410     OS << "\n";
411   }
412 }
413
414 void StmtPrinter::VisitObjCAtFinallyStmt(ObjCAtFinallyStmt *Node) {
415 }
416
417 void StmtPrinter::VisitObjCAtCatchStmt (ObjCAtCatchStmt *Node) {
418   Indent() << "@catch (...) { /* todo */ } \n";
419 }
420
421 void StmtPrinter::VisitObjCAtThrowStmt(ObjCAtThrowStmt *Node) {
422   Indent() << "@throw";
423   if (Node->getThrowExpr()) {
424     OS << " ";
425     PrintExpr(Node->getThrowExpr());
426   }
427   OS << ";\n";
428 }
429
430 void StmtPrinter::VisitObjCAtSynchronizedStmt(ObjCAtSynchronizedStmt *Node) {
431   Indent() << "@synchronized (";
432   PrintExpr(Node->getSynchExpr());
433   OS << ")";
434   PrintRawCompoundStmt(Node->getSynchBody());
435   OS << "\n";
436 }
437
438 void StmtPrinter::PrintRawCXXCatchStmt(CXXCatchStmt *Node) {
439   OS << "catch (";
440   if (Decl *ExDecl = Node->getExceptionDecl())
441     PrintRawDecl(ExDecl);
442   else
443     OS << "...";
444   OS << ") ";
445   PrintRawCompoundStmt(cast<CompoundStmt>(Node->getHandlerBlock()));
446 }
447
448 void StmtPrinter::VisitCXXCatchStmt(CXXCatchStmt *Node) {
449   Indent();
450   PrintRawCXXCatchStmt(Node);
451   OS << "\n";
452 }
453
454 void StmtPrinter::VisitCXXTryStmt(CXXTryStmt *Node) {
455   Indent() << "try ";
456   PrintRawCompoundStmt(Node->getTryBlock());
457   for (unsigned i = 0, e = Node->getNumHandlers(); i < e; ++i) {
458     OS << " ";
459     PrintRawCXXCatchStmt(Node->getHandler(i));
460   }
461   OS << "\n";
462 }
463
464 //===----------------------------------------------------------------------===//
465 //  Expr printing methods.
466 //===----------------------------------------------------------------------===//
467
468 void StmtPrinter::VisitExpr(Expr *Node) {
469   OS << "<<unknown expr type>>";
470 }
471
472 void StmtPrinter::VisitDeclRefExpr(DeclRefExpr *Node) {
473   if (NestedNameSpecifier *Qualifier = Node->getQualifier())
474     Qualifier->print(OS, Policy);
475   OS << Node->getDecl();
476   if (Node->hasExplicitTemplateArgumentList())
477     OS << TemplateSpecializationType::PrintTemplateArgumentList(
478                                                     Node->getTemplateArgs(),
479                                                     Node->getNumTemplateArgs(),
480                                                     Policy);  
481 }
482
483 void StmtPrinter::VisitDependentScopeDeclRefExpr(
484                                            DependentScopeDeclRefExpr *Node) {
485   Node->getQualifier()->print(OS, Policy);
486   OS << Node->getDeclName().getAsString();
487   if (Node->hasExplicitTemplateArgs())
488     OS << TemplateSpecializationType::PrintTemplateArgumentList(
489                                                    Node->getTemplateArgs(),
490                                                    Node->getNumTemplateArgs(),
491                                                    Policy);
492 }
493
494 void StmtPrinter::VisitUnresolvedLookupExpr(UnresolvedLookupExpr *Node) {
495   if (Node->getQualifier())
496     Node->getQualifier()->print(OS, Policy);
497   OS << Node->getName().getAsString();
498   if (Node->hasExplicitTemplateArgs())
499     OS << TemplateSpecializationType::PrintTemplateArgumentList(
500                                                    Node->getTemplateArgs(),
501                                                    Node->getNumTemplateArgs(),
502                                                    Policy);
503 }
504
505 void StmtPrinter::VisitObjCIvarRefExpr(ObjCIvarRefExpr *Node) {
506   if (Node->getBase()) {
507     PrintExpr(Node->getBase());
508     OS << (Node->isArrow() ? "->" : ".");
509   }
510   OS << Node->getDecl();
511 }
512
513 void StmtPrinter::VisitObjCPropertyRefExpr(ObjCPropertyRefExpr *Node) {
514   if (Node->getBase()) {
515     PrintExpr(Node->getBase());
516     OS << ".";
517   }
518   OS << Node->getProperty()->getNameAsCString();
519 }
520
521 void StmtPrinter::VisitObjCImplicitSetterGetterRefExpr(
522                                         ObjCImplicitSetterGetterRefExpr *Node) {
523   if (Node->getBase()) {
524     PrintExpr(Node->getBase());
525     OS << ".";
526   }
527   if (Node->getGetterMethod())
528     OS << Node->getGetterMethod();
529
530 }
531
532 void StmtPrinter::VisitPredefinedExpr(PredefinedExpr *Node) {
533   switch (Node->getIdentType()) {
534     default:
535       assert(0 && "unknown case");
536     case PredefinedExpr::Func:
537       OS << "__func__";
538       break;
539     case PredefinedExpr::Function:
540       OS << "__FUNCTION__";
541       break;
542     case PredefinedExpr::PrettyFunction:
543       OS << "__PRETTY_FUNCTION__";
544       break;
545   }
546 }
547
548 void StmtPrinter::VisitCharacterLiteral(CharacterLiteral *Node) {
549   unsigned value = Node->getValue();
550   if (Node->isWide())
551     OS << "L";
552   switch (value) {
553   case '\\':
554     OS << "'\\\\'";
555     break;
556   case '\'':
557     OS << "'\\''";
558     break;
559   case '\a':
560     // TODO: K&R: the meaning of '\\a' is different in traditional C
561     OS << "'\\a'";
562     break;
563   case '\b':
564     OS << "'\\b'";
565     break;
566   // Nonstandard escape sequence.
567   /*case '\e':
568     OS << "'\\e'";
569     break;*/
570   case '\f':
571     OS << "'\\f'";
572     break;
573   case '\n':
574     OS << "'\\n'";
575     break;
576   case '\r':
577     OS << "'\\r'";
578     break;
579   case '\t':
580     OS << "'\\t'";
581     break;
582   case '\v':
583     OS << "'\\v'";
584     break;
585   default:
586     if (value < 256 && isprint(value)) {
587       OS << "'" << (char)value << "'";
588     } else if (value < 256) {
589       OS << "'\\x" << llvm::format("%x", value) << "'";
590     } else {
591       // FIXME what to really do here?
592       OS << value;
593     }
594   }
595 }
596
597 void StmtPrinter::VisitIntegerLiteral(IntegerLiteral *Node) {
598   bool isSigned = Node->getType()->isSignedIntegerType();
599   OS << Node->getValue().toString(10, isSigned);
600
601   // Emit suffixes.  Integer literals are always a builtin integer type.
602   switch (Node->getType()->getAs<BuiltinType>()->getKind()) {
603   default: assert(0 && "Unexpected type for integer literal!");
604   case BuiltinType::Int:       break; // no suffix.
605   case BuiltinType::UInt:      OS << 'U'; break;
606   case BuiltinType::Long:      OS << 'L'; break;
607   case BuiltinType::ULong:     OS << "UL"; break;
608   case BuiltinType::LongLong:  OS << "LL"; break;
609   case BuiltinType::ULongLong: OS << "ULL"; break;
610   }
611 }
612 void StmtPrinter::VisitFloatingLiteral(FloatingLiteral *Node) {
613   // FIXME: print value more precisely.
614   OS << Node->getValueAsApproximateDouble();
615 }
616
617 void StmtPrinter::VisitImaginaryLiteral(ImaginaryLiteral *Node) {
618   PrintExpr(Node->getSubExpr());
619   OS << "i";
620 }
621
622 void StmtPrinter::VisitStringLiteral(StringLiteral *Str) {
623   if (Str->isWide()) OS << 'L';
624   OS << '"';
625
626   // FIXME: this doesn't print wstrings right.
627   for (unsigned i = 0, e = Str->getByteLength(); i != e; ++i) {
628     unsigned char Char = Str->getStrData()[i];
629
630     switch (Char) {
631     default:
632       if (isprint(Char))
633         OS << (char)Char;
634       else  // Output anything hard as an octal escape.
635         OS << '\\'
636         << (char)('0'+ ((Char >> 6) & 7))
637         << (char)('0'+ ((Char >> 3) & 7))
638         << (char)('0'+ ((Char >> 0) & 7));
639       break;
640     // Handle some common non-printable cases to make dumps prettier.
641     case '\\': OS << "\\\\"; break;
642     case '"': OS << "\\\""; break;
643     case '\n': OS << "\\n"; break;
644     case '\t': OS << "\\t"; break;
645     case '\a': OS << "\\a"; break;
646     case '\b': OS << "\\b"; break;
647     }
648   }
649   OS << '"';
650 }
651 void StmtPrinter::VisitParenExpr(ParenExpr *Node) {
652   OS << "(";
653   PrintExpr(Node->getSubExpr());
654   OS << ")";
655 }
656 void StmtPrinter::VisitUnaryOperator(UnaryOperator *Node) {
657   if (!Node->isPostfix()) {
658     OS << UnaryOperator::getOpcodeStr(Node->getOpcode());
659
660     // Print a space if this is an "identifier operator" like __real, or if
661     // it might be concatenated incorrectly like '+'.
662     switch (Node->getOpcode()) {
663     default: break;
664     case UnaryOperator::Real:
665     case UnaryOperator::Imag:
666     case UnaryOperator::Extension:
667       OS << ' ';
668       break;
669     case UnaryOperator::Plus:
670     case UnaryOperator::Minus:
671       if (isa<UnaryOperator>(Node->getSubExpr()))
672         OS << ' ';
673       break;
674     }
675   }
676   PrintExpr(Node->getSubExpr());
677
678   if (Node->isPostfix())
679     OS << UnaryOperator::getOpcodeStr(Node->getOpcode());
680 }
681
682 bool StmtPrinter::PrintOffsetOfDesignator(Expr *E) {
683   if (isa<UnaryOperator>(E)) {
684     // Base case, print the type and comma.
685     OS << E->getType().getAsString() << ", ";
686     return true;
687   } else if (ArraySubscriptExpr *ASE = dyn_cast<ArraySubscriptExpr>(E)) {
688     PrintOffsetOfDesignator(ASE->getLHS());
689     OS << "[";
690     PrintExpr(ASE->getRHS());
691     OS << "]";
692     return false;
693   } else {
694     MemberExpr *ME = cast<MemberExpr>(E);
695     bool IsFirst = PrintOffsetOfDesignator(ME->getBase());
696     OS << (IsFirst ? "" : ".") << ME->getMemberDecl();
697     return false;
698   }
699 }
700
701 void StmtPrinter::VisitUnaryOffsetOf(UnaryOperator *Node) {
702   OS << "__builtin_offsetof(";
703   PrintOffsetOfDesignator(Node->getSubExpr());
704   OS << ")";
705 }
706
707 void StmtPrinter::VisitOffsetOfExpr(OffsetOfExpr *Node) {
708   OS << "__builtin_offsetof(";
709   OS << Node->getTypeSourceInfo()->getType().getAsString() << ", ";
710   bool PrintedSomething = false;
711   for (unsigned i = 0, n = Node->getNumComponents(); i < n; ++i) {
712     OffsetOfExpr::OffsetOfNode ON = Node->getComponent(i);
713     if (ON.getKind() == OffsetOfExpr::OffsetOfNode::Array) {
714       // Array node
715       OS << "[";
716       PrintExpr(Node->getIndexExpr(ON.getArrayExprIndex()));
717       OS << "]";
718       PrintedSomething = true;
719       continue;
720     }
721
722     // Skip implicit base indirections.
723     if (ON.getKind() == OffsetOfExpr::OffsetOfNode::Base)
724       continue;
725
726     // Field or identifier node.
727     IdentifierInfo *Id = ON.getFieldName();
728     if (!Id)
729       continue;
730     
731     if (PrintedSomething)
732       OS << ".";
733     else
734       PrintedSomething = true;
735     OS << Id->getName();    
736   }
737   OS << ")";
738 }
739
740 void StmtPrinter::VisitSizeOfAlignOfExpr(SizeOfAlignOfExpr *Node) {
741   OS << (Node->isSizeOf() ? "sizeof" : "__alignof");
742   if (Node->isArgumentType())
743     OS << "(" << Node->getArgumentType().getAsString() << ")";
744   else {
745     OS << " ";
746     PrintExpr(Node->getArgumentExpr());
747   }
748 }
749 void StmtPrinter::VisitArraySubscriptExpr(ArraySubscriptExpr *Node) {
750   PrintExpr(Node->getLHS());
751   OS << "[";
752   PrintExpr(Node->getRHS());
753   OS << "]";
754 }
755
756 void StmtPrinter::VisitCallExpr(CallExpr *Call) {
757   PrintExpr(Call->getCallee());
758   OS << "(";
759   for (unsigned i = 0, e = Call->getNumArgs(); i != e; ++i) {
760     if (isa<CXXDefaultArgExpr>(Call->getArg(i))) {
761       // Don't print any defaulted arguments
762       break;
763     }
764
765     if (i) OS << ", ";
766     PrintExpr(Call->getArg(i));
767   }
768   OS << ")";
769 }
770 void StmtPrinter::VisitMemberExpr(MemberExpr *Node) {
771   // FIXME: Suppress printing implicit bases (like "this")
772   PrintExpr(Node->getBase());
773   if (FieldDecl *FD = dyn_cast<FieldDecl>(Node->getMemberDecl()))
774     if (FD->isAnonymousStructOrUnion())
775       return;
776   OS << (Node->isArrow() ? "->" : ".");
777   if (NestedNameSpecifier *Qualifier = Node->getQualifier())
778     Qualifier->print(OS, Policy);
779
780   OS << Node->getMemberDecl();
781
782   if (Node->hasExplicitTemplateArgumentList())
783     OS << TemplateSpecializationType::PrintTemplateArgumentList(
784                                                     Node->getTemplateArgs(),
785                                                     Node->getNumTemplateArgs(),
786                                                                 Policy);
787 }
788 void StmtPrinter::VisitObjCIsaExpr(ObjCIsaExpr *Node) {
789   PrintExpr(Node->getBase());
790   OS << (Node->isArrow() ? "->isa" : ".isa");
791 }
792
793 void StmtPrinter::VisitExtVectorElementExpr(ExtVectorElementExpr *Node) {
794   PrintExpr(Node->getBase());
795   OS << ".";
796   OS << Node->getAccessor().getName();
797 }
798 void StmtPrinter::VisitCastExpr(CastExpr *) {
799   assert(0 && "CastExpr is an abstract class");
800 }
801 void StmtPrinter::VisitExplicitCastExpr(ExplicitCastExpr *) {
802   assert(0 && "ExplicitCastExpr is an abstract class");
803 }
804 void StmtPrinter::VisitCStyleCastExpr(CStyleCastExpr *Node) {
805   OS << "(" << Node->getType().getAsString() << ")";
806   PrintExpr(Node->getSubExpr());
807 }
808 void StmtPrinter::VisitCompoundLiteralExpr(CompoundLiteralExpr *Node) {
809   OS << "(" << Node->getType().getAsString() << ")";
810   PrintExpr(Node->getInitializer());
811 }
812 void StmtPrinter::VisitImplicitCastExpr(ImplicitCastExpr *Node) {
813   // No need to print anything, simply forward to the sub expression.
814   PrintExpr(Node->getSubExpr());
815 }
816 void StmtPrinter::VisitBinaryOperator(BinaryOperator *Node) {
817   PrintExpr(Node->getLHS());
818   OS << " " << BinaryOperator::getOpcodeStr(Node->getOpcode()) << " ";
819   PrintExpr(Node->getRHS());
820 }
821 void StmtPrinter::VisitCompoundAssignOperator(CompoundAssignOperator *Node) {
822   PrintExpr(Node->getLHS());
823   OS << " " << BinaryOperator::getOpcodeStr(Node->getOpcode()) << " ";
824   PrintExpr(Node->getRHS());
825 }
826 void StmtPrinter::VisitConditionalOperator(ConditionalOperator *Node) {
827   PrintExpr(Node->getCond());
828
829   if (Node->getLHS()) {
830     OS << " ? ";
831     PrintExpr(Node->getLHS());
832     OS << " : ";
833   }
834   else { // Handle GCC extension where LHS can be NULL.
835     OS << " ?: ";
836   }
837
838   PrintExpr(Node->getRHS());
839 }
840
841 // GNU extensions.
842
843 void StmtPrinter::VisitAddrLabelExpr(AddrLabelExpr *Node) {
844   OS << "&&" << Node->getLabel()->getName();
845 }
846
847 void StmtPrinter::VisitStmtExpr(StmtExpr *E) {
848   OS << "(";
849   PrintRawCompoundStmt(E->getSubStmt());
850   OS << ")";
851 }
852
853 void StmtPrinter::VisitTypesCompatibleExpr(TypesCompatibleExpr *Node) {
854   OS << "__builtin_types_compatible_p(";
855   OS << Node->getArgType1().getAsString() << ",";
856   OS << Node->getArgType2().getAsString() << ")";
857 }
858
859 void StmtPrinter::VisitChooseExpr(ChooseExpr *Node) {
860   OS << "__builtin_choose_expr(";
861   PrintExpr(Node->getCond());
862   OS << ", ";
863   PrintExpr(Node->getLHS());
864   OS << ", ";
865   PrintExpr(Node->getRHS());
866   OS << ")";
867 }
868
869 void StmtPrinter::VisitGNUNullExpr(GNUNullExpr *) {
870   OS << "__null";
871 }
872
873 void StmtPrinter::VisitShuffleVectorExpr(ShuffleVectorExpr *Node) {
874   OS << "__builtin_shufflevector(";
875   for (unsigned i = 0, e = Node->getNumSubExprs(); i != e; ++i) {
876     if (i) OS << ", ";
877     PrintExpr(Node->getExpr(i));
878   }
879   OS << ")";
880 }
881
882 void StmtPrinter::VisitInitListExpr(InitListExpr* Node) {
883   if (Node->getSyntacticForm()) {
884     Visit(Node->getSyntacticForm());
885     return;
886   }
887
888   OS << "{ ";
889   for (unsigned i = 0, e = Node->getNumInits(); i != e; ++i) {
890     if (i) OS << ", ";
891     if (Node->getInit(i))
892       PrintExpr(Node->getInit(i));
893     else
894       OS << "0";
895   }
896   OS << " }";
897 }
898
899 void StmtPrinter::VisitParenListExpr(ParenListExpr* Node) {
900   OS << "( ";
901   for (unsigned i = 0, e = Node->getNumExprs(); i != e; ++i) {
902     if (i) OS << ", ";
903     PrintExpr(Node->getExpr(i));
904   }
905   OS << " )";
906 }
907
908 void StmtPrinter::VisitDesignatedInitExpr(DesignatedInitExpr *Node) {
909   for (DesignatedInitExpr::designators_iterator D = Node->designators_begin(),
910                       DEnd = Node->designators_end();
911        D != DEnd; ++D) {
912     if (D->isFieldDesignator()) {
913       if (D->getDotLoc().isInvalid())
914         OS << D->getFieldName()->getName() << ":";
915       else
916         OS << "." << D->getFieldName()->getName();
917     } else {
918       OS << "[";
919       if (D->isArrayDesignator()) {
920         PrintExpr(Node->getArrayIndex(*D));
921       } else {
922         PrintExpr(Node->getArrayRangeStart(*D));
923         OS << " ... ";
924         PrintExpr(Node->getArrayRangeEnd(*D));
925       }
926       OS << "]";
927     }
928   }
929
930   OS << " = ";
931   PrintExpr(Node->getInit());
932 }
933
934 void StmtPrinter::VisitImplicitValueInitExpr(ImplicitValueInitExpr *Node) {
935   if (Policy.LangOpts.CPlusPlus)
936     OS << "/*implicit*/" << Node->getType().getAsString(Policy) << "()";
937   else {
938     OS << "/*implicit*/(" << Node->getType().getAsString(Policy) << ")";
939     if (Node->getType()->isRecordType())
940       OS << "{}";
941     else
942       OS << 0;
943   }
944 }
945
946 void StmtPrinter::VisitVAArgExpr(VAArgExpr *Node) {
947   OS << "__builtin_va_arg(";
948   PrintExpr(Node->getSubExpr());
949   OS << ", ";
950   OS << Node->getType().getAsString();
951   OS << ")";
952 }
953
954 // C++
955 void StmtPrinter::VisitCXXOperatorCallExpr(CXXOperatorCallExpr *Node) {
956   const char *OpStrings[NUM_OVERLOADED_OPERATORS] = {
957     "",
958 #define OVERLOADED_OPERATOR(Name,Spelling,Token,Unary,Binary,MemberOnly) \
959     Spelling,
960 #include "clang/Basic/OperatorKinds.def"
961   };
962
963   OverloadedOperatorKind Kind = Node->getOperator();
964   if (Kind == OO_PlusPlus || Kind == OO_MinusMinus) {
965     if (Node->getNumArgs() == 1) {
966       OS << OpStrings[Kind] << ' ';
967       PrintExpr(Node->getArg(0));
968     } else {
969       PrintExpr(Node->getArg(0));
970       OS << ' ' << OpStrings[Kind];
971     }
972   } else if (Kind == OO_Call) {
973     PrintExpr(Node->getArg(0));
974     OS << '(';
975     for (unsigned ArgIdx = 1; ArgIdx < Node->getNumArgs(); ++ArgIdx) {
976       if (ArgIdx > 1)
977         OS << ", ";
978       if (!isa<CXXDefaultArgExpr>(Node->getArg(ArgIdx)))
979         PrintExpr(Node->getArg(ArgIdx));
980     }
981     OS << ')';
982   } else if (Kind == OO_Subscript) {
983     PrintExpr(Node->getArg(0));
984     OS << '[';
985     PrintExpr(Node->getArg(1));
986     OS << ']';
987   } else if (Node->getNumArgs() == 1) {
988     OS << OpStrings[Kind] << ' ';
989     PrintExpr(Node->getArg(0));
990   } else if (Node->getNumArgs() == 2) {
991     PrintExpr(Node->getArg(0));
992     OS << ' ' << OpStrings[Kind] << ' ';
993     PrintExpr(Node->getArg(1));
994   } else {
995     assert(false && "unknown overloaded operator");
996   }
997 }
998
999 void StmtPrinter::VisitCXXMemberCallExpr(CXXMemberCallExpr *Node) {
1000   VisitCallExpr(cast<CallExpr>(Node));
1001 }
1002
1003 void StmtPrinter::VisitCXXNamedCastExpr(CXXNamedCastExpr *Node) {
1004   OS << Node->getCastName() << '<';
1005   OS << Node->getTypeAsWritten().getAsString() << ">(";
1006   PrintExpr(Node->getSubExpr());
1007   OS << ")";
1008 }
1009
1010 void StmtPrinter::VisitCXXStaticCastExpr(CXXStaticCastExpr *Node) {
1011   VisitCXXNamedCastExpr(Node);
1012 }
1013
1014 void StmtPrinter::VisitCXXDynamicCastExpr(CXXDynamicCastExpr *Node) {
1015   VisitCXXNamedCastExpr(Node);
1016 }
1017
1018 void StmtPrinter::VisitCXXReinterpretCastExpr(CXXReinterpretCastExpr *Node) {
1019   VisitCXXNamedCastExpr(Node);
1020 }
1021
1022 void StmtPrinter::VisitCXXConstCastExpr(CXXConstCastExpr *Node) {
1023   VisitCXXNamedCastExpr(Node);
1024 }
1025
1026 void StmtPrinter::VisitCXXTypeidExpr(CXXTypeidExpr *Node) {
1027   OS << "typeid(";
1028   if (Node->isTypeOperand()) {
1029     OS << Node->getTypeOperand().getAsString();
1030   } else {
1031     PrintExpr(Node->getExprOperand());
1032   }
1033   OS << ")";
1034 }
1035
1036 void StmtPrinter::VisitCXXBoolLiteralExpr(CXXBoolLiteralExpr *Node) {
1037   OS << (Node->getValue() ? "true" : "false");
1038 }
1039
1040 void StmtPrinter::VisitCXXNullPtrLiteralExpr(CXXNullPtrLiteralExpr *Node) {
1041   OS << "nullptr";
1042 }
1043
1044 void StmtPrinter::VisitCXXThisExpr(CXXThisExpr *Node) {
1045   OS << "this";
1046 }
1047
1048 void StmtPrinter::VisitCXXThrowExpr(CXXThrowExpr *Node) {
1049   if (Node->getSubExpr() == 0)
1050     OS << "throw";
1051   else {
1052     OS << "throw ";
1053     PrintExpr(Node->getSubExpr());
1054   }
1055 }
1056
1057 void StmtPrinter::VisitCXXDefaultArgExpr(CXXDefaultArgExpr *Node) {
1058   // Nothing to print: we picked up the default argument
1059 }
1060
1061 void StmtPrinter::VisitCXXFunctionalCastExpr(CXXFunctionalCastExpr *Node) {
1062   OS << Node->getType().getAsString();
1063   OS << "(";
1064   PrintExpr(Node->getSubExpr());
1065   OS << ")";
1066 }
1067
1068 void StmtPrinter::VisitCXXBindTemporaryExpr(CXXBindTemporaryExpr *Node) {
1069   PrintExpr(Node->getSubExpr());
1070 }
1071
1072 void StmtPrinter::VisitCXXBindReferenceExpr(CXXBindReferenceExpr *Node) {
1073   PrintExpr(Node->getSubExpr());
1074 }
1075
1076 void StmtPrinter::VisitCXXTemporaryObjectExpr(CXXTemporaryObjectExpr *Node) {
1077   OS << Node->getType().getAsString();
1078   OS << "(";
1079   for (CXXTemporaryObjectExpr::arg_iterator Arg = Node->arg_begin(),
1080                                          ArgEnd = Node->arg_end();
1081        Arg != ArgEnd; ++Arg) {
1082     if (Arg != Node->arg_begin())
1083       OS << ", ";
1084     PrintExpr(*Arg);
1085   }
1086   OS << ")";
1087 }
1088
1089 void StmtPrinter::VisitCXXZeroInitValueExpr(CXXZeroInitValueExpr *Node) {
1090   OS << Node->getType().getAsString() << "()";
1091 }
1092
1093 void StmtPrinter::VisitCXXNewExpr(CXXNewExpr *E) {
1094   if (E->isGlobalNew())
1095     OS << "::";
1096   OS << "new ";
1097   unsigned NumPlace = E->getNumPlacementArgs();
1098   if (NumPlace > 0) {
1099     OS << "(";
1100     PrintExpr(E->getPlacementArg(0));
1101     for (unsigned i = 1; i < NumPlace; ++i) {
1102       OS << ", ";
1103       PrintExpr(E->getPlacementArg(i));
1104     }
1105     OS << ") ";
1106   }
1107   if (E->isParenTypeId())
1108     OS << "(";
1109   std::string TypeS;
1110   if (Expr *Size = E->getArraySize()) {
1111     llvm::raw_string_ostream s(TypeS);
1112     Size->printPretty(s, Context, Helper, Policy);
1113     s.flush();
1114     TypeS = "[" + TypeS + "]";
1115   }
1116   E->getAllocatedType().getAsStringInternal(TypeS, Policy);
1117   OS << TypeS;
1118   if (E->isParenTypeId())
1119     OS << ")";
1120
1121   if (E->hasInitializer()) {
1122     OS << "(";
1123     unsigned NumCons = E->getNumConstructorArgs();
1124     if (NumCons > 0) {
1125       PrintExpr(E->getConstructorArg(0));
1126       for (unsigned i = 1; i < NumCons; ++i) {
1127         OS << ", ";
1128         PrintExpr(E->getConstructorArg(i));
1129       }
1130     }
1131     OS << ")";
1132   }
1133 }
1134
1135 void StmtPrinter::VisitCXXDeleteExpr(CXXDeleteExpr *E) {
1136   if (E->isGlobalDelete())
1137     OS << "::";
1138   OS << "delete ";
1139   if (E->isArrayForm())
1140     OS << "[] ";
1141   PrintExpr(E->getArgument());
1142 }
1143
1144 void StmtPrinter::VisitCXXPseudoDestructorExpr(CXXPseudoDestructorExpr *E) {
1145   PrintExpr(E->getBase());
1146   if (E->isArrow())
1147     OS << "->";
1148   else
1149     OS << '.';
1150   if (E->getQualifier())
1151     E->getQualifier()->print(OS, Policy);
1152
1153   std::string TypeS;
1154   if (IdentifierInfo *II = E->getDestroyedTypeIdentifier())
1155     OS << II->getName();
1156   else
1157     E->getDestroyedType().getAsStringInternal(TypeS, Policy);
1158   OS << TypeS;
1159 }
1160
1161 void StmtPrinter::VisitCXXConstructExpr(CXXConstructExpr *E) {
1162   // FIXME. For now we just print a trivial constructor call expression,
1163   // constructing its first argument object.
1164   if (E->getNumArgs() == 1) {
1165     CXXConstructorDecl *CD = E->getConstructor();
1166     if (CD->isTrivial())
1167       PrintExpr(E->getArg(0));
1168   }
1169   // Nothing to print.
1170 }
1171
1172 void StmtPrinter::VisitCXXExprWithTemporaries(CXXExprWithTemporaries *E) {
1173   // Just forward to the sub expression.
1174   PrintExpr(E->getSubExpr());
1175 }
1176
1177 void
1178 StmtPrinter::VisitCXXUnresolvedConstructExpr(
1179                                            CXXUnresolvedConstructExpr *Node) {
1180   OS << Node->getTypeAsWritten().getAsString();
1181   OS << "(";
1182   for (CXXUnresolvedConstructExpr::arg_iterator Arg = Node->arg_begin(),
1183                                              ArgEnd = Node->arg_end();
1184        Arg != ArgEnd; ++Arg) {
1185     if (Arg != Node->arg_begin())
1186       OS << ", ";
1187     PrintExpr(*Arg);
1188   }
1189   OS << ")";
1190 }
1191
1192 void StmtPrinter::VisitCXXDependentScopeMemberExpr(
1193                                          CXXDependentScopeMemberExpr *Node) {
1194   if (!Node->isImplicitAccess()) {
1195     PrintExpr(Node->getBase());
1196     OS << (Node->isArrow() ? "->" : ".");
1197   }
1198   if (NestedNameSpecifier *Qualifier = Node->getQualifier())
1199     Qualifier->print(OS, Policy);
1200   else if (Node->hasExplicitTemplateArgs())
1201     // FIXME: Track use of "template" keyword explicitly?
1202     OS << "template ";
1203
1204   OS << Node->getMember().getAsString();
1205
1206   if (Node->hasExplicitTemplateArgs()) {
1207     OS << TemplateSpecializationType::PrintTemplateArgumentList(
1208                                                     Node->getTemplateArgs(),
1209                                                     Node->getNumTemplateArgs(),
1210                                                     Policy);
1211   }
1212 }
1213
1214 void StmtPrinter::VisitUnresolvedMemberExpr(UnresolvedMemberExpr *Node) {
1215   if (!Node->isImplicitAccess()) {
1216     PrintExpr(Node->getBase());
1217     OS << (Node->isArrow() ? "->" : ".");
1218   }
1219   if (NestedNameSpecifier *Qualifier = Node->getQualifier())
1220     Qualifier->print(OS, Policy);
1221
1222   // FIXME: this might originally have been written with 'template'
1223
1224   OS << Node->getMemberName().getAsString();
1225
1226   if (Node->hasExplicitTemplateArgs()) {
1227     OS << TemplateSpecializationType::PrintTemplateArgumentList(
1228                                                     Node->getTemplateArgs(),
1229                                                     Node->getNumTemplateArgs(),
1230                                                     Policy);
1231   }
1232 }
1233
1234 static const char *getTypeTraitName(UnaryTypeTrait UTT) {
1235   switch (UTT) {
1236   default: assert(false && "Unknown type trait");
1237   case UTT_HasNothrowAssign:      return "__has_nothrow_assign";
1238   case UTT_HasNothrowCopy:        return "__has_nothrow_copy";
1239   case UTT_HasNothrowConstructor: return "__has_nothrow_constructor";
1240   case UTT_HasTrivialAssign:      return "__has_trivial_assign";
1241   case UTT_HasTrivialCopy:        return "__has_trivial_copy";
1242   case UTT_HasTrivialConstructor: return "__has_trivial_constructor";
1243   case UTT_HasTrivialDestructor:  return "__has_trivial_destructor";
1244   case UTT_HasVirtualDestructor:  return "__has_virtual_destructor";
1245   case UTT_IsAbstract:            return "__is_abstract";
1246   case UTT_IsClass:               return "__is_class";
1247   case UTT_IsEmpty:               return "__is_empty";
1248   case UTT_IsEnum:                return "__is_enum";
1249   case UTT_IsPOD:                 return "__is_pod";
1250   case UTT_IsPolymorphic:         return "__is_polymorphic";
1251   case UTT_IsUnion:               return "__is_union";
1252   }
1253 }
1254
1255 void StmtPrinter::VisitUnaryTypeTraitExpr(UnaryTypeTraitExpr *E) {
1256   OS << getTypeTraitName(E->getTrait()) << "("
1257      << E->getQueriedType().getAsString() << ")";
1258 }
1259
1260 // Obj-C
1261
1262 void StmtPrinter::VisitObjCStringLiteral(ObjCStringLiteral *Node) {
1263   OS << "@";
1264   VisitStringLiteral(Node->getString());
1265 }
1266
1267 void StmtPrinter::VisitObjCEncodeExpr(ObjCEncodeExpr *Node) {
1268   OS << "@encode(" << Node->getEncodedType().getAsString() << ')';
1269 }
1270
1271 void StmtPrinter::VisitObjCSelectorExpr(ObjCSelectorExpr *Node) {
1272   OS << "@selector(" << Node->getSelector().getAsString() << ')';
1273 }
1274
1275 void StmtPrinter::VisitObjCProtocolExpr(ObjCProtocolExpr *Node) {
1276   OS << "@protocol(" << Node->getProtocol() << ')';
1277 }
1278
1279 void StmtPrinter::VisitObjCMessageExpr(ObjCMessageExpr *Mess) {
1280   OS << "[";
1281   switch (Mess->getReceiverKind()) {
1282   case ObjCMessageExpr::Instance:
1283     PrintExpr(Mess->getInstanceReceiver());
1284     break;
1285
1286   case ObjCMessageExpr::Class:
1287     OS << Mess->getClassReceiver().getAsString(Policy);
1288     break;
1289
1290   case ObjCMessageExpr::SuperInstance:
1291   case ObjCMessageExpr::SuperClass:
1292     OS << "Super";
1293     break;
1294   }
1295
1296   OS << ' ';
1297   Selector selector = Mess->getSelector();
1298   if (selector.isUnarySelector()) {
1299     OS << selector.getIdentifierInfoForSlot(0)->getName();
1300   } else {
1301     for (unsigned i = 0, e = Mess->getNumArgs(); i != e; ++i) {
1302       if (i < selector.getNumArgs()) {
1303         if (i > 0) OS << ' ';
1304         if (selector.getIdentifierInfoForSlot(i))
1305           OS << selector.getIdentifierInfoForSlot(i)->getName() << ':';
1306         else
1307            OS << ":";
1308       }
1309       else OS << ", "; // Handle variadic methods.
1310
1311       PrintExpr(Mess->getArg(i));
1312     }
1313   }
1314   OS << "]";
1315 }
1316
1317 void StmtPrinter::VisitObjCSuperExpr(ObjCSuperExpr *) {
1318   OS << "super";
1319 }
1320
1321 void StmtPrinter::VisitBlockExpr(BlockExpr *Node) {
1322   BlockDecl *BD = Node->getBlockDecl();
1323   OS << "^";
1324
1325   const FunctionType *AFT = Node->getFunctionType();
1326
1327   if (isa<FunctionNoProtoType>(AFT)) {
1328     OS << "()";
1329   } else if (!BD->param_empty() || cast<FunctionProtoType>(AFT)->isVariadic()) {
1330     OS << '(';
1331     std::string ParamStr;
1332     for (BlockDecl::param_iterator AI = BD->param_begin(),
1333          E = BD->param_end(); AI != E; ++AI) {
1334       if (AI != BD->param_begin()) OS << ", ";
1335       ParamStr = (*AI)->getNameAsString();
1336       (*AI)->getType().getAsStringInternal(ParamStr, Policy);
1337       OS << ParamStr;
1338     }
1339
1340     const FunctionProtoType *FT = cast<FunctionProtoType>(AFT);
1341     if (FT->isVariadic()) {
1342       if (!BD->param_empty()) OS << ", ";
1343       OS << "...";
1344     }
1345     OS << ')';
1346   }
1347 }
1348
1349 void StmtPrinter::VisitBlockDeclRefExpr(BlockDeclRefExpr *Node) {
1350   OS << Node->getDecl();
1351 }
1352 //===----------------------------------------------------------------------===//
1353 // Stmt method implementations
1354 //===----------------------------------------------------------------------===//
1355
1356 void Stmt::dumpPretty(ASTContext& Context) const {
1357   printPretty(llvm::errs(), Context, 0,
1358               PrintingPolicy(Context.getLangOptions()));
1359 }
1360
1361 void Stmt::printPretty(llvm::raw_ostream &OS, ASTContext& Context,
1362                        PrinterHelper* Helper,
1363                        const PrintingPolicy &Policy,
1364                        unsigned Indentation) const {
1365   if (this == 0) {
1366     OS << "<NULL>";
1367     return;
1368   }
1369
1370   if (Policy.Dump && &Context) {
1371     dump(Context.getSourceManager());
1372     return;
1373   }
1374
1375   StmtPrinter P(OS, Context, Helper, Policy, Indentation);
1376   P.Visit(const_cast<Stmt*>(this));
1377 }
1378
1379 //===----------------------------------------------------------------------===//
1380 // PrinterHelper
1381 //===----------------------------------------------------------------------===//
1382
1383 // Implement virtual destructor.
1384 PrinterHelper::~PrinterHelper() {}