[OCaml] Make Llvm_target.DataLayout.t automatically managed

[oota-llvm.git] / test / Bindings / Ocaml / ipo_opts.ml

diff --git a/test/Bindings/Ocaml/ipo_opts.ml b/test/Bindings/Ocaml/ipo_opts.ml
index d67a9e004cace476a4b0b92969289adac3c1471f..0fb7b32e0ba4c8e1741ccf6de20e240216e327e2 100644 (file)
--- 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 ------------------------------------------------------------===*)