Expose the rest of the llvm-c scalar opts to ocaml.
[oota-llvm.git] / bindings / ocaml / transforms / scalar / llvm_scalar_opts.ml
1 (*===-- llvm_scalar_opts.ml - 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 external add_constant_propagation : [<Llvm.PassManager.any] Llvm.PassManager.t
11                                     -> unit
12                                   = "llvm_add_constant_propagation"
13 external add_sccp : [<Llvm.PassManager.any] Llvm.PassManager.t -> unit
14                   = "llvm_add_sccp"
15 external add_dead_store_elimination : [<Llvm.PassManager.any] Llvm.PassManager.t
16                                       -> unit
17                                     = "llvm_add_dead_store_elimination"
18 external add_aggressive_dce : [<Llvm.PassManager.any] Llvm.PassManager.t -> unit
19                             = "llvm_add_aggressive_dce"
20 external
21 add_scalar_repl_aggregation : [<Llvm.PassManager.any] Llvm.PassManager.t -> unit
22                             = "llvm_add_scalar_repl_aggregation"
23 external add_ind_var_simplification : [<Llvm.PassManager.any] Llvm.PassManager.t
24                                       -> unit
25                                     = "llvm_add_ind_var_simplification"
26 external
27 add_instruction_combination : [<Llvm.PassManager.any] Llvm.PassManager.t
28                               -> unit
29                             = "llvm_add_instruction_combination"
30 external add_licm : [<Llvm.PassManager.any] Llvm.PassManager.t
31                                 -> unit
32                               = "llvm_add_licm"
33 external add_loop_unswitch : [<Llvm.PassManager.any] Llvm.PassManager.t
34                                 -> unit
35                               = "llvm_add_loop_unswitch"
36 external add_loop_unroll : [<Llvm.PassManager.any] Llvm.PassManager.t
37                                 -> unit
38                               = "llvm_add_loop_unroll"
39 external add_loop_rotation : [<Llvm.PassManager.any] Llvm.PassManager.t
40                              -> unit
41                            = "llvm_add_loop_rotation"
42 external add_loop_index_split : [<Llvm.PassManager.any] Llvm.PassManager.t
43                                 -> unit
44                               = "llvm_add_loop_index_split"
45 external
46 add_memory_to_register_promotion : [<Llvm.PassManager.any] Llvm.PassManager.t
47                                    -> unit
48                                  = "llvm_add_memory_to_register_promotion"
49 external
50 add_memory_to_register_demotion : [<Llvm.PassManager.any] Llvm.PassManager.t
51                                   -> unit
52                                 = "llvm_add_memory_to_register_demotion"
53 external add_reassociation : [<Llvm.PassManager.any] Llvm.PassManager.t -> unit
54                            = "llvm_add_reassociation"
55 external add_jump_threading : [<Llvm.PassManager.any] Llvm.PassManager.t
56                                 -> unit
57                               = "llvm_add_jump_threading"
58 external add_cfg_simplification : [<Llvm.PassManager.any] Llvm.PassManager.t
59                                   -> unit
60                                 = "llvm_add_cfg_simplification"
61 external
62 add_tail_call_elimination : [<Llvm.PassManager.any] Llvm.PassManager.t -> unit
63                           = "llvm_add_tail_call_elimination" 
64 external add_gvn : [<Llvm.PassManager.any] Llvm.PassManager.t
65                    -> unit
66                  = "llvm_add_gvn"
67 external add_memcpy_opt : [<Llvm.PassManager.any] Llvm.PassManager.t
68                                 -> unit
69                               = "llvm_add_memcpy_opt"
70 external add_loop_deletion : [<Llvm.PassManager.any] Llvm.PassManager.t
71                              -> unit
72                            = "llvm_add_loop_deletion"
73 external
74 add_lib_call_simplification : [<Llvm.PassManager.any] Llvm.PassManager.t -> unit
75                             = "llvm_add_lib_call_simplification"