From ba55ca80346293badcd98c78a38d687c1c5ecd42 Mon Sep 17 00:00:00 2001 From: John Estabrook Date: Wed, 12 Aug 2026 14:54:41 -0500 Subject: T9231: change option name from recurse to descent The term 'recurse' has other uses; change to the term 'descent', which more aptly describes 'including descendants of a node'. --- src/diff_compare.ml | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src/diff_compare.ml') diff --git a/src/diff_compare.ml b/src/diff_compare.ml index 8a9f0e1..9e24c32 100644 --- a/src/diff_compare.ml +++ b/src/diff_compare.ml @@ -64,7 +64,7 @@ module Diff_compare = struct cmds = cmds; } - let diff_func ?recurse:_ (path : string list) res (m : change) = + let diff_func ?descent:_ (path : string list) res (m : change) = (* raises no exception: clone will always be called on extant path of left or right alert exn Vytree.get_values: @@ -132,7 +132,7 @@ end module D = Diff(Diff_compare) let add_empty_path src_node dest_node path = - (Config_tree.clone[@alert "-exn"]) ~recurse:false ~set_values:(Some []) src_node dest_node path + (Config_tree.clone[@alert "-exn"]) ~descent:false ~set_values:(Some []) src_node dest_node path let compare_at_path_maybe_empty left right path = let left = -- cgit v1.2.3