aboutsummaryrefslogtreecommitdiff
path: root/bindings
diff options
context:
space:
mode:
authorGabor Greif <ggreif@gmail.com>2007-09-20 10:20:34 +0000
committerGabor Greif <ggreif@gmail.com>2007-09-20 10:20:34 +0000
commitab8588bf3cef0bd79f6a83608447cb007af8900b (patch)
tree090e0b6c47153e61ec850699c5884d5a044556c8 /bindings
parent41de436ca367ee3b4257551754bac236a37a2da5 (diff)
use typenames equivalent to
(u)intval, because latter are not present in older caml/mlvalues.h (e.g. 2004/07/07, 1.48.6.1) Using this as a workaround for now, until --without-ocaml works or we settle on a better solution git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@42160 91177308-0d34-0410-b5e6-96231b3b80d8
Diffstat (limited to 'bindings')
-rw-r--r--bindings/ocaml/llvm/llvm_ocaml.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/bindings/ocaml/llvm/llvm_ocaml.c b/bindings/ocaml/llvm/llvm_ocaml.c
index c297a5f3e6..80d7f737ba 100644
--- a/bindings/ocaml/llvm/llvm_ocaml.c
+++ b/bindings/ocaml/llvm/llvm_ocaml.c
@@ -273,9 +273,9 @@ CAMLprim value llvm_make_int_constant(value IntTy, value N, value SExt) {
/* GCC warns if we use the ternary operator. */
unsigned long long N2;
if (Bool_val(SExt))
- N2 = (intnat) Int_val(N);
+ N2 = (value) Int_val(N);
else
- N2 = (uintnat) Int_val(N);
+ N2 = (mlsize_t) Int_val(N);
return (value) LLVMGetIntConstant((LLVMTypeRef) IntTy, N2, Bool_val(SExt));
}