1 (*===-- llvm_bitreader.ml - LLVM Ocaml Interface ----------------*- C++ -*-===*
3 * The LLVM Compiler Infrastructure
5 * This file was developed by Gordon Henriksen and is distributed under the
6 * University of Illinois Open Source License. See LICENSE.TXT for details.
8 *===----------------------------------------------------------------------===*)
11 type bitreader_result =
12 | Bitreader_success of Llvm.llmodule
13 | Bitreader_failure of string
16 external read_bitcode_file : string -> bitreader_result
17 = "llvm_read_bitcode_file"