diff options
author | Manman Ren <manman.ren@gmail.com> | 2013-12-09 21:05:36 +0000 |
---|---|---|
committer | Manman Ren <manman.ren@gmail.com> | 2013-12-09 21:05:36 +0000 |
commit | 782ff3b70086bd3580f12228082ea998f152f9cd (patch) | |
tree | 904c57298bd9ec38d66f58f2f29961b01f66b268 /test | |
parent | 7bb782b1cd3b931cf27565bd7c5a8952037f01cb (diff) | |
download | external_llvm-782ff3b70086bd3580f12228082ea998f152f9cd.zip external_llvm-782ff3b70086bd3580f12228082ea998f152f9cd.tar.gz external_llvm-782ff3b70086bd3580f12228082ea998f152f9cd.tar.bz2 |
Merging r196156:
------------------------------------------------------------------------
r196156 | mren | 2013-12-02 13:25:56 -0800 (Mon, 02 Dec 2013) | 2 lines
Update Ocaml/vmcore.ml to emit a "Debug Info Version" module flag.
------------------------------------------------------------------------
git-svn-id: https://llvm.org/svn/llvm-project/llvm/branches/release_34@196821 91177308-0d34-0410-b5e6-96231b3b80d8
Diffstat (limited to 'test')
-rw-r--r-- | test/Bindings/Ocaml/vmcore.ml | 25 |
1 files changed, 13 insertions, 12 deletions
diff --git a/test/Bindings/Ocaml/vmcore.ml b/test/Bindings/Ocaml/vmcore.ml index 12ac62b..167efce 100644 --- a/test/Bindings/Ocaml/vmcore.ml +++ b/test/Bindings/Ocaml/vmcore.ml @@ -1031,8 +1031,8 @@ let test_builder () = end; group "metadata"; begin - (* CHECK: %metadata = add i32 %P1, %P2, !test !0 - * !0 is metadata emitted at EOF. + (* CHECK: %metadata = add i32 %P1, %P2, !test !1 + * !1 is metadata emitted at EOF. *) let i = build_add p1 p2 "metadata" atentry in insist ((has_metadata i) = false); @@ -1056,18 +1056,18 @@ let test_builder () = end; group "named metadata"; begin - (* !md is emitted at EOF. *) + (* !llvm.module.flags is emitted at EOF. *) let n1 = const_int i32_type 1 in - let n2 = mdstring context "metadata test" in - let md = mdnode context [| n1; n2 |] in - add_named_metadata_operand m "md" md; + let n2 = mdstring context "Debug Info Version" in + let md = mdnode context [| n1; n2; n1 |] in + add_named_metadata_operand m "llvm.module.flags" md; - insist ((get_named_metadata m "md") = [| md |]) + insist ((get_named_metadata m "llvm.module.flags") = [| md |]) end; group "dbg"; begin - (* CHECK: %dbg = add i32 %P1, %P2, !dbg !1 - * !1 is metadata emitted at EOF. + (* CHECK: %dbg = add i32 %P1, %P2, !dbg !2 + * !2 is metadata emitted at EOF. *) insist ((current_debug_location atentry) = None); @@ -1346,9 +1346,10 @@ let test_builder () = (* End-of-file checks for things like metdata and attributes. * CHECK: attributes #0 = {{.*}}uwtable{{.*}} - * CHECK: !md = !{!0} - * CHECK: !0 = metadata !{i32 1, metadata !"metadata test"} - * CHECK: !1 = metadata !{i32 2, i32 3, metadata !2, metadata !2} + * CHECK: !llvm.module.flags = !{!0} + * CHECK: !0 = metadata !{i32 1, metadata !"Debug Info Version", i32 1} + * CHECK: !1 = metadata !{i32 1, metadata !"metadata test"} + * CHECK: !2 = metadata !{i32 2, i32 3, metadata !3, metadata !3} *) (*===-- Pass Managers -----------------------------------------------------===*) |