OCaml binding: error with the function "has_metadata"

Hi all,

I am using the OCaml binding and I get the following error with the function "Llvm.has_metadata":

Assertion failed: (isa<X>(Val) && "cast<Ty>() argument of incompatible type!"), function cast, file .../llvm-3.2.src/include/llvm/Support/Casting.h, line 208.
Abort trap: 6

I am using the latest 3.2 release from the LLVM download page and this is a small code sample that is crashing, giving the error message above: