mirror of
https://github.com/ZDoom/qzdoom-gpl.git
synced 2024-12-11 12:51:27 +00:00
96 lines
2.9 KiB
C++
96 lines
2.9 KiB
C++
/*
|
|
** 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.
|
|
**
|
|
*/
|
|
|
|
#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;
|