1
(*===-- llvm_bitreader.ml - LLVM OCaml Interface --------------*- OCaml -*-===*
3
* The LLVM Compiler Infrastructure
5
* This file is distributed under the University of Illinois Open Source
6
* License. See LICENSE.TXT for details.
8
*===----------------------------------------------------------------------===*)
10
exception Error of string
12
let () = Callback.register_exception "Llvm_bitreader.Error" (Error "")
15
: Llvm.llcontext -> Llvm.llmemorybuffer -> Llvm.llmodule
17
external parse_bitcode
18
: Llvm.llcontext -> Llvm.llmemorybuffer -> Llvm.llmodule
19
= "llvm_parse_bitcode"