Skip to content

Commit

Permalink
Also check attribute on value binding nodes
Browse files Browse the repository at this point in the history
  • Loading branch information
voodoos committed May 16, 2024
1 parent de17945 commit 207eb41
Showing 1 changed file with 3 additions and 0 deletions.
3 changes: 3 additions & 0 deletions src/analysis/ast_iterators.ml
Original file line number Diff line number Diff line change
Expand Up @@ -59,6 +59,9 @@ let iter_on_usages ~f (local_defs : Mtyper.typedtree) =
{ occ_iter with
(* We avoid iterating on nodes that do not correspond to actual syntax
such as the ones introduced by PPXes *)
value_binding = (fun sub ({ vb_attributes; _ } as vb) ->
if not (is_hidden vb_attributes) then
occ_iter.value_binding sub vb);
module_binding = (fun sub ({ mb_attributes; _ } as mb) ->
if not (is_hidden mb_attributes) then
occ_iter.module_binding sub mb);
Expand Down

0 comments on commit 207eb41

Please sign in to comment.