tombagby / llvmruby

LLVM bindings for Ruby

This URL has Read+Write access

llvmruby / ext / llvmruby.h
100644 62 lines (55 sloc) 1.909 kb
raw blame history 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62

#define __STDC_LIMIT_MACROS
 
#include "llvm/Module.h"
#include "llvm/DerivedTypes.h"
#include "llvm/Constants.h"
#include "llvm/Instructions.h"
#include "llvm/ModuleProvider.h"
#include "llvm/PassManager.h"
#include "llvm/LinkAllPasses.h"
#include "llvm/Target/TargetData.h"
#include "llvm/Transforms/Scalar.h"
#include "llvm/Analysis/Verifier.h"
#include "llvm/ExecutionEngine/JIT.h"
#include "llvm/ExecutionEngine/Interpreter.h"
#include "llvm/ExecutionEngine/GenericValue.h"
#include "llvm/Support/IRBuilder.h"
#include <iostream>
using namespace llvm;
 
#include "ruby.h"
 
extern VALUE cLLVMRuby;
extern VALUE cLLVMValue;
extern VALUE cLLVMModule;
extern VALUE cLLVMFunction;
extern VALUE cLLVMBasicBlock;
extern VALUE cLLVMBuilder;
extern VALUE cLLVMType;
extern VALUE cLLVMPointerType;
extern VALUE cLLVMStructType;
extern VALUE cLLVMArrayType;
extern VALUE cLLVMVectorType;
extern VALUE cLLVMFunctionType;
extern VALUE cLLVMInstruction;
extern VALUE cLLVMBranchInst;
extern VALUE cLLVMSwitchInst;
extern VALUE cLLVMBinaryOps;
extern VALUE cLLVMPhi;
extern VALUE cLLVMPassManager;
 
#define LLVM_VAL(obj) ((Value*)DATA_PTR(obj))
#define LLVM_TYPE(obj) ((Type*)DATA_PTR(obj))
#define LLVM_FUNC_TYPE(obj) ((FunctionType*)DATA_PTR(obj))
#define LLVM_MODULE(obj) ((Module*)DATA_PTR(obj))
#define LLVM_FUNCTION(obj) ((Function*)DATA_PTR(obj))
#define LLVM_BASIC_BLOCK(obj) ((BasicBlock*)DATA_PTR(obj))
#define LLVM_INSTRUCTION(obj) ((Instruction*)DATA_PTR(obj))
#define LLVM_PHI(obj) ((PHINode*)DATA_PTR(obj))
 
#define CHECK_TYPE(val, klass)\
  if(CLASS_OF(val) != klass) {\
    rb_raise(rb_eTypeError, "wrong argument type: %s given, expected %s", rb_obj_classname(val), rb_class2name(klass));\
  }
 
extern "C" {
VALUE llvm_value_wrap(Value*);
VALUE llvm_function_wrap(Function*);
VALUE llvm_basic_block_wrap(BasicBlock*);
VALUE llvm_function_create_block(VALUE);
VALUE llvm_instruction_wrap(Instruction*);
}