#include <vm_lifters.hpp>

namespace vm
{
    lifters_t::lifter_callback_t lifters_t::pushvsp =
        [ & ]( vm::vmp_rtn_t *rtn, const vm::instrs::code_block_t &vm_code_block,
               const vm::instrs::virt_instr_t &vinstr, llvm::IRBuilder<> *ir_builder ) {
            auto current_spi =
                ir_builder->CreateLoad( llvm::IntegerType::get( *rtn->llvm_ctx, 64 ), rtn->stack_ptr, false );

            auto *i64_zero = llvm::ConstantInt::get( *rtn->llvm_ctx, llvm::APInt( 64, 0 ) );
            llvm_value_t *indices[ 2 ] = { i64_zero, current_spi };
            auto stack_ptr =
                ir_builder->CreateInBoundsGEP( rtn->virtual_stack, llvm::ArrayRef< llvm::Value * >( indices, 2 ) );

            auto stack_ptr_val = ir_builder->CreatePtrToInt( stack_ptr, ir_builder->getInt64Ty() );
            rtn->push( 8, stack_ptr_val );

        };
}