diff options
| author | Chris Lattner <sabre@nondot.org> | 2010-01-24 00:25:09 +0000 |
|---|---|---|
| committer | Chris Lattner <sabre@nondot.org> | 2010-01-24 00:25:09 +0000 |
| commit | 289372e3413b1eb54deb5797b9645e83a79e5e19 (patch) | |
| tree | 01698925269b5d2e70435b900be11b9a4e64de6a /llvm | |
| parent | 4f45512c2325ef7a62d9fe8538596bd4368aa24c (diff) | |
| download | bcm5719-llvm-289372e3413b1eb54deb5797b9645e83a79e5e19.tar.gz bcm5719-llvm-289372e3413b1eb54deb5797b9645e83a79e5e19.zip | |
This corrects an error in the type of the Llvm.dispose_context function.
Patch by James Woodyatt!
llvm-svn: 94343
Diffstat (limited to 'llvm')
| -rw-r--r-- | llvm/bindings/ocaml/llvm/llvm.ml | 2 | ||||
| -rw-r--r-- | llvm/bindings/ocaml/llvm/llvm.mli | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/llvm/bindings/ocaml/llvm/llvm.ml b/llvm/bindings/ocaml/llvm/llvm.ml index 25e47ab5e27..4539098aa07 100644 --- a/llvm/bindings/ocaml/llvm/llvm.ml +++ b/llvm/bindings/ocaml/llvm/llvm.ml @@ -144,7 +144,7 @@ type ('a, 'b) llrev_pos = (*===-- Contexts ----------------------------------------------------------===*) external create_context : unit -> llcontext = "llvm_create_context" -external dispose_context : unit -> llcontext = "llvm_dispose_context" +external dispose_context : llcontext -> unit = "llvm_dispose_context" external global_context : unit -> llcontext = "llvm_global_context" (*===-- Modules -----------------------------------------------------------===*) diff --git a/llvm/bindings/ocaml/llvm/llvm.mli b/llvm/bindings/ocaml/llvm/llvm.mli index c703ef7fbf0..719df430fab 100644 --- a/llvm/bindings/ocaml/llvm/llvm.mli +++ b/llvm/bindings/ocaml/llvm/llvm.mli @@ -214,7 +214,7 @@ external create_context : unit -> llcontext = "llvm_create_context" (** [destroy_context ()] destroys a context. See the destructor [llvm::LLVMContext::~LLVMContext]. *) -external dispose_context : unit -> llcontext = "llvm_dispose_context" +external dispose_context : llcontext -> unit = "llvm_dispose_context" (** See the function [llvm::getGlobalContext]. *) external global_context : unit -> llcontext = "llvm_global_context" |
