Types.SemanticTokensOptionsSourcetype t = {full : [ `Bool of bool | `Full of full ] option;legend : SemanticTokensLegend.t;range : bool option;workDoneProgress : bool option;}val create :
?full:[ `Bool of bool | `Full of full ] ->
legend:SemanticTokensLegend.t ->
?range:bool ->
?workDoneProgress:bool ->
unit ->
t