Address comments

Author: michaelpj

lsp-types/generated/Language/LSP/Protocol/Internal/Types/AnnotatedTextEdit.hs

@@ -18,24 +18,20 @@ import qualified Language.LSP.Protocol.Types.Common
 A special text edit with an additional change annotation.
 
 @since 3.16.0.
-
 -}
 data AnnotatedTextEdit = AnnotatedTextEdit 
   { {-|
   The range of the text document to be manipulated. To insert
   text into a document create a range where start === end.
-
   -}
   _range :: Language.LSP.Protocol.Internal.Types.Range.Range
   , {-|
   The string to be inserted. For delete operations use an
   empty string.
-
   -}
   _newText :: Data.Text.Text
   , {-|
   The actual identifier of the change annotation
-
   -}
   _annotationId :: Language.LSP.Protocol.Internal.Types.ChangeAnnotationIdentifier.ChangeAnnotationIdentifier
   }

lsp-types/generated/Language/LSP/Protocol/Internal/Types/ApplyWorkspaceEditParams.hs

@@ -15,19 +15,16 @@ import qualified Language.LSP.Protocol.Types.Common
 
 {-|
 The parameters passed via a apply workspace edit request.
-
 -}
 data ApplyWorkspaceEditParams = ApplyWorkspaceEditParams 
   { {-|
   An optional label of the workspace edit. This label is
   presented in the user interface for example on an undo
   stack to undo the workspace edit.
-
   -}
   _label :: (Maybe Data.Text.Text)
   , {-|
   The edits to apply.
-
   -}
   _edit :: Language.LSP.Protocol.Internal.Types.WorkspaceEdit.WorkspaceEdit
   }

lsp-types/generated/Language/LSP/Protocol/Internal/Types/ApplyWorkspaceEditResult.hs

@@ -16,26 +16,22 @@ import qualified Language.LSP.Protocol.Types.Common
 The result returned from the apply workspace edit request.
 
 @since 3.17 renamed from ApplyWorkspaceEditResponse
-
 -}
 data ApplyWorkspaceEditResult = ApplyWorkspaceEditResult 
   { {-|
   Indicates whether the edit was applied or not.
-
   -}
   _applied :: Bool
   , {-|
   An optional textual description for why the edit was not applied.
   This may be used by the server for diagnostic logging or to provide
   a suitable error for a request that triggered the edit.
-
   -}
   _failureReason :: (Maybe Data.Text.Text)
   , {-|
   Depending on the client's failure handling strategy `failedChange` might
   contain the index of the change that failed. This property is only available
   if the client signals a `failureHandlingStrategy` in its client capabilities.
-
   -}
   _failedChange :: (Maybe Language.LSP.Protocol.Types.Common.UInt)
   }

lsp-types/generated/Language/LSP/Protocol/Internal/Types/BaseSymbolInformation.hs

@@ -16,32 +16,27 @@ import qualified Language.LSP.Protocol.Types.Common
 
 {-|
 A base for all symbol information.
-
 -}
 data BaseSymbolInformation = BaseSymbolInformation 
   { {-|
   The name of this symbol.
-
   -}
   _name :: Data.Text.Text
   , {-|
   The kind of this symbol.
-
   -}
   _kind :: Language.LSP.Protocol.Internal.Types.SymbolKind.SymbolKind
   , {-|
   Tags for this symbol.
 
   @since 3.16.0
-
   -}
   _tags :: (Maybe [Language.LSP.Protocol.Internal.Types.SymbolTag.SymbolTag])
   , {-|
   The name of the symbol containing this symbol. This information is for
   user interface purposes (e.g. to render a qualifier in the user interface
   if necessary). It can't be used to re-infer a hierarchy for the document
   symbols.
-
   -}
   _containerName :: (Maybe Data.Text.Text)
   }

lsp-types/generated/Language/LSP/Protocol/Internal/Types/CallHierarchyClientCapabilities.hs

@@ -13,14 +13,12 @@ import qualified Language.LSP.Protocol.Types.Common
 
 {-|
 @since 3.16.0
-
 -}
 data CallHierarchyClientCapabilities = CallHierarchyClientCapabilities 
   { {-|
   Whether implementation supports dynamic registration. If this is set to `true`
   the client supports the new `(TextDocumentRegistrationOptions & StaticRegistrationOptions)`
   return value for the corresponding server capability as well.
-
   -}
   _dynamicRegistration :: (Maybe Bool)
   }

lsp-types/generated/Language/LSP/Protocol/Internal/Types/CallHierarchyIncomingCall.hs

@@ -17,18 +17,15 @@ import qualified Language.LSP.Protocol.Types.Common
 Represents an incoming call, e.g. a caller of a method or constructor.
 
 @since 3.16.0
-
 -}
 data CallHierarchyIncomingCall = CallHierarchyIncomingCall 
   { {-|
   The item that makes the call.
-
   -}
   _from :: Language.LSP.Protocol.Internal.Types.CallHierarchyItem.CallHierarchyItem
   , {-|
   The ranges at which the calls appear. This is relative to the caller
   denoted by `CallHierarchyIncomingCall.from`.
-
   -}
   _fromRanges :: [Language.LSP.Protocol.Internal.Types.Range.Range]
   }

lsp-types/generated/Language/LSP/Protocol/Internal/Types/CallHierarchyIncomingCallsParams.hs

@@ -17,18 +17,15 @@ import qualified Language.LSP.Protocol.Types.Common
 The parameter of a `callHierarchy/incomingCalls` request.
 
 @since 3.16.0
-
 -}
 data CallHierarchyIncomingCallsParams = CallHierarchyIncomingCallsParams 
   { {-|
   An optional token that a server can use to report work done progress.
-
   -}
   _workDoneToken :: (Maybe Language.LSP.Protocol.Internal.Types.ProgressToken.ProgressToken)
   , {-|
   An optional token that a server can use to report partial results (e.g. streaming) to
   the client.
-
   -}
   _partialResultToken :: (Maybe Language.LSP.Protocol.Internal.Types.ProgressToken.ProgressToken)
   , {-|

lsp-types/generated/Language/LSP/Protocol/Internal/Types/CallHierarchyItem.hs

@@ -22,49 +22,40 @@ Represents programming constructs like functions or constructors in the context
 of call hierarchy.
 
 @since 3.16.0
-
 -}
 data CallHierarchyItem = CallHierarchyItem 
   { {-|
   The name of this item.
-
   -}
   _name :: Data.Text.Text
   , {-|
   The kind of this item.
-
   -}
   _kind :: Language.LSP.Protocol.Internal.Types.SymbolKind.SymbolKind
   , {-|
   Tags for this item.
-
   -}
   _tags :: (Maybe [Language.LSP.Protocol.Internal.Types.SymbolTag.SymbolTag])
   , {-|
   More detail for this item, e.g. the signature of a function.
-
   -}
   _detail :: (Maybe Data.Text.Text)
   , {-|
   The resource identifier of this item.
-
   -}
   _uri :: Language.LSP.Protocol.Types.Uri.Uri
   , {-|
   The range enclosing this symbol not including leading/trailing whitespace but everything else, e.g. comments and code.
-
   -}
   _range :: Language.LSP.Protocol.Internal.Types.Range.Range
   , {-|
   The range that should be selected and revealed when this symbol is being picked, e.g. the name of a function.
   Must be contained by the `CallHierarchyItem.range`.
-
   -}
   _selectionRange :: Language.LSP.Protocol.Internal.Types.Range.Range
   , {-|
   A data entry field that is preserved between a call hierarchy prepare and
   incoming calls or outgoing calls requests.
-
   -}
   _data_ :: (Maybe Data.Aeson.Value)
   }

lsp-types/generated/Language/LSP/Protocol/Internal/Types/CallHierarchyOptions.hs

@@ -15,7 +15,6 @@ import qualified Language.LSP.Protocol.Types.Common
 Call hierarchy options used during static registration.
 
 @since 3.16.0
-
 -}
 data CallHierarchyOptions = CallHierarchyOptions 
   { {-|

lsp-types/generated/Language/LSP/Protocol/Internal/Types/CallHierarchyOutgoingCall.hs

@@ -17,19 +17,16 @@ import qualified Language.LSP.Protocol.Types.Common
 Represents an outgoing call, e.g. calling a getter from a method or a method from a constructor etc.
 
 @since 3.16.0
-
 -}
 data CallHierarchyOutgoingCall = CallHierarchyOutgoingCall 
   { {-|
   The item that is called.
-
   -}
   _to :: Language.LSP.Protocol.Internal.Types.CallHierarchyItem.CallHierarchyItem
   , {-|
   The range at which this item is called. This is the range relative to the caller, e.g the item
   passed to `CallHierarchyItemProvider.provideCallHierarchyOutgoingCalls`
   and not `CallHierarchyOutgoingCall.to`.
-
   -}
   _fromRanges :: [Language.LSP.Protocol.Internal.Types.Range.Range]
   }