| Gordon Henriksen | 2b0eed2 | 2007-12-11 00:20:48 +0000 | [diff] [blame] | 1 | (*===-- llvm_bitreader.ml - LLVM Ocaml Interface ----------------*- C++ -*-===* |
| 2 | * |
| 3 | * The LLVM Compiler Infrastructure |
| 4 | * |
| Chris Lattner | 6787a45 | 2007-12-29 22:59:10 +0000 | [diff] [blame] | 5 | * This file is distributed under the University of Illinois Open Source |
| 6 | * License. See LICENSE.TXT for details. |
| Gordon Henriksen | 2b0eed2 | 2007-12-11 00:20:48 +0000 | [diff] [blame] | 7 | * |
| 8 | *===----------------------------------------------------------------------===*) |
| 9 | |
| 10 | |
| Gordon Henriksen | 34eb6d8 | 2007-12-19 22:30:40 +0000 | [diff] [blame] | 11 | exception Error of string |
| Gordon Henriksen | 2b0eed2 | 2007-12-11 00:20:48 +0000 | [diff] [blame] | 12 | |
| Gordon Henriksen | 34eb6d8 | 2007-12-19 22:30:40 +0000 | [diff] [blame] | 13 | external register_exns : exn -> unit = "llvm_register_bitreader_exns" |
| 14 | let _ = register_exns (Error "") |
| Gordon Henriksen | 2b0eed2 | 2007-12-11 00:20:48 +0000 | [diff] [blame] | 15 | |
| Erick Tryzelaar | 98b05d6 | 2010-03-02 23:59:00 +0000 | [diff] [blame] | 16 | external get_module : Llvm.llcontext -> Llvm.llmemorybuffer -> Llvm.llmodule |
| 17 | = "llvm_get_module" |
| Erick Tryzelaar | 5c35b5c | 2009-08-19 06:40:29 +0000 | [diff] [blame] | 18 | |
| 19 | external parse_bitcode : Llvm.llcontext -> Llvm.llmemorybuffer -> Llvm.llmodule |
| Gordon Henriksen | 34eb6d8 | 2007-12-19 22:30:40 +0000 | [diff] [blame] | 20 | = "llvm_parse_bitcode" |