summaryrefslogtreecommitdiff
path: root/bindings/ocaml/bitreader/llvm_bitreader.ml
blob: 39d0434df7bd08d2bfefd038bb7046c9aa0f7841 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
(*===-- llvm_bitreader.ml - LLVM Ocaml Interface ----------------*- C++ -*-===*
 *
 *                     The LLVM Compiler Infrastructure
 *
 * This file was developed by Gordon Henriksen and is distributed under the
 * University of Illinois Open Source License. See LICENSE.TXT for details.
 *
 *===----------------------------------------------------------------------===*)


type bitreader_result =
| Bitreader_success of Llvm.llmodule
| Bitreader_failure of string


external read_bitcode_file : string -> bitreader_result
                           = "llvm_read_bitcode_file"