From fa6ab4393ebb7add77a4a957dc50453d07b54a62 Mon Sep 17 00:00:00 2001 From: Peter Zotov Date: Mon, 11 Nov 2013 14:47:28 +0000 Subject: [OCaml] Add missing Llvm_target functions git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@194382 91177308-0d34-0410-b5e6-96231b3b80d8 --- test/Bindings/Ocaml/target.ml | 2 ++ 1 file changed, 2 insertions(+) (limited to 'test/Bindings') diff --git a/test/Bindings/Ocaml/target.ml b/test/Bindings/Ocaml/target.ml index 017a886..25a9664 100644 --- a/test/Bindings/Ocaml/target.ml +++ b/test/Bindings/Ocaml/target.ml @@ -47,6 +47,8 @@ let test_target_data () = assert_equal (byte_order td) Endian.Little; assert_equal (pointer_size td) 4; assert_equal (intptr_type td context) i32_type; + assert_equal (qualified_pointer_size td 0) 4; + assert_equal (qualified_intptr_type td context 0) i32_type; assert_equal (size_in_bits td sty) (Int64.of_int 96); assert_equal (store_size td sty) (Int64.of_int 12); assert_equal (abi_size td sty) (Int64.of_int 12); -- cgit v1.1