166b8ab22586debccb1f787d4d52b7f042d4ddeb8John Bauman(*===-- llvm_bitreader.ml - LLVM Ocaml Interface ----------------*- C++ -*-===*
266b8ab22586debccb1f787d4d52b7f042d4ddeb8John Bauman *
366b8ab22586debccb1f787d4d52b7f042d4ddeb8John Bauman *                     The LLVM Compiler Infrastructure
466b8ab22586debccb1f787d4d52b7f042d4ddeb8John Bauman *
566b8ab22586debccb1f787d4d52b7f042d4ddeb8John Bauman * This file is distributed under the University of Illinois Open Source
666b8ab22586debccb1f787d4d52b7f042d4ddeb8John Bauman * License. See LICENSE.TXT for details.
766b8ab22586debccb1f787d4d52b7f042d4ddeb8John Bauman *
866b8ab22586debccb1f787d4d52b7f042d4ddeb8John Bauman *===----------------------------------------------------------------------===*)
966b8ab22586debccb1f787d4d52b7f042d4ddeb8John Bauman
1066b8ab22586debccb1f787d4d52b7f042d4ddeb8John Bauman
1166b8ab22586debccb1f787d4d52b7f042d4ddeb8John Baumanexception Error of string
1266b8ab22586debccb1f787d4d52b7f042d4ddeb8John Bauman
1366b8ab22586debccb1f787d4d52b7f042d4ddeb8John Baumanexternal register_exns : exn -> unit = "llvm_register_bitreader_exns"
1466b8ab22586debccb1f787d4d52b7f042d4ddeb8John Baumanlet _ = register_exns (Error "")
1566b8ab22586debccb1f787d4d52b7f042d4ddeb8John Bauman
1666b8ab22586debccb1f787d4d52b7f042d4ddeb8John Baumanexternal get_module : Llvm.llcontext -> Llvm.llmemorybuffer -> Llvm.llmodule
1766b8ab22586debccb1f787d4d52b7f042d4ddeb8John Bauman                    = "llvm_get_module"
1866b8ab22586debccb1f787d4d52b7f042d4ddeb8John Bauman
1966b8ab22586debccb1f787d4d52b7f042d4ddeb8John Baumanexternal parse_bitcode : Llvm.llcontext -> Llvm.llmemorybuffer -> Llvm.llmodule
2066b8ab22586debccb1f787d4d52b7f042d4ddeb8John Bauman                       = "llvm_parse_bitcode"
21