Move Decl and DeclContext implementations into a new DeclBase.cpp file.

git-svn-id: https://llvm.org/svn/llvm-project/cfe/trunk@51936 91177308-0d34-0410-b5e6-96231b3b80d8
diff --git a/lib/AST/Decl.cpp b/lib/AST/Decl.cpp
index 8d9913b..8d68a58 100644
--- a/lib/AST/Decl.cpp
+++ b/lib/AST/Decl.cpp
@@ -7,212 +7,16 @@
 //
 //===----------------------------------------------------------------------===//
 //
-// This file implements the Decl class and subclasses.
+// This file implements the Decl subclasses.
 //
 //===----------------------------------------------------------------------===//
 
 #include "clang/AST/Decl.h"
 #include "clang/AST/ASTContext.h"
-#include "clang/AST/Attr.h"
-#include "clang/Basic/IdentifierTable.h"
-#include "llvm/ADT/DenseMap.h"
 
 using namespace clang;
 
 //===----------------------------------------------------------------------===//
-//  Statistics
-//===----------------------------------------------------------------------===//
-
-// temporary statistics gathering
-static unsigned nFuncs = 0;
-static unsigned nVars = 0;
-static unsigned nParmVars = 0;
-static unsigned nSUC = 0;
-static unsigned nEnumConst = 0;
-static unsigned nEnumDecls = 0;
-static unsigned nNamespaces = 0;
-static unsigned nTypedef = 0;
-static unsigned nFieldDecls = 0;
-static unsigned nInterfaceDecls = 0;
-static unsigned nClassDecls = 0;
-static unsigned nMethodDecls = 0;
-static unsigned nProtocolDecls = 0;
-static unsigned nForwardProtocolDecls = 0;
-static unsigned nCategoryDecls = 0;
-static unsigned nIvarDecls = 0;
-static unsigned nObjCImplementationDecls = 0;
-static unsigned nObjCCategoryImpl = 0;
-static unsigned nObjCCompatibleAlias = 0;
-static unsigned nObjCPropertyDecl = 0;
-static unsigned nObjCPropertyImplDecl = 0;
-static unsigned nLinkageSpecDecl = 0;
-static unsigned nFileScopeAsmDecl = 0;
-
-static bool StatSwitch = false;
-
-// This keeps track of all decl attributes. Since so few decls have attrs, we
-// keep them in a hash map instead of wasting space in the Decl class.
-typedef llvm::DenseMap<const Decl*, Attr*> DeclAttrMapTy;
-
-static DeclAttrMapTy *DeclAttrs = 0;
-
-const char *Decl::getDeclKindName() const {
-  switch (DeclKind) {
-  default: assert(0 && "Unknown decl kind!");
-  case Namespace:           return "Namespace";
-  case Typedef:             return "Typedef";
-  case Function:            return "Function";
-  case Var:                 return "Var";
-  case ParmVar:             return "ParmVar";
-  case EnumConstant:        return "EnumConstant";
-  case ObjCIvar:            return "ObjCIvar";
-  case ObjCInterface:       return "ObjCInterface";
-  case ObjCClass:           return "ObjCClass";
-  case ObjCMethod:          return "ObjCMethod";
-  case ObjCProtocol:        return "ObjCProtocol";
-  case ObjCForwardProtocol: return "ObjCForwardProtocol"; 
-  case Struct:              return "Struct";
-  case Union:               return "Union";
-  case Class:               return "Class";
-  case Enum:                return "Enum";
-  }
-}
-
-bool Decl::CollectingStats(bool Enable) {
-  if (Enable)
-    StatSwitch = true;
-  return StatSwitch;
-}
-
-void Decl::PrintStats() {
-  fprintf(stderr, "*** Decl Stats:\n");
-  fprintf(stderr, "  %d decls total.\n", 
-          int(nFuncs+nVars+nParmVars+nFieldDecls+nSUC+
-              nEnumDecls+nEnumConst+nTypedef+nInterfaceDecls+nClassDecls+
-              nMethodDecls+nProtocolDecls+nCategoryDecls+nIvarDecls+
-              nNamespaces));
-  fprintf(stderr, "    %d namespace decls, %d each (%d bytes)\n", 
-          nNamespaces, (int)sizeof(NamespaceDecl), 
-          int(nNamespaces*sizeof(NamespaceDecl)));
-  fprintf(stderr, "    %d function decls, %d each (%d bytes)\n", 
-          nFuncs, (int)sizeof(FunctionDecl), int(nFuncs*sizeof(FunctionDecl)));
-  fprintf(stderr, "    %d variable decls, %d each (%d bytes)\n", 
-          nVars, (int)sizeof(VarDecl), 
-          int(nVars*sizeof(VarDecl)));
-  fprintf(stderr, "    %d parameter variable decls, %d each (%d bytes)\n", 
-          nParmVars, (int)sizeof(ParmVarDecl),
-          int(nParmVars*sizeof(ParmVarDecl)));
-  fprintf(stderr, "    %d field decls, %d each (%d bytes)\n", 
-          nFieldDecls, (int)sizeof(FieldDecl),
-          int(nFieldDecls*sizeof(FieldDecl)));
-  fprintf(stderr, "    %d struct/union/class decls, %d each (%d bytes)\n", 
-          nSUC, (int)sizeof(RecordDecl),
-          int(nSUC*sizeof(RecordDecl)));
-  fprintf(stderr, "    %d enum decls, %d each (%d bytes)\n", 
-          nEnumDecls, (int)sizeof(EnumDecl), 
-          int(nEnumDecls*sizeof(EnumDecl)));
-  fprintf(stderr, "    %d enum constant decls, %d each (%d bytes)\n", 
-          nEnumConst, (int)sizeof(EnumConstantDecl),
-          int(nEnumConst*sizeof(EnumConstantDecl)));
-  fprintf(stderr, "    %d typedef decls, %d each (%d bytes)\n", 
-          nTypedef, (int)sizeof(TypedefDecl),int(nTypedef*sizeof(TypedefDecl)));
-  // Objective-C decls...
-  fprintf(stderr, "    %d interface decls, %d each (%d bytes)\n", 
-          nInterfaceDecls, (int)sizeof(ObjCInterfaceDecl),
-          int(nInterfaceDecls*sizeof(ObjCInterfaceDecl)));
-  fprintf(stderr, "    %d instance variable decls, %d each (%d bytes)\n", 
-          nIvarDecls, (int)sizeof(ObjCIvarDecl),
-          int(nIvarDecls*sizeof(ObjCIvarDecl)));
-  fprintf(stderr, "    %d class decls, %d each (%d bytes)\n", 
-          nClassDecls, (int)sizeof(ObjCClassDecl),
-          int(nClassDecls*sizeof(ObjCClassDecl)));
-  fprintf(stderr, "    %d method decls, %d each (%d bytes)\n", 
-          nMethodDecls, (int)sizeof(ObjCMethodDecl),
-          int(nMethodDecls*sizeof(ObjCMethodDecl)));
-  fprintf(stderr, "    %d protocol decls, %d each (%d bytes)\n", 
-          nProtocolDecls, (int)sizeof(ObjCProtocolDecl),
-          int(nProtocolDecls*sizeof(ObjCProtocolDecl)));
-  fprintf(stderr, "    %d forward protocol decls, %d each (%d bytes)\n", 
-          nForwardProtocolDecls, (int)sizeof(ObjCForwardProtocolDecl),
-          int(nForwardProtocolDecls*sizeof(ObjCForwardProtocolDecl)));
-  fprintf(stderr, "    %d category decls, %d each (%d bytes)\n", 
-          nCategoryDecls, (int)sizeof(ObjCCategoryDecl),
-          int(nCategoryDecls*sizeof(ObjCCategoryDecl)));
-
-  fprintf(stderr, "    %d class implementation decls, %d each (%d bytes)\n", 
-          nObjCImplementationDecls, (int)sizeof(ObjCImplementationDecl),
-          int(nObjCImplementationDecls*sizeof(ObjCImplementationDecl)));
-
-  fprintf(stderr, "    %d class implementation decls, %d each (%d bytes)\n", 
-          nObjCCategoryImpl, (int)sizeof(ObjCCategoryImplDecl),
-          int(nObjCCategoryImpl*sizeof(ObjCCategoryImplDecl)));
-
-  fprintf(stderr, "    %d compatibility alias decls, %d each (%d bytes)\n", 
-          nObjCCompatibleAlias, (int)sizeof(ObjCCompatibleAliasDecl),
-          int(nObjCCompatibleAlias*sizeof(ObjCCompatibleAliasDecl)));
-  
-  fprintf(stderr, "    %d property decls, %d each (%d bytes)\n", 
-          nObjCPropertyDecl, (int)sizeof(ObjCPropertyDecl),
-          int(nObjCPropertyDecl*sizeof(ObjCPropertyDecl)));
-  
-  fprintf(stderr, "    %d property implementation decls, %d each (%d bytes)\n", 
-          nObjCPropertyImplDecl, (int)sizeof(ObjCPropertyImplDecl),
-          int(nObjCPropertyImplDecl*sizeof(ObjCPropertyImplDecl)));
-  
-  fprintf(stderr, "Total bytes = %d\n", 
-          int(nFuncs*sizeof(FunctionDecl)+
-              nVars*sizeof(VarDecl)+nParmVars*sizeof(ParmVarDecl)+
-              nFieldDecls*sizeof(FieldDecl)+nSUC*sizeof(RecordDecl)+
-              nEnumDecls*sizeof(EnumDecl)+nEnumConst*sizeof(EnumConstantDecl)+
-              nTypedef*sizeof(TypedefDecl)+
-              nInterfaceDecls*sizeof(ObjCInterfaceDecl)+
-              nIvarDecls*sizeof(ObjCIvarDecl)+
-              nClassDecls*sizeof(ObjCClassDecl)+
-              nMethodDecls*sizeof(ObjCMethodDecl)+
-              nProtocolDecls*sizeof(ObjCProtocolDecl)+
-              nForwardProtocolDecls*sizeof(ObjCForwardProtocolDecl)+
-              nCategoryDecls*sizeof(ObjCCategoryDecl)+
-              nObjCImplementationDecls*sizeof(ObjCImplementationDecl)+
-              nObjCCategoryImpl*sizeof(ObjCCategoryImplDecl)+
-              nObjCCompatibleAlias*sizeof(ObjCCompatibleAliasDecl)+
-              nObjCPropertyDecl*sizeof(ObjCPropertyDecl)+
-              nObjCPropertyImplDecl*sizeof(ObjCPropertyImplDecl)+
-              nLinkageSpecDecl*sizeof(LinkageSpecDecl)+
-              nFileScopeAsmDecl*sizeof(FileScopeAsmDecl)+
-              nNamespaces*sizeof(NamespaceDecl)));
-    
-}
-
-void Decl::addDeclKind(Kind k) {
-  switch (k) {
-  case Namespace:           nNamespaces++; break;
-  case Typedef:             nTypedef++; break;
-  case Function:            nFuncs++; break;
-  case Var:                 nVars++; break;
-  case ParmVar:             nParmVars++; break;
-  case EnumConstant:        nEnumConst++; break;
-  case Field:               nFieldDecls++; break;
-  case Struct: case Union: case Class: nSUC++; break;
-  case Enum:                nEnumDecls++; break;
-  case ObjCInterface:       nInterfaceDecls++; break;
-  case ObjCClass:           nClassDecls++; break;
-  case ObjCMethod:          nMethodDecls++; break;
-  case ObjCProtocol:        nProtocolDecls++; break;
-  case ObjCForwardProtocol: nForwardProtocolDecls++; break;
-  case ObjCCategory:        nCategoryDecls++; break;
-  case ObjCIvar:            nIvarDecls++; break;
-  case ObjCImplementation:  nObjCImplementationDecls++; break;
-  case ObjCCategoryImpl:    nObjCCategoryImpl++; break;
-  case ObjCCompatibleAlias: nObjCCompatibleAlias++; break;
-  case ObjCProperty:        nObjCPropertyDecl++; break;
-  case ObjCPropertyImpl:    nObjCPropertyImplDecl++; break;
-  case LinkageSpec:         nLinkageSpecDecl++; break;
-  case FileScopeAsm:        nFileScopeAsmDecl++; break;
-  case TranslationUnit:     break;
-  }
-}
-
-//===----------------------------------------------------------------------===//
 // Decl Allocation/Deallocation Method Implementations
 //===----------------------------------------------------------------------===//
  
@@ -325,121 +129,6 @@
 }
 
 //===----------------------------------------------------------------------===//
-// Decl Implementation
-//===----------------------------------------------------------------------===//
-
-// Out-of-line virtual method providing a home for Decl.
-Decl::~Decl() {
-  if (!HasAttrs)
-    return;
-  
-  DeclAttrMapTy::iterator it = DeclAttrs->find(this);
-  assert(it != DeclAttrs->end() && "No attrs found but HasAttrs is true!");
-
-  // release attributes.
-  delete it->second;
-  invalidateAttrs();
-}
-
-void Decl::addAttr(Attr *NewAttr) {
-  if (!DeclAttrs)
-    DeclAttrs = new DeclAttrMapTy();
-  
-  Attr *&ExistingAttr = (*DeclAttrs)[this];
-
-  NewAttr->setNext(ExistingAttr);
-  ExistingAttr = NewAttr;
-  
-  HasAttrs = true;
-}
-
-void Decl::invalidateAttrs() {
-  if (!HasAttrs) return;
-
-  HasAttrs = false;
-  (*DeclAttrs)[this] = 0;
-  DeclAttrs->erase(this);
-
-  if (DeclAttrs->empty()) {
-    delete DeclAttrs;
-    DeclAttrs = 0;
-  }
-}
-
-const Attr *Decl::getAttrs() const {
-  if (!HasAttrs)
-    return 0;
-  
-  return (*DeclAttrs)[this];
-}
-
-void Decl::swapAttrs(Decl *RHS) {
-  bool HasLHSAttr = this->HasAttrs;
-  bool HasRHSAttr = RHS->HasAttrs;
-  
-  // Usually, neither decl has attrs, nothing to do.
-  if (!HasLHSAttr && !HasRHSAttr) return;
-  
-  // If 'this' has no attrs, swap the other way.
-  if (!HasLHSAttr)
-    return RHS->swapAttrs(this);
-  
-  // Handle the case when both decls have attrs.
-  if (HasRHSAttr) {
-    std::swap((*DeclAttrs)[this], (*DeclAttrs)[RHS]);
-    return;
-  }
-  
-  // Otherwise, LHS has an attr and RHS doesn't.
-  (*DeclAttrs)[RHS] = (*DeclAttrs)[this];
-  (*DeclAttrs).erase(this);
-  this->HasAttrs = false;
-  RHS->HasAttrs = true;
-}
-
-
-void Decl::Destroy(ASTContext& C) {
-
-  if (ScopedDecl* SD = dyn_cast<ScopedDecl>(this)) {    
-
-    // Observe the unrolled recursion.  By setting N->NextDeclarator = 0x0
-    // within the loop, only the Destroy method for the first ScopedDecl
-    // will deallocate all of the ScopedDecls in a chain.
-    
-    ScopedDecl* N = SD->getNextDeclarator();
-    
-    while (N) {
-      ScopedDecl* Tmp = N->getNextDeclarator();
-      N->NextDeclarator = 0x0;
-      N->Destroy(C);
-      N = Tmp;
-    }
-  }  
-  
-  this->~Decl();
-  C.getAllocator().Deallocate((void *)this);
-}
-
-//===----------------------------------------------------------------------===//
-// DeclContext Implementation
-//===----------------------------------------------------------------------===//
-
-DeclContext *DeclContext::getParent() const {
-  if (ScopedDecl *SD = dyn_cast<ScopedDecl>(this))
-    return SD->getDeclContext();
-  else
-    return NULL;
-}
-
-Decl *DeclContext::ToDecl (const DeclContext *D) {
-  return CastTo<Decl>(D);
-}
-
-DeclContext *DeclContext::FromDecl (const Decl *D) {
-  return CastTo<DeclContext>(D);
-}
-
-//===----------------------------------------------------------------------===//
 // NamedDecl Implementation
 //===----------------------------------------------------------------------===//
 
diff --git a/lib/AST/DeclBase.cpp b/lib/AST/DeclBase.cpp
new file mode 100644
index 0000000..fce1a3f
--- /dev/null
+++ b/lib/AST/DeclBase.cpp
@@ -0,0 +1,325 @@
+//===--- DeclBase.cpp - Declaration AST Node Implementation ---------------===//

+//

+//                     The LLVM Compiler Infrastructure

+//

+// This file is distributed under the University of Illinois Open Source

+// License. See LICENSE.TXT for details.

+//

+//===----------------------------------------------------------------------===//

+//

+// This file implements the Decl and DeclContext classes.

+//

+//===----------------------------------------------------------------------===//

+

+#include "clang/AST/DeclBase.h"

+#include "clang/AST/ASTContext.h"

+#include "llvm/ADT/DenseMap.h"

+using namespace clang;

+

+//===----------------------------------------------------------------------===//

+//  Statistics

+//===----------------------------------------------------------------------===//

+

+// temporary statistics gathering

+static unsigned nFuncs = 0;

+static unsigned nVars = 0;

+static unsigned nParmVars = 0;

+static unsigned nSUC = 0;

+static unsigned nEnumConst = 0;

+static unsigned nEnumDecls = 0;

+static unsigned nNamespaces = 0;

+static unsigned nTypedef = 0;

+static unsigned nFieldDecls = 0;

+static unsigned nInterfaceDecls = 0;

+static unsigned nClassDecls = 0;

+static unsigned nMethodDecls = 0;

+static unsigned nProtocolDecls = 0;

+static unsigned nForwardProtocolDecls = 0;

+static unsigned nCategoryDecls = 0;

+static unsigned nIvarDecls = 0;

+static unsigned nObjCImplementationDecls = 0;

+static unsigned nObjCCategoryImpl = 0;

+static unsigned nObjCCompatibleAlias = 0;

+static unsigned nObjCPropertyDecl = 0;

+static unsigned nObjCPropertyImplDecl = 0;

+static unsigned nLinkageSpecDecl = 0;

+static unsigned nFileScopeAsmDecl = 0;

+

+static bool StatSwitch = false;

+

+// This keeps track of all decl attributes. Since so few decls have attrs, we

+// keep them in a hash map instead of wasting space in the Decl class.

+typedef llvm::DenseMap<const Decl*, Attr*> DeclAttrMapTy;

+

+static DeclAttrMapTy *DeclAttrs = 0;

+

+const char *Decl::getDeclKindName() const {

+  switch (DeclKind) {

+  default: assert(0 && "Unknown decl kind!");

+  case Namespace:           return "Namespace";

+  case Typedef:             return "Typedef";

+  case Function:            return "Function";

+  case Var:                 return "Var";

+  case ParmVar:             return "ParmVar";

+  case EnumConstant:        return "EnumConstant";

+  case ObjCIvar:            return "ObjCIvar";

+  case ObjCInterface:       return "ObjCInterface";

+  case ObjCClass:           return "ObjCClass";

+  case ObjCMethod:          return "ObjCMethod";

+  case ObjCProtocol:        return "ObjCProtocol";

+  case ObjCForwardProtocol: return "ObjCForwardProtocol"; 

+  case Struct:              return "Struct";

+  case Union:               return "Union";

+  case Class:               return "Class";

+  case Enum:                return "Enum";

+  }

+}

+

+bool Decl::CollectingStats(bool Enable) {

+  if (Enable)

+    StatSwitch = true;

+  return StatSwitch;

+}

+

+void Decl::PrintStats() {

+  fprintf(stderr, "*** Decl Stats:\n");

+  fprintf(stderr, "  %d decls total.\n", 

+          int(nFuncs+nVars+nParmVars+nFieldDecls+nSUC+

+              nEnumDecls+nEnumConst+nTypedef+nInterfaceDecls+nClassDecls+

+              nMethodDecls+nProtocolDecls+nCategoryDecls+nIvarDecls+

+              nNamespaces));

+  fprintf(stderr, "    %d namespace decls, %d each (%d bytes)\n", 

+          nNamespaces, (int)sizeof(NamespaceDecl), 

+          int(nNamespaces*sizeof(NamespaceDecl)));

+  fprintf(stderr, "    %d function decls, %d each (%d bytes)\n", 

+          nFuncs, (int)sizeof(FunctionDecl), int(nFuncs*sizeof(FunctionDecl)));

+  fprintf(stderr, "    %d variable decls, %d each (%d bytes)\n", 

+          nVars, (int)sizeof(VarDecl), 

+          int(nVars*sizeof(VarDecl)));

+  fprintf(stderr, "    %d parameter variable decls, %d each (%d bytes)\n", 

+          nParmVars, (int)sizeof(ParmVarDecl),

+          int(nParmVars*sizeof(ParmVarDecl)));

+  fprintf(stderr, "    %d field decls, %d each (%d bytes)\n", 

+          nFieldDecls, (int)sizeof(FieldDecl),

+          int(nFieldDecls*sizeof(FieldDecl)));

+  fprintf(stderr, "    %d struct/union/class decls, %d each (%d bytes)\n", 

+          nSUC, (int)sizeof(RecordDecl),

+          int(nSUC*sizeof(RecordDecl)));

+  fprintf(stderr, "    %d enum decls, %d each (%d bytes)\n", 

+          nEnumDecls, (int)sizeof(EnumDecl), 

+          int(nEnumDecls*sizeof(EnumDecl)));

+  fprintf(stderr, "    %d enum constant decls, %d each (%d bytes)\n", 

+          nEnumConst, (int)sizeof(EnumConstantDecl),

+          int(nEnumConst*sizeof(EnumConstantDecl)));

+  fprintf(stderr, "    %d typedef decls, %d each (%d bytes)\n", 

+          nTypedef, (int)sizeof(TypedefDecl),int(nTypedef*sizeof(TypedefDecl)));

+  // Objective-C decls...

+  fprintf(stderr, "    %d interface decls, %d each (%d bytes)\n", 

+          nInterfaceDecls, (int)sizeof(ObjCInterfaceDecl),

+          int(nInterfaceDecls*sizeof(ObjCInterfaceDecl)));

+  fprintf(stderr, "    %d instance variable decls, %d each (%d bytes)\n", 

+          nIvarDecls, (int)sizeof(ObjCIvarDecl),

+          int(nIvarDecls*sizeof(ObjCIvarDecl)));

+  fprintf(stderr, "    %d class decls, %d each (%d bytes)\n", 

+          nClassDecls, (int)sizeof(ObjCClassDecl),

+          int(nClassDecls*sizeof(ObjCClassDecl)));

+  fprintf(stderr, "    %d method decls, %d each (%d bytes)\n", 

+          nMethodDecls, (int)sizeof(ObjCMethodDecl),

+          int(nMethodDecls*sizeof(ObjCMethodDecl)));

+  fprintf(stderr, "    %d protocol decls, %d each (%d bytes)\n", 

+          nProtocolDecls, (int)sizeof(ObjCProtocolDecl),

+          int(nProtocolDecls*sizeof(ObjCProtocolDecl)));

+  fprintf(stderr, "    %d forward protocol decls, %d each (%d bytes)\n", 

+          nForwardProtocolDecls, (int)sizeof(ObjCForwardProtocolDecl),

+          int(nForwardProtocolDecls*sizeof(ObjCForwardProtocolDecl)));

+  fprintf(stderr, "    %d category decls, %d each (%d bytes)\n", 

+          nCategoryDecls, (int)sizeof(ObjCCategoryDecl),

+          int(nCategoryDecls*sizeof(ObjCCategoryDecl)));

+

+  fprintf(stderr, "    %d class implementation decls, %d each (%d bytes)\n", 

+          nObjCImplementationDecls, (int)sizeof(ObjCImplementationDecl),

+          int(nObjCImplementationDecls*sizeof(ObjCImplementationDecl)));

+

+  fprintf(stderr, "    %d class implementation decls, %d each (%d bytes)\n", 

+          nObjCCategoryImpl, (int)sizeof(ObjCCategoryImplDecl),

+          int(nObjCCategoryImpl*sizeof(ObjCCategoryImplDecl)));

+

+  fprintf(stderr, "    %d compatibility alias decls, %d each (%d bytes)\n", 

+          nObjCCompatibleAlias, (int)sizeof(ObjCCompatibleAliasDecl),

+          int(nObjCCompatibleAlias*sizeof(ObjCCompatibleAliasDecl)));

+  

+  fprintf(stderr, "    %d property decls, %d each (%d bytes)\n", 

+          nObjCPropertyDecl, (int)sizeof(ObjCPropertyDecl),

+          int(nObjCPropertyDecl*sizeof(ObjCPropertyDecl)));

+  

+  fprintf(stderr, "    %d property implementation decls, %d each (%d bytes)\n", 

+          nObjCPropertyImplDecl, (int)sizeof(ObjCPropertyImplDecl),

+          int(nObjCPropertyImplDecl*sizeof(ObjCPropertyImplDecl)));

+  

+  fprintf(stderr, "Total bytes = %d\n", 

+          int(nFuncs*sizeof(FunctionDecl)+

+              nVars*sizeof(VarDecl)+nParmVars*sizeof(ParmVarDecl)+

+              nFieldDecls*sizeof(FieldDecl)+nSUC*sizeof(RecordDecl)+

+              nEnumDecls*sizeof(EnumDecl)+nEnumConst*sizeof(EnumConstantDecl)+

+              nTypedef*sizeof(TypedefDecl)+

+              nInterfaceDecls*sizeof(ObjCInterfaceDecl)+

+              nIvarDecls*sizeof(ObjCIvarDecl)+

+              nClassDecls*sizeof(ObjCClassDecl)+

+              nMethodDecls*sizeof(ObjCMethodDecl)+

+              nProtocolDecls*sizeof(ObjCProtocolDecl)+

+              nForwardProtocolDecls*sizeof(ObjCForwardProtocolDecl)+

+              nCategoryDecls*sizeof(ObjCCategoryDecl)+

+              nObjCImplementationDecls*sizeof(ObjCImplementationDecl)+

+              nObjCCategoryImpl*sizeof(ObjCCategoryImplDecl)+

+              nObjCCompatibleAlias*sizeof(ObjCCompatibleAliasDecl)+

+              nObjCPropertyDecl*sizeof(ObjCPropertyDecl)+

+              nObjCPropertyImplDecl*sizeof(ObjCPropertyImplDecl)+

+              nLinkageSpecDecl*sizeof(LinkageSpecDecl)+

+              nFileScopeAsmDecl*sizeof(FileScopeAsmDecl)+

+              nNamespaces*sizeof(NamespaceDecl)));

+    

+}

+

+void Decl::addDeclKind(Kind k) {

+  switch (k) {

+  case Namespace:           nNamespaces++; break;

+  case Typedef:             nTypedef++; break;

+  case Function:            nFuncs++; break;

+  case Var:                 nVars++; break;

+  case ParmVar:             nParmVars++; break;

+  case EnumConstant:        nEnumConst++; break;

+  case Field:               nFieldDecls++; break;

+  case Struct: case Union: case Class: nSUC++; break;

+  case Enum:                nEnumDecls++; break;

+  case ObjCInterface:       nInterfaceDecls++; break;

+  case ObjCClass:           nClassDecls++; break;

+  case ObjCMethod:          nMethodDecls++; break;

+  case ObjCProtocol:        nProtocolDecls++; break;

+  case ObjCForwardProtocol: nForwardProtocolDecls++; break;

+  case ObjCCategory:        nCategoryDecls++; break;

+  case ObjCIvar:            nIvarDecls++; break;

+  case ObjCImplementation:  nObjCImplementationDecls++; break;

+  case ObjCCategoryImpl:    nObjCCategoryImpl++; break;

+  case ObjCCompatibleAlias: nObjCCompatibleAlias++; break;

+  case ObjCProperty:        nObjCPropertyDecl++; break;

+  case ObjCPropertyImpl:    nObjCPropertyImplDecl++; break;

+  case LinkageSpec:         nLinkageSpecDecl++; break;

+  case FileScopeAsm:        nFileScopeAsmDecl++; break;

+  case TranslationUnit:     break;

+  }

+}

+

+//===----------------------------------------------------------------------===//

+// Decl Implementation

+//===----------------------------------------------------------------------===//

+

+// Out-of-line virtual method providing a home for Decl.

+Decl::~Decl() {

+  if (!HasAttrs)

+    return;

+  

+  DeclAttrMapTy::iterator it = DeclAttrs->find(this);

+  assert(it != DeclAttrs->end() && "No attrs found but HasAttrs is true!");

+

+  // release attributes.

+  delete it->second;

+  invalidateAttrs();

+}

+

+void Decl::addAttr(Attr *NewAttr) {

+  if (!DeclAttrs)

+    DeclAttrs = new DeclAttrMapTy();

+  

+  Attr *&ExistingAttr = (*DeclAttrs)[this];

+

+  NewAttr->setNext(ExistingAttr);

+  ExistingAttr = NewAttr;

+  

+  HasAttrs = true;

+}

+

+void Decl::invalidateAttrs() {

+  if (!HasAttrs) return;

+

+  HasAttrs = false;

+  (*DeclAttrs)[this] = 0;

+  DeclAttrs->erase(this);

+

+  if (DeclAttrs->empty()) {

+    delete DeclAttrs;

+    DeclAttrs = 0;

+  }

+}

+

+const Attr *Decl::getAttrs() const {

+  if (!HasAttrs)

+    return 0;

+  

+  return (*DeclAttrs)[this];

+}

+

+void Decl::swapAttrs(Decl *RHS) {

+  bool HasLHSAttr = this->HasAttrs;

+  bool HasRHSAttr = RHS->HasAttrs;

+  

+  // Usually, neither decl has attrs, nothing to do.

+  if (!HasLHSAttr && !HasRHSAttr) return;

+  

+  // If 'this' has no attrs, swap the other way.

+  if (!HasLHSAttr)

+    return RHS->swapAttrs(this);

+  

+  // Handle the case when both decls have attrs.

+  if (HasRHSAttr) {

+    std::swap((*DeclAttrs)[this], (*DeclAttrs)[RHS]);

+    return;

+  }

+  

+  // Otherwise, LHS has an attr and RHS doesn't.

+  (*DeclAttrs)[RHS] = (*DeclAttrs)[this];

+  (*DeclAttrs).erase(this);

+  this->HasAttrs = false;

+  RHS->HasAttrs = true;

+}

+

+

+void Decl::Destroy(ASTContext& C) {

+

+  if (ScopedDecl* SD = dyn_cast<ScopedDecl>(this)) {    

+

+    // Observe the unrolled recursion.  By setting N->NextDeclarator = 0x0

+    // within the loop, only the Destroy method for the first ScopedDecl

+    // will deallocate all of the ScopedDecls in a chain.

+    

+    ScopedDecl* N = SD->getNextDeclarator();

+    

+    while (N) {

+      ScopedDecl* Tmp = N->getNextDeclarator();

+      N->NextDeclarator = 0x0;

+      N->Destroy(C);

+      N = Tmp;

+    }

+  }  

+  

+  this->~Decl();

+  C.getAllocator().Deallocate((void *)this);

+}

+

+//===----------------------------------------------------------------------===//

+// DeclContext Implementation

+//===----------------------------------------------------------------------===//

+

+DeclContext *DeclContext::getParent() const {

+  if (ScopedDecl *SD = dyn_cast<ScopedDecl>(this))

+    return SD->getDeclContext();

+  else

+    return NULL;

+}

+

+Decl *DeclContext::ToDecl (const DeclContext *D) {

+  return CastTo<Decl>(D);

+}

+

+DeclContext *DeclContext::FromDecl (const Decl *D) {

+  return CastTo<DeclContext>(D);

+}