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