Lines Matching refs:var_name

343     let create_entry_block_alloca the_function var_name =
345       build_alloca double_type var_name builder
375       | Ast.For (var_name, start, end_, step, body) ->
379           let alloca = create_entry_block_alloca the_function var_name in
393             try Some (Hashtbl.find named_values var_name) with Not_found -> None
395           Hashtbl.add named_values var_name alloca;
404           let cur_var = build_load alloca var_name builder in
426         let var_name = args.(i) in
428         let alloca = create_entry_block_alloca the_function var_name in
434         Hashtbl.add named_values var_name alloca;
751           Array.iter (fun (var_name, init) ->
771             let alloca = create_entry_block_alloca the_function var_name in
779                 let old_value = Hashtbl.find named_values var_name in
780                 old_bindings := (var_name, old_value) :: !old_bindings;
785             Hashtbl.add named_values var_name alloca;
803           List.iter (fun (var_name, old_value) ->
804             Hashtbl.add named_values var_name old_value
1236         let create_entry_block_alloca the_function var_name =
1238           build_alloca double_type var_name builder
1366           | Ast.For (var_name, start, end_, step, body) ->
1390               let alloca = create_entry_block_alloca the_function var_name in
1413                 try Some (Hashtbl.find named_values var_name) with Not_found -> None
1415               Hashtbl.add named_values var_name alloca;
1435               let cur_var = build_load alloca var_name builder in
1454               | Some old_val -> Hashtbl.add named_values var_name old_val
1466               Array.iter (fun (var_name, init) ->
1479                 let alloca = create_entry_block_alloca the_function var_name in
1486                     let old_value = Hashtbl.find named_values var_name in
1487                     old_bindings := (var_name, old_value) :: !old_bindings;
1492                 Hashtbl.add named_values var_name alloca;
1499               List.iter (fun (var_name, old_value) ->
1500                 Hashtbl.add named_values var_name old_value
1543             let var_name = args.(i) in
1545             let alloca = create_entry_block_alloca the_function var_name in
1551             Hashtbl.add named_values var_name alloca;