Update OCaml bindings for the new half float type.

Patch by Jonathan Ragan-Kelley!

git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@147314 91177308-0d34-0410-b5e6-96231b3b80d8
This commit is contained in:
Bob Wilson 2011-12-28 18:51:08 +00:00
parent 97fb69b2ef
commit eaf0608891
2 changed files with 3 additions and 0 deletions

View File

@ -20,6 +20,7 @@ type llmemorybuffer
module TypeKind = struct module TypeKind = struct
type t = type t =
| Void | Void
| Half
| Float | Float
| Double | Double
| X86fp80 | X86fp80
@ -1234,5 +1235,6 @@ let rec string_of_lltype ty =
| TypeKind.X86fp80 -> "x86_fp80" | TypeKind.X86fp80 -> "x86_fp80"
| TypeKind.Double -> "double" | TypeKind.Double -> "double"
| TypeKind.Float -> "float" | TypeKind.Float -> "float"
| TypeKind.Half -> "half"
| TypeKind.Void -> "void" | TypeKind.Void -> "void"
| TypeKind.Metadata -> "metadata" | TypeKind.Metadata -> "metadata"

View File

@ -53,6 +53,7 @@ type llmemorybuffer
module TypeKind : sig module TypeKind : sig
type t = type t =
Void Void
| Half
| Float | Float
| Double | Double
| X86fp80 | X86fp80