bindings/ocaml/bitreader/llvm_bitreader.ml

   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-exception
   6  *
   7  *===----------------------------------------------------------------------===*)
   8
   9 exception Error of string
  10
  11 let () = Callback.register_exception "Llvm_bitreader.Error" (Error "")
  12
  13 external get_module
  14   : Llvm.llcontext -> Llvm.llmemorybuffer -> Llvm.llmodule
  15   = "llvm_get_module"
  16 external parse_bitcode
  17   : Llvm.llcontext -> Llvm.llmemorybuffer -> Llvm.llmodule
  18   = "llvm_parse_bitcode"