OSDN Git Service

Update ocaml test.
authorBenjamin Kramer <benny.kra@googlemail.com>
Sat, 28 Aug 2010 10:29:41 +0000 (10:29 +0000)
committerBenjamin Kramer <benny.kra@googlemail.com>
Sat, 28 Aug 2010 10:29:41 +0000 (10:29 +0000)
git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@112364 91177308-0d34-0410-b5e6-96231b3b80d8

test/Bindings/Ocaml/vmcore.ml

index 22e86b5..e55ab96 100644 (file)
@@ -296,12 +296,6 @@ let test_constants () =
   insist ((struct_type context [| i16_type; i16_type; i32_type; i32_type |])
         = (type_of c));
 
-  group "union";
-  let t = union_type context [| i1_type; i16_type; i64_type; double_type |] in
-  let c = const_union t one in
-  ignore (define_global "const_union" c m);
-  insist (t = (type_of c));
-  
   (* RUN: grep {const_null.*zeroinit} < %t.ll
    *)
   group "null";