diff options
Diffstat (limited to 'contrib/llvm/bindings/ocaml/bitwriter/llvm_bitwriter.ml')
| -rw-r--r-- | contrib/llvm/bindings/ocaml/bitwriter/llvm_bitwriter.ml | 25 |
1 files changed, 0 insertions, 25 deletions
diff --git a/contrib/llvm/bindings/ocaml/bitwriter/llvm_bitwriter.ml b/contrib/llvm/bindings/ocaml/bitwriter/llvm_bitwriter.ml deleted file mode 100644 index 3e69a3c..0000000 --- a/contrib/llvm/bindings/ocaml/bitwriter/llvm_bitwriter.ml +++ /dev/null @@ -1,25 +0,0 @@ -(*===-- llvm_bitwriter.ml - LLVM Ocaml Interface ----------------*- C++ -*-===* - * - * The LLVM Compiler Infrastructure - * - * This file is distributed under the University of Illinois Open Source - * License. See LICENSE.TXT for details. - * - *===----------------------------------------------------------------------=== - * - * This interface provides an ocaml API for the LLVM intermediate - * representation, the classes in the VMCore library. - * - *===----------------------------------------------------------------------===*) - - -(* Writes the bitcode for module the given path. Returns true if successful. *) -external write_bitcode_file : Llvm.llmodule -> string -> bool - = "llvm_write_bitcode_file" - -external write_bitcode_to_fd : ?unbuffered:bool -> Llvm.llmodule - -> Unix.file_descr -> bool - = "llvm_write_bitcode_to_fd" - -let output_bitcode ?unbuffered channel m = - write_bitcode_to_fd ?unbuffered m (Unix.descr_of_out_channel channel) |
