summaryrefslogtreecommitdiff
path: root/bindings/ocaml/llvm/llvm.ml
diff options
context:
space:
mode:
authorGordon Henriksen <gordonhenriksen@mac.com>2007-12-17 16:08:32 +0000
committerGordon Henriksen <gordonhenriksen@mac.com>2007-12-17 16:08:32 +0000
commit57cebeec7ba08b55f29f5bf98ad0a3a17e9d0c71 (patch)
tree7c0fd6ef432b8676a5cf19c374b330842c4e5456 /bindings/ocaml/llvm/llvm.ml
parent4374f8e208806ae4ffaa57a4b69eba5571207ba1 (diff)
downloadllvm-57cebeec7ba08b55f29f5bf98ad0a3a17e9d0c71.tar.gz
llvm-57cebeec7ba08b55f29f5bf98ad0a3a17e9d0c71.tar.bz2
llvm-57cebeec7ba08b55f29f5bf98ad0a3a17e9d0c71.tar.xz
C and Ocaml bindings for address spaces, for that burgeoning market
for Ocaml-based compilers targeting embedded devices. :) git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@45096 91177308-0d34-0410-b5e6-96231b3b80d8
Diffstat (limited to 'bindings/ocaml/llvm/llvm.ml')
-rw-r--r--bindings/ocaml/llvm/llvm.ml5
1 files changed, 4 insertions, 1 deletions
diff --git a/bindings/ocaml/llvm/llvm.ml b/bindings/ocaml/llvm/llvm.ml
index 6ede17978b..5a5f4e7cfe 100644
--- a/bindings/ocaml/llvm/llvm.ml
+++ b/bindings/ocaml/llvm/llvm.ml
@@ -144,11 +144,14 @@ external is_packed : lltype -> bool = "llvm_is_packed"
(*--... Operations on pointer, vector, and array types .....................--*)
external array_type : lltype -> int -> lltype = "llvm_array_type"
-external pointer_type : lltype -> lltype = "LLVMPointerType"
+external pointer_type : lltype -> lltype = "llvm_pointer_type"
+external qualified_pointer_type : lltype -> int -> lltype
+ = "llvm_qualified_pointer_type"
external vector_type : lltype -> int -> lltype = "llvm_vector_type"
external element_type : lltype -> lltype = "LLVMGetElementType"
external array_length : lltype -> int = "llvm_array_length"
+external address_space : lltype -> int = "llvm_address_space"
external vector_size : lltype -> int = "llvm_vector_size"
(*--... Operations on other types ..........................................--*)