diff options
Diffstat (limited to 'src/reference_tree.ml')
| -rw-r--r-- | src/reference_tree.ml | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/src/reference_tree.ml b/src/reference_tree.ml index 84abbd6..5243e82 100644 --- a/src/reference_tree.ml +++ b/src/reference_tree.ml @@ -219,3 +219,8 @@ let get_value_help reftree path = let data = Vytree.get_data reftree path in data.value_help +let get_completion_data reftree path = + let aux node = + let data = Vytree.data_of_node node in + (data.node_type, data.multi, data.help) + in List.map aux (Vytree.children_of_node @@ Vytree.get reftree path) |