Home | History | Annotate | Download | only in tutorial

Lines Matching full:old_value

779                 let old_value = Hashtbl.find named_values var_name in
780 old_bindings := (var_name, old_value) :: !old_bindings;
803 List.iter (fun (var_name, old_value) ->
804 Hashtbl.add named_values var_name old_value
1486 let old_value = Hashtbl.find named_values var_name in
1487 old_bindings := (var_name, old_value) :: !old_bindings;
1499 List.iter (fun (var_name, old_value) ->
1500 Hashtbl.add named_values var_name old_value