Fix a partial application typo.

git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@45317 91177308-0d34-0410-b5e6-96231b3b80d8
This commit is contained in:
Gordon Henriksen 2007-12-22 19:41:30 +00:00
parent a6c9925087
commit 7a653cb24d
4 changed files with 5 additions and 5 deletions

View File

@ -1,4 +1,4 @@
(* RUN: %ocamlc llvm.cma llvm_analysis.cma %s -o %t
(* RUN: %ocamlc -warn-error A llvm.cma llvm_analysis.cma %s -o %t
* RUN: ./%t %t.bc
*)

View File

@ -1,4 +1,4 @@
(* RUN: %ocamlc llvm.cma llvm_bitreader.cma llvm_bitwriter.cma %s -o %t
(* RUN: %ocamlc -warn-error A llvm.cma llvm_bitreader.cma llvm_bitwriter.cma %s -o %t
* RUN: ./%t %t.bc
* RUN: llvm-dis < %t.bc | grep caml_int_ty
*)
@ -25,7 +25,7 @@ let _ =
let m = Llvm_bitreader.parse_bitcode mb in
Llvm.dispose_module m
with x ->
Llvm.MemoryBuffer.dispose;
Llvm.MemoryBuffer.dispose mb;
raise x
end
end;

View File

@ -1,4 +1,4 @@
(* RUN: %ocamlc llvm.cma llvm_bitwriter.cma %s -o %t
(* RUN: %ocamlc -warn-error A llvm.cma llvm_bitwriter.cma %s -o %t
* RUN: ./%t %t.bc
* RUN: llvm-dis < %t.bc | grep caml_int_ty
*)

View File

@ -1,4 +1,4 @@
(* RUN: %ocamlc llvm.cma llvm_analysis.cma llvm_bitwriter.cma %s -o %t
(* RUN: %ocamlc -warn-error A llvm.cma llvm_analysis.cma llvm_bitwriter.cma %s -o %t
* RUN: ./%t %t.bc
* RUN: llvm-dis < %t.bc > %t.ll
*)