1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
|
//===--- InterpreterUtils.cpp - Incremental Utils --------*- C++ -*-===//
//
// Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
// See https://llvm.org/LICENSE.txt for license information.
// SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
//
//===----------------------------------------------------------------------===//
//
// This file implements some common utils used in the incremental library.
//
//===----------------------------------------------------------------------===//
#include "InterpreterUtils.h"
#include "clang/AST/QualTypeNames.h"
namespace clang {
IntegerLiteral *IntegerLiteralExpr(ASTContext &C, uint64_t Val) {
return IntegerLiteral::Create(C, llvm::APSInt::getUnsigned(Val),
C.UnsignedLongLongTy, SourceLocation());
}
Expr *CStyleCastPtrExpr(Sema &S, QualType Ty, Expr *E) {
ASTContext &Ctx = S.getASTContext();
if (!Ty->isPointerType())
Ty = Ctx.getPointerType(Ty);
TypeSourceInfo *TSI = Ctx.getTrivialTypeSourceInfo(Ty, SourceLocation());
Expr *Result =
S.BuildCStyleCastExpr(SourceLocation(), TSI, SourceLocation(), E).get();
assert(Result && "Cannot create CStyleCastPtrExpr");
return Result;
}
Expr *CStyleCastPtrExpr(Sema &S, QualType Ty, uintptr_t Ptr) {
ASTContext &Ctx = S.getASTContext();
return CStyleCastPtrExpr(S, Ty, IntegerLiteralExpr(Ctx, (uint64_t)Ptr));
}
Sema::DeclGroupPtrTy CreateDGPtrFrom(Sema &S, Decl *D) {
SmallVector<Decl *, 1> DeclsInGroup;
DeclsInGroup.push_back(D);
Sema::DeclGroupPtrTy DeclGroupPtr = S.BuildDeclaratorGroup(DeclsInGroup);
return DeclGroupPtr;
}
NamespaceDecl *LookupNamespace(Sema &S, llvm::StringRef Name,
const DeclContext *Within) {
DeclarationName DName = &S.Context.Idents.get(Name);
LookupResult R(S, DName, SourceLocation(),
Sema::LookupNestedNameSpecifierName);
R.suppressDiagnostics();
if (!Within)
S.LookupName(R, S.TUScope);
else {
if (const auto *TD = dyn_cast<clang::TagDecl>(Within);
TD && !TD->getDefinition())
// No definition, no lookup result.
return nullptr;
S.LookupQualifiedName(R, const_cast<DeclContext *>(Within));
}
if (R.empty())
return nullptr;
R.resolveKind();
return dyn_cast<NamespaceDecl>(R.getFoundDecl());
}
NamedDecl *LookupNamed(Sema &S, llvm::StringRef Name,
const DeclContext *Within) {
DeclarationName DName = &S.Context.Idents.get(Name);
LookupResult R(S, DName, SourceLocation(), Sema::LookupOrdinaryName,
RedeclarationKind::ForVisibleRedeclaration);
R.suppressDiagnostics();
if (!Within)
S.LookupName(R, S.TUScope);
else {
const DeclContext *PrimaryWithin = nullptr;
if (const auto *TD = dyn_cast<TagDecl>(Within))
PrimaryWithin = dyn_cast_if_present<DeclContext>(TD->getDefinition());
else
PrimaryWithin = Within->getPrimaryContext();
// No definition, no lookup result.
if (!PrimaryWithin)
return nullptr;
S.LookupQualifiedName(R, const_cast<DeclContext *>(PrimaryWithin));
}
if (R.empty())
return nullptr;
R.resolveKind();
if (R.isSingleResult())
return dyn_cast<NamedDecl>(R.getFoundDecl());
return nullptr;
}
std::string GetFullTypeName(ASTContext &Ctx, QualType QT) {
QualType FQT = TypeName::getFullyQualifiedType(QT, Ctx);
PrintingPolicy Policy(Ctx.getPrintingPolicy());
Policy.SuppressScope = false;
Policy.AnonymousTagLocations = false;
return FQT.getAsString(Policy);
}
} // namespace clang
|
