6502/llvm-6502
1
0
Fork 0
mirror of https://github.com/c64scene-ar/llvm-6502.git synced 2024-12-29 10:32:47 +00:00
Code Issues Projects Releases Wiki Activity

Hack a structure profiling option together

Browse Source 
git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@1267 91177308-0d34-0410-b5e6-96231b3b80d8
This commit is contained in:
Chris Lattner 2001-11-12 16:19:45 +00:00
parent 8486cdd3f9
commit e240906471
2 changed files with 49 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

45
lib/ExecutionEngine/Interpreter/Execution.cpp
View File

@ -26,6 +26,14 @@ static TargetData TD("lli Interpreter");
CachedWriter CW; // Object to accelerate printing of LLVM CachedWriter CW; // Object to accelerate printing of LLVM
#ifdef PROFILE_STRUCTURE_FIELDS
#include "llvm/Support/CommandLine.h"
static cl::Flag ProfileStructureFields("profilestructfields",
"Profile Structure Field Accesses");
#include <map>
static map<const StructType *, vector<unsigned> > FieldAccessCounts;
#endif
sigjmp_buf SignalRecoverBuffer; sigjmp_buf SignalRecoverBuffer;
static bool InInstruction = false; static bool InInstruction = false;
@ -628,6 +636,33 @@ void Interpreter::executeRetInst(ReturnInst *I, ExecutionContext &SF) {
} else { } else {
ExitCode = 0; ExitCode = 0;
} }
#ifdef PROFILE_STRUCTURE_FIELDS
// Print out structure field accounting information...
if (!FieldAccessCounts.empty()) {
CW << "Field Access Profile Information:\n";
map<const StructType *, vector<unsigned> >::iterator
I = FieldAccessCounts.begin(), E = FieldAccessCounts.end();
for (; I != E; ++I) {
vector<unsigned> &OfC = I->second;
CW << " '" << (Value*)I->first << "'\t- Sum=";
unsigned Sum = 0;
for (unsigned i = 0; i < OfC.size(); ++i)
Sum += OfC[i];
CW << Sum << " - ";
for (unsigned i = 0; i < OfC.size(); ++i) {
if (i) CW << ", ";
CW << OfC[i];
}
CW << endl;
}
CW << endl;
FieldAccessCounts.clear();
}
#endif
return; return;
} }
@ -723,6 +758,16 @@ static PointerTy getElementOffset(Instruction *I, unsigned ArgOff) {
const ConstPoolUInt *CPU = cast<ConstPoolUInt>(I->getOperand(ArgOff++)); const ConstPoolUInt *CPU = cast<ConstPoolUInt>(I->getOperand(ArgOff++));
assert(CPU->getType() == Type::UByteTy); assert(CPU->getType() == Type::UByteTy);
unsigned Index = CPU->getValue(); unsigned Index = CPU->getValue();
#ifdef PROFILE_STRUCTURE_FIELDS
if (ProfileStructureFields) {
// Do accounting for this field...
vector<unsigned> &OfC = FieldAccessCounts[STy];
if (OfC.size() == 0) OfC.resize(STy->getElementTypes().size());
OfC[Index]++;
}
#endif
Total += SLO->MemberOffsets[Index]; Total += SLO->MemberOffsets[Index];
Ty = STy->getElementTypes()[Index]; Ty = STy->getElementTypes()[Index];
} }

5
lib/ExecutionEngine/Interpreter/Interpreter.h
View File

@ -7,6 +7,10 @@
#ifndef LLI_INTERPRETER_H #ifndef LLI_INTERPRETER_H
#define LLI_INTERPRETER_H #define LLI_INTERPRETER_H
// Uncomment this line to enable profiling of structure field accesses.
#define PROFILE_STRUCTURE_FIELDS 1
#include "llvm/Module.h" #include "llvm/Module.h"
#include "llvm/Method.h" #include "llvm/Method.h"
#include "llvm/Support/DataTypes.h" #include "llvm/Support/DataTypes.h"
@ -54,7 +58,6 @@ struct ExecutionContext {
// NULL if main func or debugger invoked fn // NULL if main func or debugger invoked fn
}; };
// Interpreter - This class represents the entirety of the interpreter. // Interpreter - This class represents the entirety of the interpreter.
// //
class Interpreter { class Interpreter {