Changeset View

Standalone View

	(* RUN: cp %s %T/bitwriter.ml			(* RUN: rm -rf %t && mkdir -p %t && cp %s %t/bitwriter.ml
	* RUN: %ocamlc -g -w -3 -w +A -package llvm.bitreader -package llvm.bitwriter -linkpkg %T/bitwriter.ml -o %t			* RUN: %ocamlc -g -w -3 -w +A -package llvm.bitreader -package llvm.bitwriter -linkpkg %t/bitwriter.ml -o %t/executable
	* RUN: %t %t.bc			* RUN: %t/executable %t/bitcode.bc
	* RUN: %ocamlopt -g -w -3 -w +A -package llvm.bitreader -package llvm.bitwriter -linkpkg %T/bitwriter.ml -o %t			* RUN: %ocamlopt -g -w -3 -w +A -package llvm.bitreader -package llvm.bitwriter -linkpkg %t/bitwriter.ml -o %t/executable
	* RUN: %t %t.bc			* RUN: %t/executable %t/bitcode.bc
	* RUN: llvm-dis < %t.bc			* RUN: llvm-dis < %t/bitcode.bc
	* XFAIL: vg_leak			* XFAIL: vg_leak
	*)			*)

	(* Note that this takes a moment to link, so it's best to keep the number of			(* Note that this takes a moment to link, so it's best to keep the number of
	individual tests low. *)			individual tests low. *)

	let context = Llvm.global_context ()			let context = Llvm.global_context ()

	Show All 35 Lines