Lines Matching refs:let
14 let context = global_context ()
15 let void_type = Llvm.void_type context
18 let print_checkpoints = false
20 let suite name f =
28 let filename = Sys.argv.(1)
29 let m = create_module context filename
34 let test_transforms () =
35 let (++) x f = ignore (f x); x in
37 let fty = function_type void_type [| |] in
38 let fn = define_function "fn" fty m in
41 let td = DataLayout.create (target_triple m) in
86 let _ =
