Lines Matching full:llvm
1 (* RUN: %ocamlopt -warn-error A llvm.cmxa llvm_bitreader.cmxa llvm_bitwriter.cmxa %s -o %t
3 * RUN: llvm-dis < %t.bc
10 let context = Llvm.global_context ()
16 let m = Llvm.create_module context "ocaml_test_module" in
20 Llvm.dispose_module m;
24 let mb = Llvm.MemoryBuffer.of_file fn in
27 Llvm.dispose_module m
29 Llvm.MemoryBuffer.dispose mb;
36 let mb = Llvm.MemoryBuffer.of_file (fn ^ ".bogus") in
37 Llvm.MemoryBuffer.dispose mb;
39 with Llvm.IoError _ ->
45 let mb = Llvm.MemoryBuffer.of_file fn in
49 Llvm.MemoryBuffer.dispose mb;
52 Llvm.dispose_module m
65 let mb = Llvm.MemoryBuffer.of_file fn in
69 Llvm.MemoryBuffer.dispose mb;
72 Llvm.dispose_module m;
