You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
65 lines
1.9 KiB
C++
65 lines
1.9 KiB
C++
4 months ago
|
#include "llvm.hpp"
|
||
|
|
||
|
LLVMState::LLVMState():
|
||
|
ctx(),
|
||
|
modul("forsp", ctx),
|
||
|
builder(ctx),
|
||
|
inttype(llvm::Type::getInt32Ty(ctx)),
|
||
|
stacktype(llvm::VectorType::get(inttype, 12, false)),
|
||
|
ftype(llvm::FunctionType::get(llvm::Type::getVoidTy(ctx), {}, false)),
|
||
|
one(llvm::ConstantInt::get(inttype, 1)),
|
||
|
zero(llvm::ConstantInt::get(inttype, 0))
|
||
|
{
|
||
|
auto zerovec = llvm::ConstantVector::get(llvm::ArrayRef(zero));
|
||
|
llvmSp = new llvm::GlobalVariable(modul, inttype, false,
|
||
|
llvm::GlobalValue::ExternalLinkage, zero, "sp");
|
||
|
llvmStack = new llvm::GlobalVariable(modul, stacktype, false,
|
||
|
llvm::GlobalValue::ExternalLinkage, zerovec, "stack");
|
||
|
}
|
||
|
|
||
|
llvm::Value *LLVMState::createPush()
|
||
|
{
|
||
|
auto dspval = builder.CreateLoad(inttype, llvmSp);
|
||
|
auto inc = builder.CreateAdd(dspval, one);
|
||
|
builder.CreateStore(inc, llvmSp, false);
|
||
|
|
||
|
return builder.CreateGEP(stacktype, llvmStack, {zero, dspval});
|
||
|
}
|
||
|
|
||
|
llvm::Value *LLVMState::createPop()
|
||
|
{
|
||
|
auto dspval = builder.CreateLoad(inttype, llvmSp);
|
||
|
auto dec = builder.CreateSub(dspval, one);
|
||
|
builder.CreateStore(dec, llvmSp, false);
|
||
|
|
||
|
return builder.CreateGEP(stacktype, llvmStack, {zero, dec});
|
||
|
}
|
||
|
|
||
|
llvm::Function *LLVMState::createFunction(const std::string& name)
|
||
|
{
|
||
|
return llvm::Function::Create(ftype, llvm::Function::ExternalLinkage,
|
||
|
name.c_str(), modul);
|
||
|
}
|
||
|
|
||
|
llvm::BasicBlock *LLVMState::createEntry(llvm::Function *func)
|
||
|
{
|
||
|
return llvm::BasicBlock::Create(ctx, "entry", func);
|
||
|
}
|
||
|
|
||
|
llvm::Value *LLVMState::createVariable(const std::string& name)
|
||
|
{
|
||
|
return new llvm::GlobalVariable(modul, inttype, false,
|
||
|
llvm::GlobalValue::InternalLinkage, zero, name);
|
||
|
}
|
||
|
|
||
|
llvm::Constant *LLVMState::createInt(int n)
|
||
|
{
|
||
|
return llvm::ConstantInt::get(ctx, llvm::APInt(32, n, true));
|
||
|
}
|
||
|
|
||
|
void LLVMState::output()
|
||
|
{
|
||
|
//std::cout << "LLVM:" << std::endl;
|
||
|
modul.print(llvm::errs(), nullptr);
|
||
|
}
|