Displaying 1 result from an estimated 1 matches for "run_static_dtors".
Did you mean:
run_static_ctors
2007 Dec 23
0
[LLVMdev] Ocaml JIT example
...engine
let execute_function f m =
(* Set up the JIT. *)
let jit = ExecutionEngine.create (ModuleProvider.create m) in
ExecutionEngine.run_static_ctors jit;
(* Execute the function. *)
ignore (ExecutionEngine.run_function f [| |] jit);
(* Tear down the JIT. *)
ExecutionEngine.run_static_dtors jit;
ExecutionEngine.dispose jit
let build_module =
let m = create_module "jithelloworld" in
(* @greeting = global [14 x i8] c"Hello, world!\00" *)
let greeting = define_global "greeting" (const_stringz "Hello,
world!") m in
(* declare i32...