19 lines · plain
1(*===-- llvm_bitreader.ml - LLVM OCaml Interface --------------*- OCaml -*-===*2 *3 * Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.4 * See https://llvm.org/LICENSE.txt for license information.5 * SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception6 *7 *===----------------------------------------------------------------------===*)8 9exception Error of string10 11let () = Callback.register_exception "Llvm_bitreader.Error" (Error "")12 13external get_module14 : Llvm.llcontext -> Llvm.llmemorybuffer -> Llvm.llmodule15 = "llvm_get_module"16external parse_bitcode17 : Llvm.llcontext -> Llvm.llmemorybuffer -> Llvm.llmodule18 = "llvm_parse_bitcode"19