mirror of
https://github.com/RPCSX/llvm.git
synced 2024-11-24 04:09:45 +00:00
Fix bug 5992: O'Caml's llvm_create_module was treating the context as a string.
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:
parent
53d4d78d9a
commit
263d989a71
@ -112,9 +112,9 @@ CAMLprim LLVMContextRef llvm_global_context(value Unit) {
|
||||
|
||||
/*===-- Modules -----------------------------------------------------------===*/
|
||||
|
||||
/* string -> llmodule */
|
||||
CAMLprim LLVMModuleRef llvm_create_module(value ModuleID) {
|
||||
return LLVMModuleCreateWithName(String_val(ModuleID));
|
||||
/* llcontext -> string -> llmodule */
|
||||
CAMLprim LLVMModuleRef llvm_create_module(LLVMContextRef C, value ModuleID) {
|
||||
return LLVMModuleCreateWithNameInContext(String_val(ModuleID), C);
|
||||
}
|
||||
|
||||
/* llmodule -> unit */
|
||||
|
Loading…
Reference in New Issue
Block a user