[OCaml] [autoconf] Migrate to ocamlfind.

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

diff --git a/test/Bindings/Ocaml/bitreader.ml b/test/Bindings/Ocaml/bitreader.ml
index f1d202ab0490dee6119eeeebdc8985fcdd785eaf..28c04a6abc00c208fb34b2ceadf898a53a64cb26 100644 (file)
--- a/test/Bindings/Ocaml/bitreader.ml
+++ b/test/Bindings/Ocaml/bitreader.ml
@@ -1,7 +1,5 @@
-(* RUN: rm -rf %t.builddir
- * RUN: mkdir -p %t.builddir
- * RUN: cp %s %t.builddir
- * RUN: %ocamlopt -warn-error A llvm.cmxa llvm_bitreader.cmxa llvm_bitwriter.cmxa %t.builddir/bitreader.ml -o %t
+(* RUN: cp %s %T/bitreader.ml
+ * RUN: %ocamlcomp -warn-error A -package llvm.bitreader -package llvm.bitwriter -linkpkg %T/bitreader.ml -o %t
  * RUN: %t %t.bc
  * RUN: llvm-dis < %t.bc
  * XFAIL: vg_leak
@@ -17,11 +15,11 @@ let test x = if not x then exit 1 else ()
 let _ =
   let fn = Sys.argv.(1) in
   let m = Llvm.create_module context "ocaml_test_module" in
-  
+
   test (Llvm_bitwriter.write_bitcode_file m fn);
-  
+
   Llvm.dispose_module m;
-  
+
   (* parse_bitcode *)
   begin
     let mb = Llvm.MemoryBuffer.of_file fn in
@@ -33,7 +31,7 @@ let _ =
       raise x
     end
   end;
-  
+
   (* MemoryBuffer.of_file *)
   test begin try
     let mb = Llvm.MemoryBuffer.of_file (fn ^ ".bogus") in
@@ -42,7 +40,7 @@ let _ =
   with Llvm.IoError _ ->
     true
   end;
-  
+
   (* get_module *)
   begin
     let mb = Llvm.MemoryBuffer.of_file fn in
@@ -54,14 +52,14 @@ let _ =
     end in
     Llvm.dispose_module m
   end;
-  
+
   (* corrupt the bitcode *)
   let fn = fn ^ ".txt" in
   begin let oc = open_out fn in
     output_string oc "not a bitcode file\n";
     close_out oc
   end;
-  
+
   (* test get_module exceptions *)
   test begin
     try