From 26f3bd89660e46a76a3b0267b23b00d917a45404 Mon Sep 17 00:00:00 2001 From: Peter Zotov Date: Mon, 11 Nov 2013 14:47:11 +0000 Subject: [OCaml] Make Llvm_target.DataLayout.t automatically managed This breaks the API by removing Llvm_target.DataLayout.dispose. git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@194380 91177308-0d34-0410-b5e6-96231b3b80d8 --- test/Bindings/Ocaml/ipo_opts.ml | 4 +--- test/Bindings/Ocaml/scalar_opts.ml | 4 +--- test/Bindings/Ocaml/target.ml | 3 +-- test/Bindings/Ocaml/vectorize_opts.ml | 4 +--- 4 files changed, 4 insertions(+), 11 deletions(-) (limited to 'test/Bindings') diff --git a/test/Bindings/Ocaml/ipo_opts.ml b/test/Bindings/Ocaml/ipo_opts.ml index d67a9e0..0fb7b32 100644 --- a/test/Bindings/Ocaml/ipo_opts.ml +++ b/test/Bindings/Ocaml/ipo_opts.ml @@ -65,9 +65,7 @@ let test_transforms () = ++ add_strip_dead_prototypes ++ add_strip_symbols ++ PassManager.run_module m - ++ PassManager.dispose); - - DataLayout.dispose td + ++ PassManager.dispose) (*===-- Driver ------------------------------------------------------------===*) diff --git a/test/Bindings/Ocaml/scalar_opts.ml b/test/Bindings/Ocaml/scalar_opts.ml index 8202e19..5cf0d7d 100644 --- a/test/Bindings/Ocaml/scalar_opts.ml +++ b/test/Bindings/Ocaml/scalar_opts.ml @@ -80,9 +80,7 @@ let test_transforms () = ++ PassManager.initialize ++ PassManager.run_function fn ++ PassManager.finalize - ++ PassManager.dispose); - - DataLayout.dispose td + ++ PassManager.dispose) (*===-- Driver ------------------------------------------------------------===*) diff --git a/test/Bindings/Ocaml/target.ml b/test/Bindings/Ocaml/target.ml index b439227..0f1aa18 100644 --- a/test/Bindings/Ocaml/target.ml +++ b/test/Bindings/Ocaml/target.ml @@ -54,8 +54,7 @@ let test_target_data () = assert_equal (preferred_align td sty) 8; assert_equal (preferred_align_of_global td (declare_global sty "g" m)) 8; assert_equal (element_at_offset td sty (Int64.of_int 1)) 0; - assert_equal (offset_of_element td sty 1) (Int64.of_int 4); - DataLayout.dispose td + assert_equal (offset_of_element td sty 1) (Int64.of_int 4) (*===-- Driver ------------------------------------------------------------===*) diff --git a/test/Bindings/Ocaml/vectorize_opts.ml b/test/Bindings/Ocaml/vectorize_opts.ml index 53f92bf..4e015a2 100644 --- a/test/Bindings/Ocaml/vectorize_opts.ml +++ b/test/Bindings/Ocaml/vectorize_opts.ml @@ -49,9 +49,7 @@ let test_transforms () = ++ add_loop_vectorize ++ add_slp_vectorize ++ PassManager.run_module m - ++ PassManager.dispose); - - DataLayout.dispose td + ++ PassManager.dispose) (*===-- Driver ------------------------------------------------------------===*) -- cgit v1.1