Skip to content

Commit

Permalink
fix for 4.14
Browse files Browse the repository at this point in the history
Signed-off-by: Rudi Grinberg <me@rgrinberg.com>
  • Loading branch information
rgrinberg committed May 14, 2024
1 parent 80fb260 commit f7398a4
Showing 1 changed file with 0 additions and 6 deletions.
6 changes: 0 additions & 6 deletions ocaml-lsp-server/src/document_symbol.ml
Original file line number Diff line number Diff line change
Expand Up @@ -177,15 +177,9 @@ let binding_document_symbol (binding : Parsetree.value_binding) ~ppx
| Some _, _ -> Property
| _ -> Variable
in
let detail =
Option.map binding.pvb_constraint ~f:(function
| Pvc_constraint { typ; _ } -> core_type_to_string typ
| Pvc_coercion { coercion; _ } -> core_type_to_string coercion)
in
[ DocumentSymbol.create
~name
~kind
?detail
~range:(Range.of_loc binding.pvb_loc)
~selectionRange:(Range.of_loc binding.pvb_pat.ppat_loc)
~children
Expand Down

0 comments on commit f7398a4

Please sign in to comment.