RPCSX/llvm
1
0
Fork 0
mirror of https://github.com/RPCSX/llvm.git synced 2024-11-28 06:00:28 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

Fix bug 5992: O'Caml's llvm_create_module was treating the context as a string.

Browse Source 
Thanks Andy Ray for catching this!

git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@93588 91177308-0d34-0410-b5e6-96231b3b80d8
This commit is contained in:
Erick Tryzelaar 2010-01-15 23:49:16 +00:00
parent 53d4d78d9a
commit 263d989a71
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
bindings/ocaml/llvm/llvm_ocaml.c
View File

@ -112,9 +112,9 @@ CAMLprim LLVMContextRef llvm_global_context(value Unit) {
/*===-- Modules -----------------------------------------------------------===*/ /*===-- Modules -----------------------------------------------------------===*/
/* string -> llmodule */ /* llcontext -> string -> llmodule */
CAMLprim LLVMModuleRef llvm_create_module(value ModuleID) { CAMLprim LLVMModuleRef llvm_create_module(LLVMContextRef C, value ModuleID) {
return LLVMModuleCreateWithName(String_val(ModuleID)); return LLVMModuleCreateWithNameInContext(String_val(ModuleID), C);
} }
/* llmodule -> unit */ /* llmodule -> unit */