bindings/ocaml/transforms/scalar/llvm_scalar_opts.mli

   1 (*===-- llvm_scalar_opts.mli - LLVM Ocaml Interface ------------*- OCaml -*-===*
   2  *
   3  *                     The LLVM Compiler Infrastructure
   4  *
   5  * This file is distributed under the University of Illinois Open Source
   6  * License. See LICENSE.TXT for details.
   7  *
   8  *===----------------------------------------------------------------------===*)
   9
  10 (** Scalar Transforms.
  11
  12     This interface provides an ocaml API for LLVM scalar transforms, the
  13     classes in the [LLVMScalarOpts] library. *)
  14
  15 (** See the [llvm::createConstantPropogationPass] function. *)
  16 external add_constant_propagation : [<Llvm.PassManager.any] Llvm.PassManager.t
  17                                     -> unit
  18                                   = "llvm_add_constant_propagation"
  19
  20 (** See the [llvm::createInstructionCombiningPass] function. *)
  21 external add_instruction_combining : [<Llvm.PassManager.any] Llvm.PassManager.t
  22                                      -> unit
  23                                    = "llvm_add_instruction_combining"
  24
  25 (** See the [llvm::createPromoteMemoryToRegisterPass] function. *)
  26 external
  27 add_memory_to_register_promotion : [<Llvm.PassManager.any] Llvm.PassManager.t
  28                                    -> unit
  29                                  = "llvm_add_memory_to_register_promotion"
  30
  31 (** See the [llvm::createDemoteMemoryToRegisterPass] function. *)
  32 external
  33 add_memory_to_register_demotion : [<Llvm.PassManager.any] Llvm.PassManager.t
  34                                   -> unit
  35                                 = "llvm_add_memory_to_register_demotion"
  36
  37 (** See the [llvm::createReassociatePass] function. *)
  38 external add_reassociation : [<Llvm.PassManager.any] Llvm.PassManager.t
  39                              -> unit
  40                            = "llvm_add_reassociation"
  41
  42 (** See the [llvm::createGVNPass] function. *)
  43 external add_gvn : [<Llvm.PassManager.any] Llvm.PassManager.t
  44                    -> unit
  45                  = "llvm_add_gvn"
  46
  47 (** See the [llvm::createCFGSimplificationPass] function. *)
  48 external add_cfg_simplification : [<Llvm.PassManager.any] Llvm.PassManager.t
  49                                   -> unit
  50                                 = "llvm_add_cfg_simplification"