aboutsummaryrefslogtreecommitdiffstats
path: root/bindings/ocaml/analysis/llvm_analysis.mli
diff options
context:
space:
mode:
Diffstat (limited to 'bindings/ocaml/analysis/llvm_analysis.mli')
-rw-r--r--bindings/ocaml/analysis/llvm_analysis.mli12
1 files changed, 12 insertions, 0 deletions
diff --git a/bindings/ocaml/analysis/llvm_analysis.mli b/bindings/ocaml/analysis/llvm_analysis.mli
index 59ff6c6..fdaffb7 100644
--- a/bindings/ocaml/analysis/llvm_analysis.mli
+++ b/bindings/ocaml/analysis/llvm_analysis.mli
@@ -13,12 +13,24 @@
*===----------------------------------------------------------------------===*)
+(** [verify_module m] returns [None] if the module [m] is valid, and
+ [Some reason] if it is invalid. [reason] is a string containing a
+ human-readable validation report. See [llvm::verifyModule]. **)
external verify_module : Llvm.llmodule -> string option = "llvm_verify_module"
+(** [verify_function f] returns [None] if the function [f] is valid, and
+ [Some reason] if it is invalid. [reason] is a string containing a
+ human-readable validation report. See [llvm::verifyFunction]. **)
external verify_function : Llvm.llvalue -> bool = "llvm_verify_function"
+(** [verify_module m] returns if the module [m] is valid, but prints a
+ validation report to [stderr] and aborts the program if it is invalid. See
+ [llvm::verifyModule]. **)
external assert_valid_module : Llvm.llmodule -> unit
= "llvm_assert_valid_module"
+(** [verify_function f] returns if the function [f] is valid, but prints a
+ validation report to [stderr] and aborts the program if it is invalid. See
+ [llvm::verifyFunction]. **)
external assert_valid_function : Llvm.llvalue -> unit
= "llvm_assert_valid_function"