We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent 9483efe commit 4b1e518Copy full SHA for 4b1e518
analysis/src/SemanticTokens.ml
@@ -403,6 +403,14 @@ let command ~debug ~emitter ~path =
403
Ast_iterator.default_iterator.structure_item iterator item
404
in
405
406
+ let signature_item (iterator : Ast_iterator.iterator)
407
+ (item : Parsetree.signature_item) =
408
+ (match item.psig_desc with
409
+ | Psig_value {pval_name = {txt = id; loc}} -> emitter |> emitVariable ~id ~debug ~loc;
410
+ | _ -> ());
411
+ Ast_iterator.default_iterator.signature_item iterator item
412
+ in
413
+
414
let iterator =
415
{
416
Ast_iterator.default_iterator with
@@ -419,6 +427,7 @@ let command ~debug ~emitter ~path =
419
427
typ;
420
428
type_declaration;
421
429
structure_item;
430
+ signature_item;
422
431
}
423
432
424
433
0 commit comments