gzdoom/tools/drawergen/ssa/ssa_scope.cpp

97 lines
2.9 KiB
C++
Raw Normal View History

2016-11-01 20:44:33 +00:00
/*
** SSA scope data
** Copyright (c) 2016 Magnus Norddahl
**
** This software is provided 'as-is', without any express or implied
** warranty. In no event will the authors be held liable for any damages
** arising from the use of this software.
**
** Permission is granted to anyone to use this software for any purpose,
** including commercial applications, and to alter it and redistribute it
** freely, subject to the following restrictions:
**
** 1. The origin of this software must not be misrepresented; you must not
** claim that you wrote the original software. If you use this software
** in a product, an acknowledgment in the product documentation would be
** appreciated but is not required.
** 2. Altered source versions must be plainly marked as such, and must not be
** misrepresented as being the original software.
** 3. This notice may not be removed or altered from any source distribution.
**
*/
2016-11-28 16:31:56 +00:00
#include "precomp.h"
#include "ssa_scope.h"
#include "ssa_int.h"
SSAScope::SSAScope(llvm::LLVMContext *context, llvm::Module *module, llvm::IRBuilder<> *builder)
: _context(context), _module(module), _builder(builder)
{
instance = this;
_constant_scope_domain = llvm::MDNode::get(SSAScope::context(), { llvm::MDString::get(SSAScope::context(), "ConstantScopeDomain") });
_constant_scope = llvm::MDNode::getDistinct(SSAScope::context(), { _constant_scope_domain });
_constant_scope_list = llvm::MDNode::get(SSAScope::context(), { _constant_scope });
}
SSAScope::~SSAScope()
{
instance = 0;
}
llvm::LLVMContext &SSAScope::context()
{
return *instance->_context;
}
llvm::Module *SSAScope::module()
{
return instance->_module;
}
llvm::IRBuilder<> &SSAScope::builder()
{
return *instance->_builder;
}
llvm::Function *SSAScope::intrinsic(llvm::Intrinsic::ID id, llvm::ArrayRef<llvm::Type *> parameter_types)
{
llvm::Function *func = module()->getFunction(llvm::Intrinsic::getName(id, parameter_types));
if (func == 0)
func = llvm::Function::Create(llvm::Intrinsic::getType(context(), id, parameter_types), llvm::Function::ExternalLinkage, llvm::Intrinsic::getName(id, parameter_types), module());
return func;
}
llvm::Value *SSAScope::alloc_stack(llvm::Type *type)
{
return alloc_stack(type, SSAInt(1));
}
llvm::Value *SSAScope::alloc_stack(llvm::Type *type, SSAInt size)
{
// Allocas must be created at top of entry block for the PromoteMemoryToRegisterPass to work
llvm::BasicBlock &entry = SSAScope::builder().GetInsertBlock()->getParent()->getEntryBlock();
llvm::IRBuilder<> alloca_builder(&entry, entry.begin());
return alloca_builder.CreateAlloca(type, size.v, hint());
}
llvm::MDNode *SSAScope::constant_scope_list()
{
return instance->_constant_scope_list;
}
const std::string &SSAScope::hint()
{
return instance->_hint;
}
void SSAScope::set_hint(const std::string &new_hint)
{
if (new_hint.empty())
instance->_hint = "tmp";
else
instance->_hint = new_hint;
}
SSAScope *SSAScope::instance = 0;