forked from OSchip/llvm-project
137 lines
4.5 KiB
C++
137 lines
4.5 KiB
C++
//===--- MinimalAction.cpp - Implement the MinimalAction class ------------===//
|
|
//
|
|
// 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 MinimalAction interface.
|
|
//
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
#include "clang/Parse/Parser.h"
|
|
#include "clang/Parse/DeclSpec.h"
|
|
#include "clang/Parse/Scope.h"
|
|
using namespace clang;
|
|
|
|
/// TypeNameInfo - A link exists here for each scope that an identifier is
|
|
/// defined.
|
|
struct TypeNameInfo {
|
|
TypeNameInfo *Prev;
|
|
bool isTypeName;
|
|
|
|
TypeNameInfo(bool istypename, TypeNameInfo *prev) {
|
|
isTypeName = istypename;
|
|
Prev = prev;
|
|
}
|
|
};
|
|
|
|
void MinimalAction:: ActOnTranslationUnitScope(SourceLocation Loc, Scope *S) {
|
|
TUScope = S;
|
|
IdentifierInfo *II;
|
|
TypeNameInfo *TI;
|
|
|
|
// recognize the ObjC built-in type identifiers.
|
|
II = &Idents.get("id");
|
|
TI = new TypeNameInfo(1, II->getFETokenInfo<TypeNameInfo>());
|
|
II->setFETokenInfo(TI);
|
|
II = &Idents.get("SEL");
|
|
TI = new TypeNameInfo(1, II->getFETokenInfo<TypeNameInfo>());
|
|
II->setFETokenInfo(TI);
|
|
II = &Idents.get("Class");
|
|
TI = new TypeNameInfo(1, II->getFETokenInfo<TypeNameInfo>());
|
|
II->setFETokenInfo(TI);
|
|
II = &Idents.get("Protocol");
|
|
TI = new TypeNameInfo(1, II->getFETokenInfo<TypeNameInfo>());
|
|
II->setFETokenInfo(TI);
|
|
}
|
|
|
|
/// isTypeName - This looks at the IdentifierInfo::FETokenInfo field to
|
|
/// determine whether the name is a type name (objc class name or typedef) or
|
|
/// not in this scope.
|
|
Action::DeclTy *
|
|
MinimalAction::isTypeName(const IdentifierInfo &II, Scope *S) {
|
|
if (TypeNameInfo *TI = II.getFETokenInfo<TypeNameInfo>())
|
|
if (TI->isTypeName)
|
|
return TI;
|
|
return 0;
|
|
}
|
|
|
|
/// ActOnDeclarator - If this is a typedef declarator, we modify the
|
|
/// IdentifierInfo::FETokenInfo field to keep track of this fact, until S is
|
|
/// popped.
|
|
Action::DeclTy *
|
|
MinimalAction::ActOnDeclarator(Scope *S, Declarator &D, DeclTy *LastInGroup) {
|
|
IdentifierInfo *II = D.getIdentifier();
|
|
|
|
// If there is no identifier associated with this declarator, bail out.
|
|
if (II == 0) return 0;
|
|
|
|
TypeNameInfo *weCurrentlyHaveTypeInfo = II->getFETokenInfo<TypeNameInfo>();
|
|
bool isTypeName =
|
|
D.getDeclSpec().getStorageClassSpec() == DeclSpec::SCS_typedef;
|
|
|
|
// this check avoids creating TypeNameInfo objects for the common case.
|
|
// It does need to handle the uncommon case of shadowing a typedef name with a
|
|
// non-typedef name. e.g. { typedef int a; a xx; { int a; } }
|
|
if (weCurrentlyHaveTypeInfo || isTypeName) {
|
|
TypeNameInfo *TI = new TypeNameInfo(isTypeName, weCurrentlyHaveTypeInfo);
|
|
|
|
II->setFETokenInfo(TI);
|
|
|
|
// Remember that this needs to be removed when the scope is popped.
|
|
S->AddDecl(II);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
Action::DeclTy *
|
|
MinimalAction::ActOnStartClassInterface(SourceLocation AtInterafceLoc,
|
|
IdentifierInfo *ClassName, SourceLocation ClassLoc,
|
|
IdentifierInfo *SuperName, SourceLocation SuperLoc,
|
|
IdentifierInfo **ProtocolNames, unsigned NumProtocols,
|
|
SourceLocation EndProtoLoc, AttributeList *AttrList) {
|
|
TypeNameInfo *TI =
|
|
new TypeNameInfo(1, ClassName->getFETokenInfo<TypeNameInfo>());
|
|
|
|
ClassName->setFETokenInfo(TI);
|
|
return 0;
|
|
}
|
|
|
|
/// ActOnForwardClassDeclaration -
|
|
/// Scope will always be top level file scope.
|
|
Action::DeclTy *
|
|
MinimalAction::ActOnForwardClassDeclaration(SourceLocation AtClassLoc,
|
|
IdentifierInfo **IdentList, unsigned NumElts) {
|
|
for (unsigned i = 0; i != NumElts; ++i) {
|
|
TypeNameInfo *TI =
|
|
new TypeNameInfo(1, IdentList[i]->getFETokenInfo<TypeNameInfo>());
|
|
|
|
IdentList[i]->setFETokenInfo(TI);
|
|
|
|
// Remember that this needs to be removed when the scope is popped.
|
|
TUScope->AddDecl(IdentList[i]);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
/// ActOnPopScope - When a scope is popped, if any typedefs are now out-of-scope,
|
|
/// they are removed from the IdentifierInfo::FETokenInfo field.
|
|
void MinimalAction::ActOnPopScope(SourceLocation Loc, Scope *S) {
|
|
for (Scope::decl_iterator I = S->decl_begin(), E = S->decl_end();
|
|
I != E; ++I) {
|
|
IdentifierInfo &II = *static_cast<IdentifierInfo*>(*I);
|
|
TypeNameInfo *TI = II.getFETokenInfo<TypeNameInfo>();
|
|
assert(TI && "This decl didn't get pushed??");
|
|
|
|
if (TI) {
|
|
TypeNameInfo *Next = TI->Prev;
|
|
delete TI;
|
|
|
|
II.setFETokenInfo(Next);
|
|
}
|
|
}
|
|
}
|