diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Lens.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Lens.hs index cbcd9bfb2..f41ad7871 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Lens.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Lens.hs @@ -632,4 +632,4 @@ Control.Lens.TH.makeFieldsNoPrefix ''Language.LSP.Protocol.Internal.Types.Notebo Control.Lens.TH.makeFieldsNoPrefix ''Language.LSP.Protocol.Internal.Types.ShowMessageRequestClientCapabilities.ShowMessageRequestClientCapabilities Control.Lens.TH.makeFieldsNoPrefix ''Language.LSP.Protocol.Internal.Types.ShowDocumentClientCapabilities.ShowDocumentClientCapabilities Control.Lens.TH.makeFieldsNoPrefix ''Language.LSP.Protocol.Internal.Types.RegularExpressionsClientCapabilities.RegularExpressionsClientCapabilities -Control.Lens.TH.makeFieldsNoPrefix ''Language.LSP.Protocol.Internal.Types.MarkdownClientCapabilities.MarkdownClientCapabilities \ No newline at end of file +Control.Lens.TH.makeFieldsNoPrefix ''Language.LSP.Protocol.Internal.Types.MarkdownClientCapabilities.MarkdownClientCapabilities diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Method.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Method.hs index a1d89a672..ea113d62f 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Method.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Method.hs @@ -1062,4 +1062,4 @@ messageKind SMethod_SetTrace = MM.SNotification messageKind SMethod_LogTrace = MM.SNotification messageKind SMethod_CancelRequest = MM.SNotification messageKind SMethod_Progress = MM.SNotification -messageKind (SMethod_CustomMethod _) = MM.SBothTypes \ No newline at end of file +messageKind (SMethod_CustomMethod _) = MM.SBothTypes diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types.hs index fa75b3519..3fc5a0fd1 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types.hs @@ -376,3 +376,4 @@ import Language.LSP.Protocol.Internal.Types.WorkspaceSymbolParams as Export import Language.LSP.Protocol.Internal.Types.WorkspaceSymbolRegistrationOptions as Export import Language.LSP.Protocol.Internal.Types.WorkspaceUnchangedDocumentDiagnosticReport as Export + diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/AnnotatedTextEdit.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/AnnotatedTextEdit.hs index f7f63d68d..dbd2702a9 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/AnnotatedTextEdit.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/AnnotatedTextEdit.hs @@ -44,4 +44,4 @@ instance Aeson.ToJSON AnnotatedTextEdit where ,["annotationId" Aeson..= arg2]] instance Aeson.FromJSON AnnotatedTextEdit where - parseJSON = Aeson.withObject "AnnotatedTextEdit" $ \arg -> AnnotatedTextEdit <$> arg Aeson..: "range" <*> arg Aeson..: "newText" <*> arg Aeson..: "annotationId" \ No newline at end of file + parseJSON = Aeson.withObject "AnnotatedTextEdit" $ \arg -> AnnotatedTextEdit <$> arg Aeson..: "range" <*> arg Aeson..: "newText" <*> arg Aeson..: "annotationId" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ApplyWorkspaceEditParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ApplyWorkspaceEditParams.hs index 2781d2e75..b4696d749 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ApplyWorkspaceEditParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ApplyWorkspaceEditParams.hs @@ -36,4 +36,4 @@ instance Aeson.ToJSON ApplyWorkspaceEditParams where ,["edit" Aeson..= arg1]] instance Aeson.FromJSON ApplyWorkspaceEditParams where - parseJSON = Aeson.withObject "ApplyWorkspaceEditParams" $ \arg -> ApplyWorkspaceEditParams <$> arg Aeson..:! "label" <*> arg Aeson..: "edit" \ No newline at end of file + parseJSON = Aeson.withObject "ApplyWorkspaceEditParams" $ \arg -> ApplyWorkspaceEditParams <$> arg Aeson..:! "label" <*> arg Aeson..: "edit" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ApplyWorkspaceEditResult.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ApplyWorkspaceEditResult.hs index 453101ac5..decebb84f 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ApplyWorkspaceEditResult.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ApplyWorkspaceEditResult.hs @@ -44,4 +44,4 @@ instance Aeson.ToJSON ApplyWorkspaceEditResult where ,"failedChange" Language.LSP.Protocol.Types.Common..=? arg2] instance Aeson.FromJSON ApplyWorkspaceEditResult where - parseJSON = Aeson.withObject "ApplyWorkspaceEditResult" $ \arg -> ApplyWorkspaceEditResult <$> arg Aeson..: "applied" <*> arg Aeson..:! "failureReason" <*> arg Aeson..:! "failedChange" \ No newline at end of file + parseJSON = Aeson.withObject "ApplyWorkspaceEditResult" $ \arg -> ApplyWorkspaceEditResult <$> arg Aeson..: "applied" <*> arg Aeson..:! "failureReason" <*> arg Aeson..:! "failedChange" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/BaseSymbolInformation.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/BaseSymbolInformation.hs index 7f551ad51..8463c5298 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/BaseSymbolInformation.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/BaseSymbolInformation.hs @@ -50,4 +50,4 @@ instance Aeson.ToJSON BaseSymbolInformation where ,"containerName" Language.LSP.Protocol.Types.Common..=? arg3] instance Aeson.FromJSON BaseSymbolInformation where - parseJSON = Aeson.withObject "BaseSymbolInformation" $ \arg -> BaseSymbolInformation <$> arg Aeson..: "name" <*> arg Aeson..: "kind" <*> arg Aeson..:! "tags" <*> arg Aeson..:! "containerName" \ No newline at end of file + parseJSON = Aeson.withObject "BaseSymbolInformation" $ \arg -> BaseSymbolInformation <$> arg Aeson..: "name" <*> arg Aeson..: "kind" <*> arg Aeson..:! "tags" <*> arg Aeson..:! "containerName" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CallHierarchyClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CallHierarchyClientCapabilities.hs index b4b8e0d1a..1474b06f1 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CallHierarchyClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CallHierarchyClientCapabilities.hs @@ -29,4 +29,4 @@ instance Aeson.ToJSON CallHierarchyClientCapabilities where toJSON (CallHierarchyClientCapabilities arg0) = Aeson.object $ concat $ ["dynamicRegistration" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON CallHierarchyClientCapabilities where - parseJSON = Aeson.withObject "CallHierarchyClientCapabilities" $ \arg -> CallHierarchyClientCapabilities <$> arg Aeson..:! "dynamicRegistration" \ No newline at end of file + parseJSON = Aeson.withObject "CallHierarchyClientCapabilities" $ \arg -> CallHierarchyClientCapabilities <$> arg Aeson..:! "dynamicRegistration" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CallHierarchyIncomingCall.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CallHierarchyIncomingCall.hs index 383bb7a8c..0d7cc762c 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CallHierarchyIncomingCall.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CallHierarchyIncomingCall.hs @@ -37,4 +37,4 @@ instance Aeson.ToJSON CallHierarchyIncomingCall where ,["fromRanges" Aeson..= arg1]] instance Aeson.FromJSON CallHierarchyIncomingCall where - parseJSON = Aeson.withObject "CallHierarchyIncomingCall" $ \arg -> CallHierarchyIncomingCall <$> arg Aeson..: "from" <*> arg Aeson..: "fromRanges" \ No newline at end of file + parseJSON = Aeson.withObject "CallHierarchyIncomingCall" $ \arg -> CallHierarchyIncomingCall <$> arg Aeson..: "from" <*> arg Aeson..: "fromRanges" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CallHierarchyIncomingCallsParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CallHierarchyIncomingCallsParams.hs index 7f5021e27..09a54b044 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CallHierarchyIncomingCallsParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CallHierarchyIncomingCallsParams.hs @@ -42,4 +42,4 @@ instance Aeson.ToJSON CallHierarchyIncomingCallsParams where ,["item" Aeson..= arg2]] instance Aeson.FromJSON CallHierarchyIncomingCallsParams where - parseJSON = Aeson.withObject "CallHierarchyIncomingCallsParams" $ \arg -> CallHierarchyIncomingCallsParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" <*> arg Aeson..: "item" \ No newline at end of file + parseJSON = Aeson.withObject "CallHierarchyIncomingCallsParams" $ \arg -> CallHierarchyIncomingCallsParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" <*> arg Aeson..: "item" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CallHierarchyItem.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CallHierarchyItem.hs index f5c087d4f..8f62d9533 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CallHierarchyItem.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CallHierarchyItem.hs @@ -73,4 +73,4 @@ instance Aeson.ToJSON CallHierarchyItem where ,"data" Language.LSP.Protocol.Types.Common..=? arg7] instance Aeson.FromJSON CallHierarchyItem where - parseJSON = Aeson.withObject "CallHierarchyItem" $ \arg -> CallHierarchyItem <$> arg Aeson..: "name" <*> arg Aeson..: "kind" <*> arg Aeson..:! "tags" <*> arg Aeson..:! "detail" <*> arg Aeson..: "uri" <*> arg Aeson..: "range" <*> arg Aeson..: "selectionRange" <*> arg Aeson..:! "data" \ No newline at end of file + parseJSON = Aeson.withObject "CallHierarchyItem" $ \arg -> CallHierarchyItem <$> arg Aeson..: "name" <*> arg Aeson..: "kind" <*> arg Aeson..:! "tags" <*> arg Aeson..:! "detail" <*> arg Aeson..: "uri" <*> arg Aeson..: "range" <*> arg Aeson..: "selectionRange" <*> arg Aeson..:! "data" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CallHierarchyOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CallHierarchyOptions.hs index 4a97baaa6..77b235b79 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CallHierarchyOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CallHierarchyOptions.hs @@ -29,4 +29,4 @@ instance Aeson.ToJSON CallHierarchyOptions where toJSON (CallHierarchyOptions arg0) = Aeson.object $ concat $ ["workDoneProgress" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON CallHierarchyOptions where - parseJSON = Aeson.withObject "CallHierarchyOptions" $ \arg -> CallHierarchyOptions <$> arg Aeson..:! "workDoneProgress" \ No newline at end of file + parseJSON = Aeson.withObject "CallHierarchyOptions" $ \arg -> CallHierarchyOptions <$> arg Aeson..:! "workDoneProgress" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CallHierarchyOutgoingCall.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CallHierarchyOutgoingCall.hs index 9c4294764..3328e2cd3 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CallHierarchyOutgoingCall.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CallHierarchyOutgoingCall.hs @@ -38,4 +38,4 @@ instance Aeson.ToJSON CallHierarchyOutgoingCall where ,["fromRanges" Aeson..= arg1]] instance Aeson.FromJSON CallHierarchyOutgoingCall where - parseJSON = Aeson.withObject "CallHierarchyOutgoingCall" $ \arg -> CallHierarchyOutgoingCall <$> arg Aeson..: "to" <*> arg Aeson..: "fromRanges" \ No newline at end of file + parseJSON = Aeson.withObject "CallHierarchyOutgoingCall" $ \arg -> CallHierarchyOutgoingCall <$> arg Aeson..: "to" <*> arg Aeson..: "fromRanges" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CallHierarchyOutgoingCallsParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CallHierarchyOutgoingCallsParams.hs index 96c44c1de..8afb46ba6 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CallHierarchyOutgoingCallsParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CallHierarchyOutgoingCallsParams.hs @@ -42,4 +42,4 @@ instance Aeson.ToJSON CallHierarchyOutgoingCallsParams where ,["item" Aeson..= arg2]] instance Aeson.FromJSON CallHierarchyOutgoingCallsParams where - parseJSON = Aeson.withObject "CallHierarchyOutgoingCallsParams" $ \arg -> CallHierarchyOutgoingCallsParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" <*> arg Aeson..: "item" \ No newline at end of file + parseJSON = Aeson.withObject "CallHierarchyOutgoingCallsParams" $ \arg -> CallHierarchyOutgoingCallsParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" <*> arg Aeson..: "item" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CallHierarchyPrepareParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CallHierarchyPrepareParams.hs index 61dcea608..3ae0509dc 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CallHierarchyPrepareParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CallHierarchyPrepareParams.hs @@ -42,4 +42,4 @@ instance Aeson.ToJSON CallHierarchyPrepareParams where ,"workDoneToken" Language.LSP.Protocol.Types.Common..=? arg2] instance Aeson.FromJSON CallHierarchyPrepareParams where - parseJSON = Aeson.withObject "CallHierarchyPrepareParams" $ \arg -> CallHierarchyPrepareParams <$> arg Aeson..: "textDocument" <*> arg Aeson..: "position" <*> arg Aeson..:! "workDoneToken" \ No newline at end of file + parseJSON = Aeson.withObject "CallHierarchyPrepareParams" $ \arg -> CallHierarchyPrepareParams <$> arg Aeson..: "textDocument" <*> arg Aeson..: "position" <*> arg Aeson..:! "workDoneToken" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CallHierarchyRegistrationOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CallHierarchyRegistrationOptions.hs index 71eae367b..0699ade7b 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CallHierarchyRegistrationOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CallHierarchyRegistrationOptions.hs @@ -43,4 +43,4 @@ instance Aeson.ToJSON CallHierarchyRegistrationOptions where ,"id" Language.LSP.Protocol.Types.Common..=? arg2] instance Aeson.FromJSON CallHierarchyRegistrationOptions where - parseJSON = Aeson.withObject "CallHierarchyRegistrationOptions" $ \arg -> CallHierarchyRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "id" \ No newline at end of file + parseJSON = Aeson.withObject "CallHierarchyRegistrationOptions" $ \arg -> CallHierarchyRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "id" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CancelParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CancelParams.hs index 97a8f0c2a..6c87603dc 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CancelParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CancelParams.hs @@ -28,4 +28,4 @@ instance Aeson.ToJSON CancelParams where toJSON (CancelParams arg0) = Aeson.object $ concat $ [["id" Aeson..= arg0]] instance Aeson.FromJSON CancelParams where - parseJSON = Aeson.withObject "CancelParams" $ \arg -> CancelParams <$> arg Aeson..: "id" \ No newline at end of file + parseJSON = Aeson.withObject "CancelParams" $ \arg -> CancelParams <$> arg Aeson..: "id" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ChangeAnnotation.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ChangeAnnotation.hs index 286f8984c..afd30ccce 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ChangeAnnotation.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ChangeAnnotation.hs @@ -43,4 +43,4 @@ instance Aeson.ToJSON ChangeAnnotation where ,"description" Language.LSP.Protocol.Types.Common..=? arg2] instance Aeson.FromJSON ChangeAnnotation where - parseJSON = Aeson.withObject "ChangeAnnotation" $ \arg -> ChangeAnnotation <$> arg Aeson..: "label" <*> arg Aeson..:! "needsConfirmation" <*> arg Aeson..:! "description" \ No newline at end of file + parseJSON = Aeson.withObject "ChangeAnnotation" $ \arg -> ChangeAnnotation <$> arg Aeson..: "label" <*> arg Aeson..:! "needsConfirmation" <*> arg Aeson..:! "description" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ChangeAnnotationIdentifier.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ChangeAnnotationIdentifier.hs index f2f6e3690..d403d288d 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ChangeAnnotationIdentifier.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ChangeAnnotationIdentifier.hs @@ -20,4 +20,4 @@ newtype ChangeAnnotationIdentifier = ChangeAnnotationIdentifier Data.Text.Text , Aeson.ToJSONKey , Aeson.FromJSONKey ) deriving stock (Show, Eq, Ord, Generic) - deriving anyclass (NFData) \ No newline at end of file + deriving anyclass (NFData) diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ClientCapabilities.hs index b2fc26cee..d27b57775 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ClientCapabilities.hs @@ -62,4 +62,4 @@ instance Aeson.ToJSON ClientCapabilities where ,"experimental" Language.LSP.Protocol.Types.Common..=? arg5] instance Aeson.FromJSON ClientCapabilities where - parseJSON = Aeson.withObject "ClientCapabilities" $ \arg -> ClientCapabilities <$> arg Aeson..:! "workspace" <*> arg Aeson..:! "textDocument" <*> arg Aeson..:! "notebookDocument" <*> arg Aeson..:! "window" <*> arg Aeson..:! "general" <*> arg Aeson..:! "experimental" \ No newline at end of file + parseJSON = Aeson.withObject "ClientCapabilities" $ \arg -> ClientCapabilities <$> arg Aeson..:! "workspace" <*> arg Aeson..:! "textDocument" <*> arg Aeson..:! "notebookDocument" <*> arg Aeson..:! "window" <*> arg Aeson..:! "general" <*> arg Aeson..:! "experimental" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeAction.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeAction.hs index b1db3384d..d77578c24 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeAction.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeAction.hs @@ -99,4 +99,4 @@ instance Aeson.ToJSON CodeAction where ,"data" Language.LSP.Protocol.Types.Common..=? arg7] instance Aeson.FromJSON CodeAction where - parseJSON = Aeson.withObject "CodeAction" $ \arg -> CodeAction <$> arg Aeson..: "title" <*> arg Aeson..:! "kind" <*> arg Aeson..:! "diagnostics" <*> arg Aeson..:! "isPreferred" <*> arg Aeson..:! "disabled" <*> arg Aeson..:! "edit" <*> arg Aeson..:! "command" <*> arg Aeson..:! "data" \ No newline at end of file + parseJSON = Aeson.withObject "CodeAction" $ \arg -> CodeAction <$> arg Aeson..: "title" <*> arg Aeson..:! "kind" <*> arg Aeson..:! "diagnostics" <*> arg Aeson..:! "isPreferred" <*> arg Aeson..:! "disabled" <*> arg Aeson..:! "edit" <*> arg Aeson..:! "command" <*> arg Aeson..:! "data" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeActionClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeActionClientCapabilities.hs index 3d7284cc7..19c79fe43 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeActionClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeActionClientCapabilities.hs @@ -81,4 +81,4 @@ instance Aeson.ToJSON CodeActionClientCapabilities where ,"honorsChangeAnnotations" Language.LSP.Protocol.Types.Common..=? arg6] instance Aeson.FromJSON CodeActionClientCapabilities where - parseJSON = Aeson.withObject "CodeActionClientCapabilities" $ \arg -> CodeActionClientCapabilities <$> arg Aeson..:! "dynamicRegistration" <*> arg Aeson..:! "codeActionLiteralSupport" <*> arg Aeson..:! "isPreferredSupport" <*> arg Aeson..:! "disabledSupport" <*> arg Aeson..:! "dataSupport" <*> arg Aeson..:! "resolveSupport" <*> arg Aeson..:! "honorsChangeAnnotations" \ No newline at end of file + parseJSON = Aeson.withObject "CodeActionClientCapabilities" $ \arg -> CodeActionClientCapabilities <$> arg Aeson..:! "dynamicRegistration" <*> arg Aeson..:! "codeActionLiteralSupport" <*> arg Aeson..:! "isPreferredSupport" <*> arg Aeson..:! "disabledSupport" <*> arg Aeson..:! "dataSupport" <*> arg Aeson..:! "resolveSupport" <*> arg Aeson..:! "honorsChangeAnnotations" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeActionContext.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeActionContext.hs index 04e0decaf..fa50f5eaa 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeActionContext.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeActionContext.hs @@ -50,4 +50,4 @@ instance Aeson.ToJSON CodeActionContext where ,"triggerKind" Language.LSP.Protocol.Types.Common..=? arg2] instance Aeson.FromJSON CodeActionContext where - parseJSON = Aeson.withObject "CodeActionContext" $ \arg -> CodeActionContext <$> arg Aeson..: "diagnostics" <*> arg Aeson..:! "only" <*> arg Aeson..:! "triggerKind" \ No newline at end of file + parseJSON = Aeson.withObject "CodeActionContext" $ \arg -> CodeActionContext <$> arg Aeson..: "diagnostics" <*> arg Aeson..:! "only" <*> arg Aeson..:! "triggerKind" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeActionKind.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeActionKind.hs index 700bc015b..24c9188fe 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeActionKind.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeActionKind.hs @@ -126,3 +126,4 @@ instance Language.LSP.Protocol.Types.LspEnum.LspOpenEnum CodeActionKind where fromOpenEnumBaseType "source.fixAll" = CodeActionKind_SourceFixAll fromOpenEnumBaseType arg = CodeActionKind_Custom arg + diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeActionOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeActionOptions.hs index 70d38dccc..c5f5a8e05 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeActionOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeActionOptions.hs @@ -44,4 +44,4 @@ instance Aeson.ToJSON CodeActionOptions where ,"resolveProvider" Language.LSP.Protocol.Types.Common..=? arg2] instance Aeson.FromJSON CodeActionOptions where - parseJSON = Aeson.withObject "CodeActionOptions" $ \arg -> CodeActionOptions <$> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "codeActionKinds" <*> arg Aeson..:! "resolveProvider" \ No newline at end of file + parseJSON = Aeson.withObject "CodeActionOptions" $ \arg -> CodeActionOptions <$> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "codeActionKinds" <*> arg Aeson..:! "resolveProvider" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeActionParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeActionParams.hs index 46dad8ff6..9bdf99a44 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeActionParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeActionParams.hs @@ -52,4 +52,4 @@ instance Aeson.ToJSON CodeActionParams where ,["context" Aeson..= arg4]] instance Aeson.FromJSON CodeActionParams where - parseJSON = Aeson.withObject "CodeActionParams" $ \arg -> CodeActionParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" <*> arg Aeson..: "textDocument" <*> arg Aeson..: "range" <*> arg Aeson..: "context" \ No newline at end of file + parseJSON = Aeson.withObject "CodeActionParams" $ \arg -> CodeActionParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" <*> arg Aeson..: "textDocument" <*> arg Aeson..: "range" <*> arg Aeson..: "context" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeActionRegistrationOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeActionRegistrationOptions.hs index 1968aa4dd..80e684057 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeActionRegistrationOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeActionRegistrationOptions.hs @@ -51,4 +51,4 @@ instance Aeson.ToJSON CodeActionRegistrationOptions where ,"resolveProvider" Language.LSP.Protocol.Types.Common..=? arg3] instance Aeson.FromJSON CodeActionRegistrationOptions where - parseJSON = Aeson.withObject "CodeActionRegistrationOptions" $ \arg -> CodeActionRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "codeActionKinds" <*> arg Aeson..:! "resolveProvider" \ No newline at end of file + parseJSON = Aeson.withObject "CodeActionRegistrationOptions" $ \arg -> CodeActionRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "codeActionKinds" <*> arg Aeson..:! "resolveProvider" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeActionTriggerKind.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeActionTriggerKind.hs index c7425e6ac..41f7e26a1 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeActionTriggerKind.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeActionTriggerKind.hs @@ -46,3 +46,4 @@ instance Language.LSP.Protocol.Types.LspEnum.LspEnum CodeActionTriggerKind where fromEnumBaseType 2 = pure CodeActionTriggerKind_Automatic fromEnumBaseType _ = Nothing + diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeDescription.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeDescription.hs index 3038afa42..a3379ca31 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeDescription.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeDescription.hs @@ -30,4 +30,4 @@ instance Aeson.ToJSON CodeDescription where toJSON (CodeDescription arg0) = Aeson.object $ concat $ [["href" Aeson..= arg0]] instance Aeson.FromJSON CodeDescription where - parseJSON = Aeson.withObject "CodeDescription" $ \arg -> CodeDescription <$> arg Aeson..: "href" \ No newline at end of file + parseJSON = Aeson.withObject "CodeDescription" $ \arg -> CodeDescription <$> arg Aeson..: "href" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeLens.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeLens.hs index 2d52b449a..4b0c866fc 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeLens.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeLens.hs @@ -45,4 +45,4 @@ instance Aeson.ToJSON CodeLens where ,"data" Language.LSP.Protocol.Types.Common..=? arg2] instance Aeson.FromJSON CodeLens where - parseJSON = Aeson.withObject "CodeLens" $ \arg -> CodeLens <$> arg Aeson..: "range" <*> arg Aeson..:! "command" <*> arg Aeson..:! "data" \ No newline at end of file + parseJSON = Aeson.withObject "CodeLens" $ \arg -> CodeLens <$> arg Aeson..: "range" <*> arg Aeson..:! "command" <*> arg Aeson..:! "data" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeLensClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeLensClientCapabilities.hs index c9cf397a3..3120e320d 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeLensClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeLensClientCapabilities.hs @@ -27,4 +27,4 @@ instance Aeson.ToJSON CodeLensClientCapabilities where toJSON (CodeLensClientCapabilities arg0) = Aeson.object $ concat $ ["dynamicRegistration" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON CodeLensClientCapabilities where - parseJSON = Aeson.withObject "CodeLensClientCapabilities" $ \arg -> CodeLensClientCapabilities <$> arg Aeson..:! "dynamicRegistration" \ No newline at end of file + parseJSON = Aeson.withObject "CodeLensClientCapabilities" $ \arg -> CodeLensClientCapabilities <$> arg Aeson..:! "dynamicRegistration" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeLensOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeLensOptions.hs index 50151762e..ed8067a9b 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeLensOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeLensOptions.hs @@ -32,4 +32,4 @@ instance Aeson.ToJSON CodeLensOptions where ,"resolveProvider" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON CodeLensOptions where - parseJSON = Aeson.withObject "CodeLensOptions" $ \arg -> CodeLensOptions <$> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "resolveProvider" \ No newline at end of file + parseJSON = Aeson.withObject "CodeLensOptions" $ \arg -> CodeLensOptions <$> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "resolveProvider" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeLensParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeLensParams.hs index 7dc36589f..bbfc89272 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeLensParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeLensParams.hs @@ -40,4 +40,4 @@ instance Aeson.ToJSON CodeLensParams where ,["textDocument" Aeson..= arg2]] instance Aeson.FromJSON CodeLensParams where - parseJSON = Aeson.withObject "CodeLensParams" $ \arg -> CodeLensParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" <*> arg Aeson..: "textDocument" \ No newline at end of file + parseJSON = Aeson.withObject "CodeLensParams" $ \arg -> CodeLensParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" <*> arg Aeson..: "textDocument" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeLensRegistrationOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeLensRegistrationOptions.hs index 43df52e3a..3b35e27a6 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeLensRegistrationOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeLensRegistrationOptions.hs @@ -39,4 +39,4 @@ instance Aeson.ToJSON CodeLensRegistrationOptions where ,"resolveProvider" Language.LSP.Protocol.Types.Common..=? arg2] instance Aeson.FromJSON CodeLensRegistrationOptions where - parseJSON = Aeson.withObject "CodeLensRegistrationOptions" $ \arg -> CodeLensRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "resolveProvider" \ No newline at end of file + parseJSON = Aeson.withObject "CodeLensRegistrationOptions" $ \arg -> CodeLensRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "resolveProvider" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeLensWorkspaceClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeLensWorkspaceClientCapabilities.hs index 58df6d2fc..9304dba00 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeLensWorkspaceClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CodeLensWorkspaceClientCapabilities.hs @@ -33,4 +33,4 @@ instance Aeson.ToJSON CodeLensWorkspaceClientCapabilities where toJSON (CodeLensWorkspaceClientCapabilities arg0) = Aeson.object $ concat $ ["refreshSupport" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON CodeLensWorkspaceClientCapabilities where - parseJSON = Aeson.withObject "CodeLensWorkspaceClientCapabilities" $ \arg -> CodeLensWorkspaceClientCapabilities <$> arg Aeson..:! "refreshSupport" \ No newline at end of file + parseJSON = Aeson.withObject "CodeLensWorkspaceClientCapabilities" $ \arg -> CodeLensWorkspaceClientCapabilities <$> arg Aeson..:! "refreshSupport" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Color.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Color.hs index faa2d3709..eabb7a6be 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Color.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Color.hs @@ -42,4 +42,4 @@ instance Aeson.ToJSON Color where ,["alpha" Aeson..= arg3]] instance Aeson.FromJSON Color where - parseJSON = Aeson.withObject "Color" $ \arg -> Color <$> arg Aeson..: "red" <*> arg Aeson..: "green" <*> arg Aeson..: "blue" <*> arg Aeson..: "alpha" \ No newline at end of file + parseJSON = Aeson.withObject "Color" $ \arg -> Color <$> arg Aeson..: "red" <*> arg Aeson..: "green" <*> arg Aeson..: "blue" <*> arg Aeson..: "alpha" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ColorInformation.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ColorInformation.hs index 4e7c09519..ac26b7d42 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ColorInformation.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ColorInformation.hs @@ -34,4 +34,4 @@ instance Aeson.ToJSON ColorInformation where ,["color" Aeson..= arg1]] instance Aeson.FromJSON ColorInformation where - parseJSON = Aeson.withObject "ColorInformation" $ \arg -> ColorInformation <$> arg Aeson..: "range" <*> arg Aeson..: "color" \ No newline at end of file + parseJSON = Aeson.withObject "ColorInformation" $ \arg -> ColorInformation <$> arg Aeson..: "range" <*> arg Aeson..: "color" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ColorPresentation.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ColorPresentation.hs index 419e8eb18..bc9d03fb4 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ColorPresentation.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ColorPresentation.hs @@ -44,4 +44,4 @@ instance Aeson.ToJSON ColorPresentation where ,"additionalTextEdits" Language.LSP.Protocol.Types.Common..=? arg2] instance Aeson.FromJSON ColorPresentation where - parseJSON = Aeson.withObject "ColorPresentation" $ \arg -> ColorPresentation <$> arg Aeson..: "label" <*> arg Aeson..:! "textEdit" <*> arg Aeson..:! "additionalTextEdits" \ No newline at end of file + parseJSON = Aeson.withObject "ColorPresentation" $ \arg -> ColorPresentation <$> arg Aeson..: "label" <*> arg Aeson..:! "textEdit" <*> arg Aeson..:! "additionalTextEdits" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ColorPresentationParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ColorPresentationParams.hs index 47b3c69eb..aeb89d9d5 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ColorPresentationParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ColorPresentationParams.hs @@ -52,4 +52,4 @@ instance Aeson.ToJSON ColorPresentationParams where ,["range" Aeson..= arg4]] instance Aeson.FromJSON ColorPresentationParams where - parseJSON = Aeson.withObject "ColorPresentationParams" $ \arg -> ColorPresentationParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" <*> arg Aeson..: "textDocument" <*> arg Aeson..: "color" <*> arg Aeson..: "range" \ No newline at end of file + parseJSON = Aeson.withObject "ColorPresentationParams" $ \arg -> ColorPresentationParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" <*> arg Aeson..: "textDocument" <*> arg Aeson..: "color" <*> arg Aeson..: "range" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Command.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Command.hs index 31fc51865..35ea09c65 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Command.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Command.hs @@ -43,4 +43,4 @@ instance Aeson.ToJSON Command where ,"arguments" Language.LSP.Protocol.Types.Common..=? arg2] instance Aeson.FromJSON Command where - parseJSON = Aeson.withObject "Command" $ \arg -> Command <$> arg Aeson..: "title" <*> arg Aeson..: "command" <*> arg Aeson..:! "arguments" \ No newline at end of file + parseJSON = Aeson.withObject "Command" $ \arg -> Command <$> arg Aeson..: "title" <*> arg Aeson..: "command" <*> arg Aeson..:! "arguments" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionClientCapabilities.hs index 7ef525ebd..cd6c2e5ab 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionClientCapabilities.hs @@ -67,4 +67,4 @@ instance Aeson.ToJSON CompletionClientCapabilities where ,"completionList" Language.LSP.Protocol.Types.Common..=? arg5] instance Aeson.FromJSON CompletionClientCapabilities where - parseJSON = Aeson.withObject "CompletionClientCapabilities" $ \arg -> CompletionClientCapabilities <$> arg Aeson..:! "dynamicRegistration" <*> arg Aeson..:! "completionItem" <*> arg Aeson..:! "completionItemKind" <*> arg Aeson..:! "insertTextMode" <*> arg Aeson..:! "contextSupport" <*> arg Aeson..:! "completionList" \ No newline at end of file + parseJSON = Aeson.withObject "CompletionClientCapabilities" $ \arg -> CompletionClientCapabilities <$> arg Aeson..:! "dynamicRegistration" <*> arg Aeson..:! "completionItem" <*> arg Aeson..:! "completionItemKind" <*> arg Aeson..:! "insertTextMode" <*> arg Aeson..:! "contextSupport" <*> arg Aeson..:! "completionList" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionContext.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionContext.hs index 1050bf579..2be7726d4 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionContext.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionContext.hs @@ -35,4 +35,4 @@ instance Aeson.ToJSON CompletionContext where ,"triggerCharacter" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON CompletionContext where - parseJSON = Aeson.withObject "CompletionContext" $ \arg -> CompletionContext <$> arg Aeson..: "triggerKind" <*> arg Aeson..:! "triggerCharacter" \ No newline at end of file + parseJSON = Aeson.withObject "CompletionContext" $ \arg -> CompletionContext <$> arg Aeson..: "triggerKind" <*> arg Aeson..:! "triggerCharacter" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionItem.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionItem.hs index b93e93d3d..0807de32a 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionItem.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionItem.hs @@ -209,4 +209,4 @@ instance Aeson.ToJSON CompletionItem where ,"data" Language.LSP.Protocol.Types.Common..=? arg18] instance Aeson.FromJSON CompletionItem where - parseJSON = Aeson.withObject "CompletionItem" $ \arg -> CompletionItem <$> arg Aeson..: "label" <*> arg Aeson..:! "labelDetails" <*> arg Aeson..:! "kind" <*> arg Aeson..:! "tags" <*> arg Aeson..:! "detail" <*> arg Aeson..:! "documentation" <*> arg Aeson..:! "deprecated" <*> arg Aeson..:! "preselect" <*> arg Aeson..:! "sortText" <*> arg Aeson..:! "filterText" <*> arg Aeson..:! "insertText" <*> arg Aeson..:! "insertTextFormat" <*> arg Aeson..:! "insertTextMode" <*> arg Aeson..:! "textEdit" <*> arg Aeson..:! "textEditText" <*> arg Aeson..:! "additionalTextEdits" <*> arg Aeson..:! "commitCharacters" <*> arg Aeson..:! "command" <*> arg Aeson..:! "data" \ No newline at end of file + parseJSON = Aeson.withObject "CompletionItem" $ \arg -> CompletionItem <$> arg Aeson..: "label" <*> arg Aeson..:! "labelDetails" <*> arg Aeson..:! "kind" <*> arg Aeson..:! "tags" <*> arg Aeson..:! "detail" <*> arg Aeson..:! "documentation" <*> arg Aeson..:! "deprecated" <*> arg Aeson..:! "preselect" <*> arg Aeson..:! "sortText" <*> arg Aeson..:! "filterText" <*> arg Aeson..:! "insertText" <*> arg Aeson..:! "insertTextFormat" <*> arg Aeson..:! "insertTextMode" <*> arg Aeson..:! "textEdit" <*> arg Aeson..:! "textEditText" <*> arg Aeson..:! "additionalTextEdits" <*> arg Aeson..:! "commitCharacters" <*> arg Aeson..:! "command" <*> arg Aeson..:! "data" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionItemKind.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionItemKind.hs index 85e122589..86480c553 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionItemKind.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionItemKind.hs @@ -202,3 +202,4 @@ instance Language.LSP.Protocol.Types.LspEnum.LspEnum CompletionItemKind where fromEnumBaseType 25 = pure CompletionItemKind_TypeParameter fromEnumBaseType _ = Nothing + diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionItemLabelDetails.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionItemLabelDetails.hs index 45a664fa0..350903cb5 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionItemLabelDetails.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionItemLabelDetails.hs @@ -37,4 +37,4 @@ instance Aeson.ToJSON CompletionItemLabelDetails where ,"description" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON CompletionItemLabelDetails where - parseJSON = Aeson.withObject "CompletionItemLabelDetails" $ \arg -> CompletionItemLabelDetails <$> arg Aeson..:! "detail" <*> arg Aeson..:! "description" \ No newline at end of file + parseJSON = Aeson.withObject "CompletionItemLabelDetails" $ \arg -> CompletionItemLabelDetails <$> arg Aeson..:! "detail" <*> arg Aeson..:! "description" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionItemTag.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionItemTag.hs index 971790b29..005c5482f 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionItemTag.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionItemTag.hs @@ -37,3 +37,4 @@ instance Language.LSP.Protocol.Types.LspEnum.LspEnum CompletionItemTag where fromEnumBaseType 1 = pure CompletionItemTag_Deprecated fromEnumBaseType _ = Nothing + diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionList.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionList.hs index ba1b79a40..5959b1f8e 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionList.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionList.hs @@ -60,4 +60,4 @@ instance Aeson.ToJSON CompletionList where ,["items" Aeson..= arg2]] instance Aeson.FromJSON CompletionList where - parseJSON = Aeson.withObject "CompletionList" $ \arg -> CompletionList <$> arg Aeson..: "isIncomplete" <*> arg Aeson..:! "itemDefaults" <*> arg Aeson..: "items" \ No newline at end of file + parseJSON = Aeson.withObject "CompletionList" $ \arg -> CompletionList <$> arg Aeson..: "isIncomplete" <*> arg Aeson..:! "itemDefaults" <*> arg Aeson..: "items" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionOptions.hs index 5baaaf555..d5c3cc4c2 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionOptions.hs @@ -67,4 +67,4 @@ instance Aeson.ToJSON CompletionOptions where ,"completionItem" Language.LSP.Protocol.Types.Common..=? arg4] instance Aeson.FromJSON CompletionOptions where - parseJSON = Aeson.withObject "CompletionOptions" $ \arg -> CompletionOptions <$> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "triggerCharacters" <*> arg Aeson..:! "allCommitCharacters" <*> arg Aeson..:! "resolveProvider" <*> arg Aeson..:! "completionItem" \ No newline at end of file + parseJSON = Aeson.withObject "CompletionOptions" $ \arg -> CompletionOptions <$> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "triggerCharacters" <*> arg Aeson..:! "allCommitCharacters" <*> arg Aeson..:! "resolveProvider" <*> arg Aeson..:! "completionItem" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionParams.hs index e99815840..a1a5293f1 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionParams.hs @@ -53,4 +53,4 @@ instance Aeson.ToJSON CompletionParams where ,"context" Language.LSP.Protocol.Types.Common..=? arg4] instance Aeson.FromJSON CompletionParams where - parseJSON = Aeson.withObject "CompletionParams" $ \arg -> CompletionParams <$> arg Aeson..: "textDocument" <*> arg Aeson..: "position" <*> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" <*> arg Aeson..:! "context" \ No newline at end of file + parseJSON = Aeson.withObject "CompletionParams" $ \arg -> CompletionParams <$> arg Aeson..: "textDocument" <*> arg Aeson..: "position" <*> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" <*> arg Aeson..:! "context" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionRegistrationOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionRegistrationOptions.hs index dba9eb0aa..c354fe6ba 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionRegistrationOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionRegistrationOptions.hs @@ -74,4 +74,4 @@ instance Aeson.ToJSON CompletionRegistrationOptions where ,"completionItem" Language.LSP.Protocol.Types.Common..=? arg5] instance Aeson.FromJSON CompletionRegistrationOptions where - parseJSON = Aeson.withObject "CompletionRegistrationOptions" $ \arg -> CompletionRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "triggerCharacters" <*> arg Aeson..:! "allCommitCharacters" <*> arg Aeson..:! "resolveProvider" <*> arg Aeson..:! "completionItem" \ No newline at end of file + parseJSON = Aeson.withObject "CompletionRegistrationOptions" $ \arg -> CompletionRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "triggerCharacters" <*> arg Aeson..:! "allCommitCharacters" <*> arg Aeson..:! "resolveProvider" <*> arg Aeson..:! "completionItem" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionTriggerKind.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionTriggerKind.hs index 109a3e839..2e9a31f68 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionTriggerKind.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CompletionTriggerKind.hs @@ -50,3 +50,4 @@ instance Language.LSP.Protocol.Types.LspEnum.LspEnum CompletionTriggerKind where fromEnumBaseType 3 = pure CompletionTriggerKind_TriggerForIncompleteCompletions fromEnumBaseType _ = Nothing + diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ConfigurationItem.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ConfigurationItem.hs index fbd60a604..9d90a5044 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ConfigurationItem.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ConfigurationItem.hs @@ -33,4 +33,4 @@ instance Aeson.ToJSON ConfigurationItem where ,"section" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON ConfigurationItem where - parseJSON = Aeson.withObject "ConfigurationItem" $ \arg -> ConfigurationItem <$> arg Aeson..:! "scopeUri" <*> arg Aeson..:! "section" \ No newline at end of file + parseJSON = Aeson.withObject "ConfigurationItem" $ \arg -> ConfigurationItem <$> arg Aeson..:! "scopeUri" <*> arg Aeson..:! "section" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ConfigurationParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ConfigurationParams.hs index da0872806..9bd0a96c0 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ConfigurationParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ConfigurationParams.hs @@ -28,4 +28,4 @@ instance Aeson.ToJSON ConfigurationParams where toJSON (ConfigurationParams arg0) = Aeson.object $ concat $ [["items" Aeson..= arg0]] instance Aeson.FromJSON ConfigurationParams where - parseJSON = Aeson.withObject "ConfigurationParams" $ \arg -> ConfigurationParams <$> arg Aeson..: "items" \ No newline at end of file + parseJSON = Aeson.withObject "ConfigurationParams" $ \arg -> ConfigurationParams <$> arg Aeson..: "items" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CreateFile.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CreateFile.hs index e1113fcfd..c9d399ea9 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CreateFile.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CreateFile.hs @@ -48,4 +48,4 @@ instance Aeson.ToJSON CreateFile where ,"options" Language.LSP.Protocol.Types.Common..=? arg3] instance Aeson.FromJSON CreateFile where - parseJSON = Aeson.withObject "CreateFile" $ \arg -> CreateFile <$> arg Aeson..:! "annotationId" <*> arg Aeson..: "kind" <*> arg Aeson..: "uri" <*> arg Aeson..:! "options" \ No newline at end of file + parseJSON = Aeson.withObject "CreateFile" $ \arg -> CreateFile <$> arg Aeson..:! "annotationId" <*> arg Aeson..: "kind" <*> arg Aeson..: "uri" <*> arg Aeson..:! "options" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CreateFileOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CreateFileOptions.hs index f141807f3..9cc751a98 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CreateFileOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CreateFileOptions.hs @@ -32,4 +32,4 @@ instance Aeson.ToJSON CreateFileOptions where ,"ignoreIfExists" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON CreateFileOptions where - parseJSON = Aeson.withObject "CreateFileOptions" $ \arg -> CreateFileOptions <$> arg Aeson..:! "overwrite" <*> arg Aeson..:! "ignoreIfExists" \ No newline at end of file + parseJSON = Aeson.withObject "CreateFileOptions" $ \arg -> CreateFileOptions <$> arg Aeson..:! "overwrite" <*> arg Aeson..:! "ignoreIfExists" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CreateFilesParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CreateFilesParams.hs index ea5fedce1..500212cd9 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CreateFilesParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/CreateFilesParams.hs @@ -31,4 +31,4 @@ instance Aeson.ToJSON CreateFilesParams where toJSON (CreateFilesParams arg0) = Aeson.object $ concat $ [["files" Aeson..= arg0]] instance Aeson.FromJSON CreateFilesParams where - parseJSON = Aeson.withObject "CreateFilesParams" $ \arg -> CreateFilesParams <$> arg Aeson..: "files" \ No newline at end of file + parseJSON = Aeson.withObject "CreateFilesParams" $ \arg -> CreateFilesParams <$> arg Aeson..: "files" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Declaration.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Declaration.hs index c83963367..daf62a4e4 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Declaration.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Declaration.hs @@ -18,4 +18,4 @@ The declaration of a symbol representation as one or many `Location`. newtype Declaration = Declaration (Language.LSP.Protocol.Internal.Types.Location.Location Language.LSP.Protocol.Types.Common.|? [Language.LSP.Protocol.Internal.Types.Location.Location]) deriving newtype (Aeson.ToJSON, Aeson.FromJSON) deriving stock (Show, Eq, Ord, Generic) - deriving anyclass (NFData) \ No newline at end of file + deriving anyclass (NFData) diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DeclarationClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DeclarationClientCapabilities.hs index 38b522545..7c0409e4e 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DeclarationClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DeclarationClientCapabilities.hs @@ -34,4 +34,4 @@ instance Aeson.ToJSON DeclarationClientCapabilities where ,"linkSupport" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON DeclarationClientCapabilities where - parseJSON = Aeson.withObject "DeclarationClientCapabilities" $ \arg -> DeclarationClientCapabilities <$> arg Aeson..:! "dynamicRegistration" <*> arg Aeson..:! "linkSupport" \ No newline at end of file + parseJSON = Aeson.withObject "DeclarationClientCapabilities" $ \arg -> DeclarationClientCapabilities <$> arg Aeson..:! "dynamicRegistration" <*> arg Aeson..:! "linkSupport" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DeclarationLink.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DeclarationLink.hs index 97a17c702..c1c33f5e4 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DeclarationLink.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DeclarationLink.hs @@ -23,4 +23,4 @@ by the client. newtype DeclarationLink = DeclarationLink Language.LSP.Protocol.Internal.Types.LocationLink.LocationLink deriving newtype (Aeson.ToJSON, Aeson.FromJSON) deriving stock (Show, Eq, Ord, Generic) - deriving anyclass (NFData) \ No newline at end of file + deriving anyclass (NFData) diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DeclarationOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DeclarationOptions.hs index d2d9591ff..f5134eb60 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DeclarationOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DeclarationOptions.hs @@ -27,4 +27,4 @@ instance Aeson.ToJSON DeclarationOptions where toJSON (DeclarationOptions arg0) = Aeson.object $ concat $ ["workDoneProgress" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON DeclarationOptions where - parseJSON = Aeson.withObject "DeclarationOptions" $ \arg -> DeclarationOptions <$> arg Aeson..:! "workDoneProgress" \ No newline at end of file + parseJSON = Aeson.withObject "DeclarationOptions" $ \arg -> DeclarationOptions <$> arg Aeson..:! "workDoneProgress" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DeclarationParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DeclarationParams.hs index f41a8c206..c3df7b748 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DeclarationParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DeclarationParams.hs @@ -46,4 +46,4 @@ instance Aeson.ToJSON DeclarationParams where ,"partialResultToken" Language.LSP.Protocol.Types.Common..=? arg3] instance Aeson.FromJSON DeclarationParams where - parseJSON = Aeson.withObject "DeclarationParams" $ \arg -> DeclarationParams <$> arg Aeson..: "textDocument" <*> arg Aeson..: "position" <*> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" \ No newline at end of file + parseJSON = Aeson.withObject "DeclarationParams" $ \arg -> DeclarationParams <$> arg Aeson..: "textDocument" <*> arg Aeson..: "position" <*> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DeclarationRegistrationOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DeclarationRegistrationOptions.hs index 42171e472..ba04ce139 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DeclarationRegistrationOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DeclarationRegistrationOptions.hs @@ -41,4 +41,4 @@ instance Aeson.ToJSON DeclarationRegistrationOptions where ,"id" Language.LSP.Protocol.Types.Common..=? arg2] instance Aeson.FromJSON DeclarationRegistrationOptions where - parseJSON = Aeson.withObject "DeclarationRegistrationOptions" $ \arg -> DeclarationRegistrationOptions <$> arg Aeson..:! "workDoneProgress" <*> arg Aeson..: "documentSelector" <*> arg Aeson..:! "id" \ No newline at end of file + parseJSON = Aeson.withObject "DeclarationRegistrationOptions" $ \arg -> DeclarationRegistrationOptions <$> arg Aeson..:! "workDoneProgress" <*> arg Aeson..: "documentSelector" <*> arg Aeson..:! "id" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Definition.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Definition.hs index 5b385e7f1..c50fbc818 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Definition.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Definition.hs @@ -23,4 +23,4 @@ by the client. newtype Definition = Definition (Language.LSP.Protocol.Internal.Types.Location.Location Language.LSP.Protocol.Types.Common.|? [Language.LSP.Protocol.Internal.Types.Location.Location]) deriving newtype (Aeson.ToJSON, Aeson.FromJSON) deriving stock (Show, Eq, Ord, Generic) - deriving anyclass (NFData) \ No newline at end of file + deriving anyclass (NFData) diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DefinitionClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DefinitionClientCapabilities.hs index 619b6f81d..201b1e86d 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DefinitionClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DefinitionClientCapabilities.hs @@ -34,4 +34,4 @@ instance Aeson.ToJSON DefinitionClientCapabilities where ,"linkSupport" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON DefinitionClientCapabilities where - parseJSON = Aeson.withObject "DefinitionClientCapabilities" $ \arg -> DefinitionClientCapabilities <$> arg Aeson..:! "dynamicRegistration" <*> arg Aeson..:! "linkSupport" \ No newline at end of file + parseJSON = Aeson.withObject "DefinitionClientCapabilities" $ \arg -> DefinitionClientCapabilities <$> arg Aeson..:! "dynamicRegistration" <*> arg Aeson..:! "linkSupport" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DefinitionLink.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DefinitionLink.hs index 72e9a502e..7ef178704 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DefinitionLink.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DefinitionLink.hs @@ -20,4 +20,4 @@ the defining symbol newtype DefinitionLink = DefinitionLink Language.LSP.Protocol.Internal.Types.LocationLink.LocationLink deriving newtype (Aeson.ToJSON, Aeson.FromJSON) deriving stock (Show, Eq, Ord, Generic) - deriving anyclass (NFData) \ No newline at end of file + deriving anyclass (NFData) diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DefinitionOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DefinitionOptions.hs index bc1dc5920..70ebb867a 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DefinitionOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DefinitionOptions.hs @@ -27,4 +27,4 @@ instance Aeson.ToJSON DefinitionOptions where toJSON (DefinitionOptions arg0) = Aeson.object $ concat $ ["workDoneProgress" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON DefinitionOptions where - parseJSON = Aeson.withObject "DefinitionOptions" $ \arg -> DefinitionOptions <$> arg Aeson..:! "workDoneProgress" \ No newline at end of file + parseJSON = Aeson.withObject "DefinitionOptions" $ \arg -> DefinitionOptions <$> arg Aeson..:! "workDoneProgress" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DefinitionParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DefinitionParams.hs index 419ecbd38..cf08dd4cb 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DefinitionParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DefinitionParams.hs @@ -46,4 +46,4 @@ instance Aeson.ToJSON DefinitionParams where ,"partialResultToken" Language.LSP.Protocol.Types.Common..=? arg3] instance Aeson.FromJSON DefinitionParams where - parseJSON = Aeson.withObject "DefinitionParams" $ \arg -> DefinitionParams <$> arg Aeson..: "textDocument" <*> arg Aeson..: "position" <*> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" \ No newline at end of file + parseJSON = Aeson.withObject "DefinitionParams" $ \arg -> DefinitionParams <$> arg Aeson..: "textDocument" <*> arg Aeson..: "position" <*> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DefinitionRegistrationOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DefinitionRegistrationOptions.hs index 91287d110..3539d7d74 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DefinitionRegistrationOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DefinitionRegistrationOptions.hs @@ -34,4 +34,4 @@ instance Aeson.ToJSON DefinitionRegistrationOptions where ,"workDoneProgress" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON DefinitionRegistrationOptions where - parseJSON = Aeson.withObject "DefinitionRegistrationOptions" $ \arg -> DefinitionRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" \ No newline at end of file + parseJSON = Aeson.withObject "DefinitionRegistrationOptions" $ \arg -> DefinitionRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DeleteFile.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DeleteFile.hs index 1f1b26b63..090e1d99b 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DeleteFile.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DeleteFile.hs @@ -48,4 +48,4 @@ instance Aeson.ToJSON DeleteFile where ,"options" Language.LSP.Protocol.Types.Common..=? arg3] instance Aeson.FromJSON DeleteFile where - parseJSON = Aeson.withObject "DeleteFile" $ \arg -> DeleteFile <$> arg Aeson..:! "annotationId" <*> arg Aeson..: "kind" <*> arg Aeson..: "uri" <*> arg Aeson..:! "options" \ No newline at end of file + parseJSON = Aeson.withObject "DeleteFile" $ \arg -> DeleteFile <$> arg Aeson..:! "annotationId" <*> arg Aeson..: "kind" <*> arg Aeson..: "uri" <*> arg Aeson..:! "options" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DeleteFileOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DeleteFileOptions.hs index baa5874ed..c57f02847 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DeleteFileOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DeleteFileOptions.hs @@ -32,4 +32,4 @@ instance Aeson.ToJSON DeleteFileOptions where ,"ignoreIfNotExists" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON DeleteFileOptions where - parseJSON = Aeson.withObject "DeleteFileOptions" $ \arg -> DeleteFileOptions <$> arg Aeson..:! "recursive" <*> arg Aeson..:! "ignoreIfNotExists" \ No newline at end of file + parseJSON = Aeson.withObject "DeleteFileOptions" $ \arg -> DeleteFileOptions <$> arg Aeson..:! "recursive" <*> arg Aeson..:! "ignoreIfNotExists" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DeleteFilesParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DeleteFilesParams.hs index ea37d6a3f..35be4b410 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DeleteFilesParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DeleteFilesParams.hs @@ -31,4 +31,4 @@ instance Aeson.ToJSON DeleteFilesParams where toJSON (DeleteFilesParams arg0) = Aeson.object $ concat $ [["files" Aeson..= arg0]] instance Aeson.FromJSON DeleteFilesParams where - parseJSON = Aeson.withObject "DeleteFilesParams" $ \arg -> DeleteFilesParams <$> arg Aeson..: "files" \ No newline at end of file + parseJSON = Aeson.withObject "DeleteFilesParams" $ \arg -> DeleteFilesParams <$> arg Aeson..: "files" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Diagnostic.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Diagnostic.hs index ec4334496..242a46ad4 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Diagnostic.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Diagnostic.hs @@ -87,4 +87,4 @@ instance Aeson.ToJSON Diagnostic where ,"data" Language.LSP.Protocol.Types.Common..=? arg8] instance Aeson.FromJSON Diagnostic where - parseJSON = Aeson.withObject "Diagnostic" $ \arg -> Diagnostic <$> arg Aeson..: "range" <*> arg Aeson..:! "severity" <*> arg Aeson..:! "code" <*> arg Aeson..:! "codeDescription" <*> arg Aeson..:! "source" <*> arg Aeson..: "message" <*> arg Aeson..:! "tags" <*> arg Aeson..:! "relatedInformation" <*> arg Aeson..:! "data" \ No newline at end of file + parseJSON = Aeson.withObject "Diagnostic" $ \arg -> Diagnostic <$> arg Aeson..: "range" <*> arg Aeson..:! "severity" <*> arg Aeson..:! "code" <*> arg Aeson..:! "codeDescription" <*> arg Aeson..:! "source" <*> arg Aeson..: "message" <*> arg Aeson..:! "tags" <*> arg Aeson..:! "relatedInformation" <*> arg Aeson..:! "data" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DiagnosticClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DiagnosticClientCapabilities.hs index 21d09e64a..1ee86e83a 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DiagnosticClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DiagnosticClientCapabilities.hs @@ -36,4 +36,4 @@ instance Aeson.ToJSON DiagnosticClientCapabilities where ,"relatedDocumentSupport" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON DiagnosticClientCapabilities where - parseJSON = Aeson.withObject "DiagnosticClientCapabilities" $ \arg -> DiagnosticClientCapabilities <$> arg Aeson..:! "dynamicRegistration" <*> arg Aeson..:! "relatedDocumentSupport" \ No newline at end of file + parseJSON = Aeson.withObject "DiagnosticClientCapabilities" $ \arg -> DiagnosticClientCapabilities <$> arg Aeson..:! "dynamicRegistration" <*> arg Aeson..:! "relatedDocumentSupport" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DiagnosticOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DiagnosticOptions.hs index 3fc015165..55941b5d9 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DiagnosticOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DiagnosticOptions.hs @@ -49,4 +49,4 @@ instance Aeson.ToJSON DiagnosticOptions where ,["workspaceDiagnostics" Aeson..= arg3]] instance Aeson.FromJSON DiagnosticOptions where - parseJSON = Aeson.withObject "DiagnosticOptions" $ \arg -> DiagnosticOptions <$> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "identifier" <*> arg Aeson..: "interFileDependencies" <*> arg Aeson..: "workspaceDiagnostics" \ No newline at end of file + parseJSON = Aeson.withObject "DiagnosticOptions" $ \arg -> DiagnosticOptions <$> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "identifier" <*> arg Aeson..: "interFileDependencies" <*> arg Aeson..: "workspaceDiagnostics" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DiagnosticRegistrationOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DiagnosticRegistrationOptions.hs index 695f9f3fb..a92a854a4 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DiagnosticRegistrationOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DiagnosticRegistrationOptions.hs @@ -62,4 +62,4 @@ instance Aeson.ToJSON DiagnosticRegistrationOptions where ,"id" Language.LSP.Protocol.Types.Common..=? arg5] instance Aeson.FromJSON DiagnosticRegistrationOptions where - parseJSON = Aeson.withObject "DiagnosticRegistrationOptions" $ \arg -> DiagnosticRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "identifier" <*> arg Aeson..: "interFileDependencies" <*> arg Aeson..: "workspaceDiagnostics" <*> arg Aeson..:! "id" \ No newline at end of file + parseJSON = Aeson.withObject "DiagnosticRegistrationOptions" $ \arg -> DiagnosticRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "identifier" <*> arg Aeson..: "interFileDependencies" <*> arg Aeson..: "workspaceDiagnostics" <*> arg Aeson..:! "id" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DiagnosticRelatedInformation.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DiagnosticRelatedInformation.hs index 85dfa13b7..68b648bb8 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DiagnosticRelatedInformation.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DiagnosticRelatedInformation.hs @@ -36,4 +36,4 @@ instance Aeson.ToJSON DiagnosticRelatedInformation where ,["message" Aeson..= arg1]] instance Aeson.FromJSON DiagnosticRelatedInformation where - parseJSON = Aeson.withObject "DiagnosticRelatedInformation" $ \arg -> DiagnosticRelatedInformation <$> arg Aeson..: "location" <*> arg Aeson..: "message" \ No newline at end of file + parseJSON = Aeson.withObject "DiagnosticRelatedInformation" $ \arg -> DiagnosticRelatedInformation <$> arg Aeson..: "location" <*> arg Aeson..: "message" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DiagnosticServerCancellationData.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DiagnosticServerCancellationData.hs index 82cc8e01f..40e1680e5 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DiagnosticServerCancellationData.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DiagnosticServerCancellationData.hs @@ -29,4 +29,4 @@ instance Aeson.ToJSON DiagnosticServerCancellationData where toJSON (DiagnosticServerCancellationData arg0) = Aeson.object $ concat $ [["retriggerRequest" Aeson..= arg0]] instance Aeson.FromJSON DiagnosticServerCancellationData where - parseJSON = Aeson.withObject "DiagnosticServerCancellationData" $ \arg -> DiagnosticServerCancellationData <$> arg Aeson..: "retriggerRequest" \ No newline at end of file + parseJSON = Aeson.withObject "DiagnosticServerCancellationData" $ \arg -> DiagnosticServerCancellationData <$> arg Aeson..: "retriggerRequest" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DiagnosticSeverity.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DiagnosticSeverity.hs index 2a7d75e10..505ffae5a 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DiagnosticSeverity.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DiagnosticSeverity.hs @@ -55,3 +55,4 @@ instance Language.LSP.Protocol.Types.LspEnum.LspEnum DiagnosticSeverity where fromEnumBaseType 4 = pure DiagnosticSeverity_Hint fromEnumBaseType _ = Nothing + diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DiagnosticTag.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DiagnosticTag.hs index 0c0042ef0..c4399e009 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DiagnosticTag.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DiagnosticTag.hs @@ -48,3 +48,4 @@ instance Language.LSP.Protocol.Types.LspEnum.LspEnum DiagnosticTag where fromEnumBaseType 2 = pure DiagnosticTag_Deprecated fromEnumBaseType _ = Nothing + diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DiagnosticWorkspaceClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DiagnosticWorkspaceClientCapabilities.hs index 5c75506a6..34f990272 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DiagnosticWorkspaceClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DiagnosticWorkspaceClientCapabilities.hs @@ -35,4 +35,4 @@ instance Aeson.ToJSON DiagnosticWorkspaceClientCapabilities where toJSON (DiagnosticWorkspaceClientCapabilities arg0) = Aeson.object $ concat $ ["refreshSupport" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON DiagnosticWorkspaceClientCapabilities where - parseJSON = Aeson.withObject "DiagnosticWorkspaceClientCapabilities" $ \arg -> DiagnosticWorkspaceClientCapabilities <$> arg Aeson..:! "refreshSupport" \ No newline at end of file + parseJSON = Aeson.withObject "DiagnosticWorkspaceClientCapabilities" $ \arg -> DiagnosticWorkspaceClientCapabilities <$> arg Aeson..:! "refreshSupport" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidChangeConfigurationClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidChangeConfigurationClientCapabilities.hs index 855e2ebb5..d1459b090 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidChangeConfigurationClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidChangeConfigurationClientCapabilities.hs @@ -27,4 +27,4 @@ instance Aeson.ToJSON DidChangeConfigurationClientCapabilities where toJSON (DidChangeConfigurationClientCapabilities arg0) = Aeson.object $ concat $ ["dynamicRegistration" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON DidChangeConfigurationClientCapabilities where - parseJSON = Aeson.withObject "DidChangeConfigurationClientCapabilities" $ \arg -> DidChangeConfigurationClientCapabilities <$> arg Aeson..:! "dynamicRegistration" \ No newline at end of file + parseJSON = Aeson.withObject "DidChangeConfigurationClientCapabilities" $ \arg -> DidChangeConfigurationClientCapabilities <$> arg Aeson..:! "dynamicRegistration" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidChangeConfigurationParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidChangeConfigurationParams.hs index a16cf8d39..2f82e0b4b 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidChangeConfigurationParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidChangeConfigurationParams.hs @@ -28,4 +28,4 @@ instance Aeson.ToJSON DidChangeConfigurationParams where toJSON (DidChangeConfigurationParams arg0) = Aeson.object $ concat $ [["settings" Aeson..= arg0]] instance Aeson.FromJSON DidChangeConfigurationParams where - parseJSON = Aeson.withObject "DidChangeConfigurationParams" $ \arg -> DidChangeConfigurationParams <$> arg Aeson..: "settings" \ No newline at end of file + parseJSON = Aeson.withObject "DidChangeConfigurationParams" $ \arg -> DidChangeConfigurationParams <$> arg Aeson..: "settings" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidChangeConfigurationRegistrationOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidChangeConfigurationRegistrationOptions.hs index 6df35ad27..f47854ed6 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidChangeConfigurationRegistrationOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidChangeConfigurationRegistrationOptions.hs @@ -28,4 +28,4 @@ instance Aeson.ToJSON DidChangeConfigurationRegistrationOptions where toJSON (DidChangeConfigurationRegistrationOptions arg0) = Aeson.object $ concat $ ["section" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON DidChangeConfigurationRegistrationOptions where - parseJSON = Aeson.withObject "DidChangeConfigurationRegistrationOptions" $ \arg -> DidChangeConfigurationRegistrationOptions <$> arg Aeson..:! "section" \ No newline at end of file + parseJSON = Aeson.withObject "DidChangeConfigurationRegistrationOptions" $ \arg -> DidChangeConfigurationRegistrationOptions <$> arg Aeson..:! "section" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidChangeNotebookDocumentParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidChangeNotebookDocumentParams.hs index c0062f3ab..ba7555544 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidChangeNotebookDocumentParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidChangeNotebookDocumentParams.hs @@ -51,4 +51,4 @@ instance Aeson.ToJSON DidChangeNotebookDocumentParams where ,["change" Aeson..= arg1]] instance Aeson.FromJSON DidChangeNotebookDocumentParams where - parseJSON = Aeson.withObject "DidChangeNotebookDocumentParams" $ \arg -> DidChangeNotebookDocumentParams <$> arg Aeson..: "notebookDocument" <*> arg Aeson..: "change" \ No newline at end of file + parseJSON = Aeson.withObject "DidChangeNotebookDocumentParams" $ \arg -> DidChangeNotebookDocumentParams <$> arg Aeson..: "notebookDocument" <*> arg Aeson..: "change" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidChangeTextDocumentParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidChangeTextDocumentParams.hs index 5ecdd8ca1..c79885cdf 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidChangeTextDocumentParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidChangeTextDocumentParams.hs @@ -46,4 +46,4 @@ instance Aeson.ToJSON DidChangeTextDocumentParams where ,["contentChanges" Aeson..= arg1]] instance Aeson.FromJSON DidChangeTextDocumentParams where - parseJSON = Aeson.withObject "DidChangeTextDocumentParams" $ \arg -> DidChangeTextDocumentParams <$> arg Aeson..: "textDocument" <*> arg Aeson..: "contentChanges" \ No newline at end of file + parseJSON = Aeson.withObject "DidChangeTextDocumentParams" $ \arg -> DidChangeTextDocumentParams <$> arg Aeson..: "textDocument" <*> arg Aeson..: "contentChanges" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidChangeWatchedFilesClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidChangeWatchedFilesClientCapabilities.hs index c88e23420..3e1129576 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidChangeWatchedFilesClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidChangeWatchedFilesClientCapabilities.hs @@ -37,4 +37,4 @@ instance Aeson.ToJSON DidChangeWatchedFilesClientCapabilities where ,"relativePatternSupport" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON DidChangeWatchedFilesClientCapabilities where - parseJSON = Aeson.withObject "DidChangeWatchedFilesClientCapabilities" $ \arg -> DidChangeWatchedFilesClientCapabilities <$> arg Aeson..:! "dynamicRegistration" <*> arg Aeson..:! "relativePatternSupport" \ No newline at end of file + parseJSON = Aeson.withObject "DidChangeWatchedFilesClientCapabilities" $ \arg -> DidChangeWatchedFilesClientCapabilities <$> arg Aeson..:! "dynamicRegistration" <*> arg Aeson..:! "relativePatternSupport" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidChangeWatchedFilesParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidChangeWatchedFilesParams.hs index 321f72425..e85d20186 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidChangeWatchedFilesParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidChangeWatchedFilesParams.hs @@ -28,4 +28,4 @@ instance Aeson.ToJSON DidChangeWatchedFilesParams where toJSON (DidChangeWatchedFilesParams arg0) = Aeson.object $ concat $ [["changes" Aeson..= arg0]] instance Aeson.FromJSON DidChangeWatchedFilesParams where - parseJSON = Aeson.withObject "DidChangeWatchedFilesParams" $ \arg -> DidChangeWatchedFilesParams <$> arg Aeson..: "changes" \ No newline at end of file + parseJSON = Aeson.withObject "DidChangeWatchedFilesParams" $ \arg -> DidChangeWatchedFilesParams <$> arg Aeson..: "changes" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidChangeWatchedFilesRegistrationOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidChangeWatchedFilesRegistrationOptions.hs index 18aa9050f..e8def2e7f 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidChangeWatchedFilesRegistrationOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidChangeWatchedFilesRegistrationOptions.hs @@ -28,4 +28,4 @@ instance Aeson.ToJSON DidChangeWatchedFilesRegistrationOptions where toJSON (DidChangeWatchedFilesRegistrationOptions arg0) = Aeson.object $ concat $ [["watchers" Aeson..= arg0]] instance Aeson.FromJSON DidChangeWatchedFilesRegistrationOptions where - parseJSON = Aeson.withObject "DidChangeWatchedFilesRegistrationOptions" $ \arg -> DidChangeWatchedFilesRegistrationOptions <$> arg Aeson..: "watchers" \ No newline at end of file + parseJSON = Aeson.withObject "DidChangeWatchedFilesRegistrationOptions" $ \arg -> DidChangeWatchedFilesRegistrationOptions <$> arg Aeson..: "watchers" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidChangeWorkspaceFoldersParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidChangeWorkspaceFoldersParams.hs index ce87d9373..d0e24beb0 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidChangeWorkspaceFoldersParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidChangeWorkspaceFoldersParams.hs @@ -28,4 +28,4 @@ instance Aeson.ToJSON DidChangeWorkspaceFoldersParams where toJSON (DidChangeWorkspaceFoldersParams arg0) = Aeson.object $ concat $ [["event" Aeson..= arg0]] instance Aeson.FromJSON DidChangeWorkspaceFoldersParams where - parseJSON = Aeson.withObject "DidChangeWorkspaceFoldersParams" $ \arg -> DidChangeWorkspaceFoldersParams <$> arg Aeson..: "event" \ No newline at end of file + parseJSON = Aeson.withObject "DidChangeWorkspaceFoldersParams" $ \arg -> DidChangeWorkspaceFoldersParams <$> arg Aeson..: "event" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidCloseNotebookDocumentParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidCloseNotebookDocumentParams.hs index 3ad9f9bf7..f0f7dd4be 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidCloseNotebookDocumentParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidCloseNotebookDocumentParams.hs @@ -37,4 +37,4 @@ instance Aeson.ToJSON DidCloseNotebookDocumentParams where ,["cellTextDocuments" Aeson..= arg1]] instance Aeson.FromJSON DidCloseNotebookDocumentParams where - parseJSON = Aeson.withObject "DidCloseNotebookDocumentParams" $ \arg -> DidCloseNotebookDocumentParams <$> arg Aeson..: "notebookDocument" <*> arg Aeson..: "cellTextDocuments" \ No newline at end of file + parseJSON = Aeson.withObject "DidCloseNotebookDocumentParams" $ \arg -> DidCloseNotebookDocumentParams <$> arg Aeson..: "notebookDocument" <*> arg Aeson..: "cellTextDocuments" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidCloseTextDocumentParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidCloseTextDocumentParams.hs index bd39f93e7..59b9bd232 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidCloseTextDocumentParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidCloseTextDocumentParams.hs @@ -28,4 +28,4 @@ instance Aeson.ToJSON DidCloseTextDocumentParams where toJSON (DidCloseTextDocumentParams arg0) = Aeson.object $ concat $ [["textDocument" Aeson..= arg0]] instance Aeson.FromJSON DidCloseTextDocumentParams where - parseJSON = Aeson.withObject "DidCloseTextDocumentParams" $ \arg -> DidCloseTextDocumentParams <$> arg Aeson..: "textDocument" \ No newline at end of file + parseJSON = Aeson.withObject "DidCloseTextDocumentParams" $ \arg -> DidCloseTextDocumentParams <$> arg Aeson..: "textDocument" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidOpenNotebookDocumentParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidOpenNotebookDocumentParams.hs index 0f7768120..b95206a04 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidOpenNotebookDocumentParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidOpenNotebookDocumentParams.hs @@ -37,4 +37,4 @@ instance Aeson.ToJSON DidOpenNotebookDocumentParams where ,["cellTextDocuments" Aeson..= arg1]] instance Aeson.FromJSON DidOpenNotebookDocumentParams where - parseJSON = Aeson.withObject "DidOpenNotebookDocumentParams" $ \arg -> DidOpenNotebookDocumentParams <$> arg Aeson..: "notebookDocument" <*> arg Aeson..: "cellTextDocuments" \ No newline at end of file + parseJSON = Aeson.withObject "DidOpenNotebookDocumentParams" $ \arg -> DidOpenNotebookDocumentParams <$> arg Aeson..: "notebookDocument" <*> arg Aeson..: "cellTextDocuments" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidOpenTextDocumentParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidOpenTextDocumentParams.hs index a6179ec65..d6d151ffd 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidOpenTextDocumentParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidOpenTextDocumentParams.hs @@ -28,4 +28,4 @@ instance Aeson.ToJSON DidOpenTextDocumentParams where toJSON (DidOpenTextDocumentParams arg0) = Aeson.object $ concat $ [["textDocument" Aeson..= arg0]] instance Aeson.FromJSON DidOpenTextDocumentParams where - parseJSON = Aeson.withObject "DidOpenTextDocumentParams" $ \arg -> DidOpenTextDocumentParams <$> arg Aeson..: "textDocument" \ No newline at end of file + parseJSON = Aeson.withObject "DidOpenTextDocumentParams" $ \arg -> DidOpenTextDocumentParams <$> arg Aeson..: "textDocument" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidSaveNotebookDocumentParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidSaveNotebookDocumentParams.hs index 3d3f15d07..75942ea29 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidSaveNotebookDocumentParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidSaveNotebookDocumentParams.hs @@ -30,4 +30,4 @@ instance Aeson.ToJSON DidSaveNotebookDocumentParams where toJSON (DidSaveNotebookDocumentParams arg0) = Aeson.object $ concat $ [["notebookDocument" Aeson..= arg0]] instance Aeson.FromJSON DidSaveNotebookDocumentParams where - parseJSON = Aeson.withObject "DidSaveNotebookDocumentParams" $ \arg -> DidSaveNotebookDocumentParams <$> arg Aeson..: "notebookDocument" \ No newline at end of file + parseJSON = Aeson.withObject "DidSaveNotebookDocumentParams" $ \arg -> DidSaveNotebookDocumentParams <$> arg Aeson..: "notebookDocument" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidSaveTextDocumentParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidSaveTextDocumentParams.hs index d1bece91b..4476e5c55 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidSaveTextDocumentParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DidSaveTextDocumentParams.hs @@ -35,4 +35,4 @@ instance Aeson.ToJSON DidSaveTextDocumentParams where ,"text" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON DidSaveTextDocumentParams where - parseJSON = Aeson.withObject "DidSaveTextDocumentParams" $ \arg -> DidSaveTextDocumentParams <$> arg Aeson..: "textDocument" <*> arg Aeson..:! "text" \ No newline at end of file + parseJSON = Aeson.withObject "DidSaveTextDocumentParams" $ \arg -> DidSaveTextDocumentParams <$> arg Aeson..: "textDocument" <*> arg Aeson..:! "text" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentColorClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentColorClientCapabilities.hs index eb16fa617..596fcc83a 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentColorClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentColorClientCapabilities.hs @@ -29,4 +29,4 @@ instance Aeson.ToJSON DocumentColorClientCapabilities where toJSON (DocumentColorClientCapabilities arg0) = Aeson.object $ concat $ ["dynamicRegistration" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON DocumentColorClientCapabilities where - parseJSON = Aeson.withObject "DocumentColorClientCapabilities" $ \arg -> DocumentColorClientCapabilities <$> arg Aeson..:! "dynamicRegistration" \ No newline at end of file + parseJSON = Aeson.withObject "DocumentColorClientCapabilities" $ \arg -> DocumentColorClientCapabilities <$> arg Aeson..:! "dynamicRegistration" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentColorOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentColorOptions.hs index 6b2483d69..cce169be4 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentColorOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentColorOptions.hs @@ -27,4 +27,4 @@ instance Aeson.ToJSON DocumentColorOptions where toJSON (DocumentColorOptions arg0) = Aeson.object $ concat $ ["workDoneProgress" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON DocumentColorOptions where - parseJSON = Aeson.withObject "DocumentColorOptions" $ \arg -> DocumentColorOptions <$> arg Aeson..:! "workDoneProgress" \ No newline at end of file + parseJSON = Aeson.withObject "DocumentColorOptions" $ \arg -> DocumentColorOptions <$> arg Aeson..:! "workDoneProgress" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentColorParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentColorParams.hs index ce88a7c2d..c09d5c8c2 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentColorParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentColorParams.hs @@ -40,4 +40,4 @@ instance Aeson.ToJSON DocumentColorParams where ,["textDocument" Aeson..= arg2]] instance Aeson.FromJSON DocumentColorParams where - parseJSON = Aeson.withObject "DocumentColorParams" $ \arg -> DocumentColorParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" <*> arg Aeson..: "textDocument" \ No newline at end of file + parseJSON = Aeson.withObject "DocumentColorParams" $ \arg -> DocumentColorParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" <*> arg Aeson..: "textDocument" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentColorRegistrationOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentColorRegistrationOptions.hs index 2bbc57e30..6afaec603 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentColorRegistrationOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentColorRegistrationOptions.hs @@ -41,4 +41,4 @@ instance Aeson.ToJSON DocumentColorRegistrationOptions where ,"id" Language.LSP.Protocol.Types.Common..=? arg2] instance Aeson.FromJSON DocumentColorRegistrationOptions where - parseJSON = Aeson.withObject "DocumentColorRegistrationOptions" $ \arg -> DocumentColorRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "id" \ No newline at end of file + parseJSON = Aeson.withObject "DocumentColorRegistrationOptions" $ \arg -> DocumentColorRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "id" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentDiagnosticParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentDiagnosticParams.hs index 0ad48871a..c01c4b0d5 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentDiagnosticParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentDiagnosticParams.hs @@ -53,4 +53,4 @@ instance Aeson.ToJSON DocumentDiagnosticParams where ,"previousResultId" Language.LSP.Protocol.Types.Common..=? arg4] instance Aeson.FromJSON DocumentDiagnosticParams where - parseJSON = Aeson.withObject "DocumentDiagnosticParams" $ \arg -> DocumentDiagnosticParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" <*> arg Aeson..: "textDocument" <*> arg Aeson..:! "identifier" <*> arg Aeson..:! "previousResultId" \ No newline at end of file + parseJSON = Aeson.withObject "DocumentDiagnosticParams" $ \arg -> DocumentDiagnosticParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" <*> arg Aeson..: "textDocument" <*> arg Aeson..:! "identifier" <*> arg Aeson..:! "previousResultId" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentDiagnosticReport.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentDiagnosticReport.hs index 3fe72f015..8cfa3dbb9 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentDiagnosticReport.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentDiagnosticReport.hs @@ -25,4 +25,4 @@ pull request. newtype DocumentDiagnosticReport = DocumentDiagnosticReport (Language.LSP.Protocol.Internal.Types.RelatedFullDocumentDiagnosticReport.RelatedFullDocumentDiagnosticReport Language.LSP.Protocol.Types.Common.|? Language.LSP.Protocol.Internal.Types.RelatedUnchangedDocumentDiagnosticReport.RelatedUnchangedDocumentDiagnosticReport) deriving newtype (Aeson.ToJSON, Aeson.FromJSON) deriving stock (Show, Eq, Ord, Generic) - deriving anyclass (NFData) \ No newline at end of file + deriving anyclass (NFData) diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentDiagnosticReportKind.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentDiagnosticReportKind.hs index 647517880..1767fcd47 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentDiagnosticReportKind.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentDiagnosticReportKind.hs @@ -45,3 +45,4 @@ instance Language.LSP.Protocol.Types.LspEnum.LspEnum DocumentDiagnosticReportKin fromEnumBaseType "unchanged" = pure DocumentDiagnosticReportKind_Unchanged fromEnumBaseType _ = Nothing + diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentDiagnosticReportPartialResult.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentDiagnosticReportPartialResult.hs index b5b4de6cc..d19cc55aa 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentDiagnosticReportPartialResult.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentDiagnosticReportPartialResult.hs @@ -33,4 +33,4 @@ instance Aeson.ToJSON DocumentDiagnosticReportPartialResult where toJSON (DocumentDiagnosticReportPartialResult arg0) = Aeson.object $ concat $ [["relatedDocuments" Aeson..= arg0]] instance Aeson.FromJSON DocumentDiagnosticReportPartialResult where - parseJSON = Aeson.withObject "DocumentDiagnosticReportPartialResult" $ \arg -> DocumentDiagnosticReportPartialResult <$> arg Aeson..: "relatedDocuments" \ No newline at end of file + parseJSON = Aeson.withObject "DocumentDiagnosticReportPartialResult" $ \arg -> DocumentDiagnosticReportPartialResult <$> arg Aeson..: "relatedDocuments" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentFilter.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentFilter.hs index 2868616f0..6bc5454de 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentFilter.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentFilter.hs @@ -22,4 +22,4 @@ a notebook cell document. newtype DocumentFilter = DocumentFilter (Language.LSP.Protocol.Internal.Types.TextDocumentFilter.TextDocumentFilter Language.LSP.Protocol.Types.Common.|? Language.LSP.Protocol.Internal.Types.NotebookCellTextDocumentFilter.NotebookCellTextDocumentFilter) deriving newtype (Aeson.ToJSON, Aeson.FromJSON) deriving stock (Show, Eq, Ord, Generic) - deriving anyclass (NFData) \ No newline at end of file + deriving anyclass (NFData) diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentFormattingClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentFormattingClientCapabilities.hs index 666e051c9..6d239c2e2 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentFormattingClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentFormattingClientCapabilities.hs @@ -27,4 +27,4 @@ instance Aeson.ToJSON DocumentFormattingClientCapabilities where toJSON (DocumentFormattingClientCapabilities arg0) = Aeson.object $ concat $ ["dynamicRegistration" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON DocumentFormattingClientCapabilities where - parseJSON = Aeson.withObject "DocumentFormattingClientCapabilities" $ \arg -> DocumentFormattingClientCapabilities <$> arg Aeson..:! "dynamicRegistration" \ No newline at end of file + parseJSON = Aeson.withObject "DocumentFormattingClientCapabilities" $ \arg -> DocumentFormattingClientCapabilities <$> arg Aeson..:! "dynamicRegistration" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentFormattingOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentFormattingOptions.hs index 15c907454..3015030ac 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentFormattingOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentFormattingOptions.hs @@ -27,4 +27,4 @@ instance Aeson.ToJSON DocumentFormattingOptions where toJSON (DocumentFormattingOptions arg0) = Aeson.object $ concat $ ["workDoneProgress" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON DocumentFormattingOptions where - parseJSON = Aeson.withObject "DocumentFormattingOptions" $ \arg -> DocumentFormattingOptions <$> arg Aeson..:! "workDoneProgress" \ No newline at end of file + parseJSON = Aeson.withObject "DocumentFormattingOptions" $ \arg -> DocumentFormattingOptions <$> arg Aeson..:! "workDoneProgress" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentFormattingParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentFormattingParams.hs index 526ff6772..6add6690c 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentFormattingParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentFormattingParams.hs @@ -40,4 +40,4 @@ instance Aeson.ToJSON DocumentFormattingParams where ,["options" Aeson..= arg2]] instance Aeson.FromJSON DocumentFormattingParams where - parseJSON = Aeson.withObject "DocumentFormattingParams" $ \arg -> DocumentFormattingParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..: "textDocument" <*> arg Aeson..: "options" \ No newline at end of file + parseJSON = Aeson.withObject "DocumentFormattingParams" $ \arg -> DocumentFormattingParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..: "textDocument" <*> arg Aeson..: "options" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentFormattingRegistrationOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentFormattingRegistrationOptions.hs index 8f02487b5..e4028ed58 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentFormattingRegistrationOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentFormattingRegistrationOptions.hs @@ -34,4 +34,4 @@ instance Aeson.ToJSON DocumentFormattingRegistrationOptions where ,"workDoneProgress" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON DocumentFormattingRegistrationOptions where - parseJSON = Aeson.withObject "DocumentFormattingRegistrationOptions" $ \arg -> DocumentFormattingRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" \ No newline at end of file + parseJSON = Aeson.withObject "DocumentFormattingRegistrationOptions" $ \arg -> DocumentFormattingRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentHighlight.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentHighlight.hs index 15924dc33..8b308f389 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentHighlight.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentHighlight.hs @@ -36,4 +36,4 @@ instance Aeson.ToJSON DocumentHighlight where ,"kind" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON DocumentHighlight where - parseJSON = Aeson.withObject "DocumentHighlight" $ \arg -> DocumentHighlight <$> arg Aeson..: "range" <*> arg Aeson..:! "kind" \ No newline at end of file + parseJSON = Aeson.withObject "DocumentHighlight" $ \arg -> DocumentHighlight <$> arg Aeson..: "range" <*> arg Aeson..:! "kind" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentHighlightClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentHighlightClientCapabilities.hs index 78f747701..71b7aff64 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentHighlightClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentHighlightClientCapabilities.hs @@ -27,4 +27,4 @@ instance Aeson.ToJSON DocumentHighlightClientCapabilities where toJSON (DocumentHighlightClientCapabilities arg0) = Aeson.object $ concat $ ["dynamicRegistration" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON DocumentHighlightClientCapabilities where - parseJSON = Aeson.withObject "DocumentHighlightClientCapabilities" $ \arg -> DocumentHighlightClientCapabilities <$> arg Aeson..:! "dynamicRegistration" \ No newline at end of file + parseJSON = Aeson.withObject "DocumentHighlightClientCapabilities" $ \arg -> DocumentHighlightClientCapabilities <$> arg Aeson..:! "dynamicRegistration" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentHighlightKind.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentHighlightKind.hs index 357c14196..6b8d9565e 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentHighlightKind.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentHighlightKind.hs @@ -48,3 +48,4 @@ instance Language.LSP.Protocol.Types.LspEnum.LspEnum DocumentHighlightKind where fromEnumBaseType 3 = pure DocumentHighlightKind_Write fromEnumBaseType _ = Nothing + diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentHighlightOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentHighlightOptions.hs index aeb95ce03..c7e4fe185 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentHighlightOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentHighlightOptions.hs @@ -27,4 +27,4 @@ instance Aeson.ToJSON DocumentHighlightOptions where toJSON (DocumentHighlightOptions arg0) = Aeson.object $ concat $ ["workDoneProgress" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON DocumentHighlightOptions where - parseJSON = Aeson.withObject "DocumentHighlightOptions" $ \arg -> DocumentHighlightOptions <$> arg Aeson..:! "workDoneProgress" \ No newline at end of file + parseJSON = Aeson.withObject "DocumentHighlightOptions" $ \arg -> DocumentHighlightOptions <$> arg Aeson..:! "workDoneProgress" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentHighlightParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentHighlightParams.hs index 9b9b83fa7..7a10019f7 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentHighlightParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentHighlightParams.hs @@ -46,4 +46,4 @@ instance Aeson.ToJSON DocumentHighlightParams where ,"partialResultToken" Language.LSP.Protocol.Types.Common..=? arg3] instance Aeson.FromJSON DocumentHighlightParams where - parseJSON = Aeson.withObject "DocumentHighlightParams" $ \arg -> DocumentHighlightParams <$> arg Aeson..: "textDocument" <*> arg Aeson..: "position" <*> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" \ No newline at end of file + parseJSON = Aeson.withObject "DocumentHighlightParams" $ \arg -> DocumentHighlightParams <$> arg Aeson..: "textDocument" <*> arg Aeson..: "position" <*> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentHighlightRegistrationOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentHighlightRegistrationOptions.hs index 7a4af6202..971d02fe5 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentHighlightRegistrationOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentHighlightRegistrationOptions.hs @@ -34,4 +34,4 @@ instance Aeson.ToJSON DocumentHighlightRegistrationOptions where ,"workDoneProgress" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON DocumentHighlightRegistrationOptions where - parseJSON = Aeson.withObject "DocumentHighlightRegistrationOptions" $ \arg -> DocumentHighlightRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" \ No newline at end of file + parseJSON = Aeson.withObject "DocumentHighlightRegistrationOptions" $ \arg -> DocumentHighlightRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentLink.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentLink.hs index 7274f5621..f6a92f8a2 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentLink.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentLink.hs @@ -53,4 +53,4 @@ instance Aeson.ToJSON DocumentLink where ,"data" Language.LSP.Protocol.Types.Common..=? arg3] instance Aeson.FromJSON DocumentLink where - parseJSON = Aeson.withObject "DocumentLink" $ \arg -> DocumentLink <$> arg Aeson..: "range" <*> arg Aeson..:! "target" <*> arg Aeson..:! "tooltip" <*> arg Aeson..:! "data" \ No newline at end of file + parseJSON = Aeson.withObject "DocumentLink" $ \arg -> DocumentLink <$> arg Aeson..: "range" <*> arg Aeson..:! "target" <*> arg Aeson..:! "tooltip" <*> arg Aeson..:! "data" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentLinkClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentLinkClientCapabilities.hs index 260a37312..ead74d722 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentLinkClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentLinkClientCapabilities.hs @@ -34,4 +34,4 @@ instance Aeson.ToJSON DocumentLinkClientCapabilities where ,"tooltipSupport" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON DocumentLinkClientCapabilities where - parseJSON = Aeson.withObject "DocumentLinkClientCapabilities" $ \arg -> DocumentLinkClientCapabilities <$> arg Aeson..:! "dynamicRegistration" <*> arg Aeson..:! "tooltipSupport" \ No newline at end of file + parseJSON = Aeson.withObject "DocumentLinkClientCapabilities" $ \arg -> DocumentLinkClientCapabilities <$> arg Aeson..:! "dynamicRegistration" <*> arg Aeson..:! "tooltipSupport" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentLinkOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentLinkOptions.hs index 2084f8160..9756c8ba9 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentLinkOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentLinkOptions.hs @@ -32,4 +32,4 @@ instance Aeson.ToJSON DocumentLinkOptions where ,"resolveProvider" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON DocumentLinkOptions where - parseJSON = Aeson.withObject "DocumentLinkOptions" $ \arg -> DocumentLinkOptions <$> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "resolveProvider" \ No newline at end of file + parseJSON = Aeson.withObject "DocumentLinkOptions" $ \arg -> DocumentLinkOptions <$> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "resolveProvider" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentLinkParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentLinkParams.hs index 4d75a940e..874cdfcc1 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentLinkParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentLinkParams.hs @@ -40,4 +40,4 @@ instance Aeson.ToJSON DocumentLinkParams where ,["textDocument" Aeson..= arg2]] instance Aeson.FromJSON DocumentLinkParams where - parseJSON = Aeson.withObject "DocumentLinkParams" $ \arg -> DocumentLinkParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" <*> arg Aeson..: "textDocument" \ No newline at end of file + parseJSON = Aeson.withObject "DocumentLinkParams" $ \arg -> DocumentLinkParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" <*> arg Aeson..: "textDocument" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentLinkRegistrationOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentLinkRegistrationOptions.hs index af8fb2b99..23a081c10 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentLinkRegistrationOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentLinkRegistrationOptions.hs @@ -39,4 +39,4 @@ instance Aeson.ToJSON DocumentLinkRegistrationOptions where ,"resolveProvider" Language.LSP.Protocol.Types.Common..=? arg2] instance Aeson.FromJSON DocumentLinkRegistrationOptions where - parseJSON = Aeson.withObject "DocumentLinkRegistrationOptions" $ \arg -> DocumentLinkRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "resolveProvider" \ No newline at end of file + parseJSON = Aeson.withObject "DocumentLinkRegistrationOptions" $ \arg -> DocumentLinkRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "resolveProvider" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentOnTypeFormattingClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentOnTypeFormattingClientCapabilities.hs index 0dd6a92e4..009e1f678 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentOnTypeFormattingClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentOnTypeFormattingClientCapabilities.hs @@ -27,4 +27,4 @@ instance Aeson.ToJSON DocumentOnTypeFormattingClientCapabilities where toJSON (DocumentOnTypeFormattingClientCapabilities arg0) = Aeson.object $ concat $ ["dynamicRegistration" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON DocumentOnTypeFormattingClientCapabilities where - parseJSON = Aeson.withObject "DocumentOnTypeFormattingClientCapabilities" $ \arg -> DocumentOnTypeFormattingClientCapabilities <$> arg Aeson..:! "dynamicRegistration" \ No newline at end of file + parseJSON = Aeson.withObject "DocumentOnTypeFormattingClientCapabilities" $ \arg -> DocumentOnTypeFormattingClientCapabilities <$> arg Aeson..:! "dynamicRegistration" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentOnTypeFormattingOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentOnTypeFormattingOptions.hs index 29bb2e94f..6dd635770 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentOnTypeFormattingOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentOnTypeFormattingOptions.hs @@ -33,4 +33,4 @@ instance Aeson.ToJSON DocumentOnTypeFormattingOptions where ,"moreTriggerCharacter" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON DocumentOnTypeFormattingOptions where - parseJSON = Aeson.withObject "DocumentOnTypeFormattingOptions" $ \arg -> DocumentOnTypeFormattingOptions <$> arg Aeson..: "firstTriggerCharacter" <*> arg Aeson..:! "moreTriggerCharacter" \ No newline at end of file + parseJSON = Aeson.withObject "DocumentOnTypeFormattingOptions" $ \arg -> DocumentOnTypeFormattingOptions <$> arg Aeson..: "firstTriggerCharacter" <*> arg Aeson..:! "moreTriggerCharacter" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentOnTypeFormattingParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentOnTypeFormattingParams.hs index 2a9c40afb..a90c25844 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentOnTypeFormattingParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentOnTypeFormattingParams.hs @@ -51,4 +51,4 @@ instance Aeson.ToJSON DocumentOnTypeFormattingParams where ,["options" Aeson..= arg3]] instance Aeson.FromJSON DocumentOnTypeFormattingParams where - parseJSON = Aeson.withObject "DocumentOnTypeFormattingParams" $ \arg -> DocumentOnTypeFormattingParams <$> arg Aeson..: "textDocument" <*> arg Aeson..: "position" <*> arg Aeson..: "ch" <*> arg Aeson..: "options" \ No newline at end of file + parseJSON = Aeson.withObject "DocumentOnTypeFormattingParams" $ \arg -> DocumentOnTypeFormattingParams <$> arg Aeson..: "textDocument" <*> arg Aeson..: "position" <*> arg Aeson..: "ch" <*> arg Aeson..: "options" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentOnTypeFormattingRegistrationOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentOnTypeFormattingRegistrationOptions.hs index d9307a07c..e2f3caf56 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentOnTypeFormattingRegistrationOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentOnTypeFormattingRegistrationOptions.hs @@ -40,4 +40,4 @@ instance Aeson.ToJSON DocumentOnTypeFormattingRegistrationOptions where ,"moreTriggerCharacter" Language.LSP.Protocol.Types.Common..=? arg2] instance Aeson.FromJSON DocumentOnTypeFormattingRegistrationOptions where - parseJSON = Aeson.withObject "DocumentOnTypeFormattingRegistrationOptions" $ \arg -> DocumentOnTypeFormattingRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..: "firstTriggerCharacter" <*> arg Aeson..:! "moreTriggerCharacter" \ No newline at end of file + parseJSON = Aeson.withObject "DocumentOnTypeFormattingRegistrationOptions" $ \arg -> DocumentOnTypeFormattingRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..: "firstTriggerCharacter" <*> arg Aeson..:! "moreTriggerCharacter" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentRangeFormattingClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentRangeFormattingClientCapabilities.hs index 86d210356..87fcde9d0 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentRangeFormattingClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentRangeFormattingClientCapabilities.hs @@ -27,4 +27,4 @@ instance Aeson.ToJSON DocumentRangeFormattingClientCapabilities where toJSON (DocumentRangeFormattingClientCapabilities arg0) = Aeson.object $ concat $ ["dynamicRegistration" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON DocumentRangeFormattingClientCapabilities where - parseJSON = Aeson.withObject "DocumentRangeFormattingClientCapabilities" $ \arg -> DocumentRangeFormattingClientCapabilities <$> arg Aeson..:! "dynamicRegistration" \ No newline at end of file + parseJSON = Aeson.withObject "DocumentRangeFormattingClientCapabilities" $ \arg -> DocumentRangeFormattingClientCapabilities <$> arg Aeson..:! "dynamicRegistration" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentRangeFormattingOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentRangeFormattingOptions.hs index fb41a5d95..e02ec4b11 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentRangeFormattingOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentRangeFormattingOptions.hs @@ -27,4 +27,4 @@ instance Aeson.ToJSON DocumentRangeFormattingOptions where toJSON (DocumentRangeFormattingOptions arg0) = Aeson.object $ concat $ ["workDoneProgress" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON DocumentRangeFormattingOptions where - parseJSON = Aeson.withObject "DocumentRangeFormattingOptions" $ \arg -> DocumentRangeFormattingOptions <$> arg Aeson..:! "workDoneProgress" \ No newline at end of file + parseJSON = Aeson.withObject "DocumentRangeFormattingOptions" $ \arg -> DocumentRangeFormattingOptions <$> arg Aeson..:! "workDoneProgress" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentRangeFormattingParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentRangeFormattingParams.hs index 2541b0d0a..79128b202 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentRangeFormattingParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentRangeFormattingParams.hs @@ -46,4 +46,4 @@ instance Aeson.ToJSON DocumentRangeFormattingParams where ,["options" Aeson..= arg3]] instance Aeson.FromJSON DocumentRangeFormattingParams where - parseJSON = Aeson.withObject "DocumentRangeFormattingParams" $ \arg -> DocumentRangeFormattingParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..: "textDocument" <*> arg Aeson..: "range" <*> arg Aeson..: "options" \ No newline at end of file + parseJSON = Aeson.withObject "DocumentRangeFormattingParams" $ \arg -> DocumentRangeFormattingParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..: "textDocument" <*> arg Aeson..: "range" <*> arg Aeson..: "options" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentRangeFormattingRegistrationOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentRangeFormattingRegistrationOptions.hs index 1f9360d12..8a8f8773f 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentRangeFormattingRegistrationOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentRangeFormattingRegistrationOptions.hs @@ -34,4 +34,4 @@ instance Aeson.ToJSON DocumentRangeFormattingRegistrationOptions where ,"workDoneProgress" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON DocumentRangeFormattingRegistrationOptions where - parseJSON = Aeson.withObject "DocumentRangeFormattingRegistrationOptions" $ \arg -> DocumentRangeFormattingRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" \ No newline at end of file + parseJSON = Aeson.withObject "DocumentRangeFormattingRegistrationOptions" $ \arg -> DocumentRangeFormattingRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentSelector.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentSelector.hs index cfb44306c..fc5bfdc48 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentSelector.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentSelector.hs @@ -21,4 +21,4 @@ The use of a string as a document filter is deprecated @since 3.16.0. newtype DocumentSelector = DocumentSelector [Language.LSP.Protocol.Internal.Types.DocumentFilter.DocumentFilter] deriving newtype (Aeson.ToJSON, Aeson.FromJSON) deriving stock (Show, Eq, Ord, Generic) - deriving anyclass (NFData) \ No newline at end of file + deriving anyclass (NFData) diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentSymbol.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentSymbol.hs index 3a398b94b..5943ad1ca 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentSymbol.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentSymbol.hs @@ -78,4 +78,4 @@ instance Aeson.ToJSON DocumentSymbol where ,"children" Language.LSP.Protocol.Types.Common..=? arg7] instance Aeson.FromJSON DocumentSymbol where - parseJSON = Aeson.withObject "DocumentSymbol" $ \arg -> DocumentSymbol <$> arg Aeson..: "name" <*> arg Aeson..:! "detail" <*> arg Aeson..: "kind" <*> arg Aeson..:! "tags" <*> arg Aeson..:! "deprecated" <*> arg Aeson..: "range" <*> arg Aeson..: "selectionRange" <*> arg Aeson..:! "children" \ No newline at end of file + parseJSON = Aeson.withObject "DocumentSymbol" $ \arg -> DocumentSymbol <$> arg Aeson..: "name" <*> arg Aeson..:! "detail" <*> arg Aeson..: "kind" <*> arg Aeson..:! "tags" <*> arg Aeson..:! "deprecated" <*> arg Aeson..: "range" <*> arg Aeson..: "selectionRange" <*> arg Aeson..:! "children" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentSymbolClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentSymbolClientCapabilities.hs index a88773a35..64c0283a2 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentSymbolClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentSymbolClientCapabilities.hs @@ -58,4 +58,4 @@ instance Aeson.ToJSON DocumentSymbolClientCapabilities where ,"labelSupport" Language.LSP.Protocol.Types.Common..=? arg4] instance Aeson.FromJSON DocumentSymbolClientCapabilities where - parseJSON = Aeson.withObject "DocumentSymbolClientCapabilities" $ \arg -> DocumentSymbolClientCapabilities <$> arg Aeson..:! "dynamicRegistration" <*> arg Aeson..:! "symbolKind" <*> arg Aeson..:! "hierarchicalDocumentSymbolSupport" <*> arg Aeson..:! "tagSupport" <*> arg Aeson..:! "labelSupport" \ No newline at end of file + parseJSON = Aeson.withObject "DocumentSymbolClientCapabilities" $ \arg -> DocumentSymbolClientCapabilities <$> arg Aeson..:! "dynamicRegistration" <*> arg Aeson..:! "symbolKind" <*> arg Aeson..:! "hierarchicalDocumentSymbolSupport" <*> arg Aeson..:! "tagSupport" <*> arg Aeson..:! "labelSupport" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentSymbolOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentSymbolOptions.hs index b1aa550f3..b92aa1790 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentSymbolOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentSymbolOptions.hs @@ -36,4 +36,4 @@ instance Aeson.ToJSON DocumentSymbolOptions where ,"label" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON DocumentSymbolOptions where - parseJSON = Aeson.withObject "DocumentSymbolOptions" $ \arg -> DocumentSymbolOptions <$> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "label" \ No newline at end of file + parseJSON = Aeson.withObject "DocumentSymbolOptions" $ \arg -> DocumentSymbolOptions <$> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "label" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentSymbolParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentSymbolParams.hs index e09b9f2e4..9261c6af3 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentSymbolParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentSymbolParams.hs @@ -40,4 +40,4 @@ instance Aeson.ToJSON DocumentSymbolParams where ,["textDocument" Aeson..= arg2]] instance Aeson.FromJSON DocumentSymbolParams where - parseJSON = Aeson.withObject "DocumentSymbolParams" $ \arg -> DocumentSymbolParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" <*> arg Aeson..: "textDocument" \ No newline at end of file + parseJSON = Aeson.withObject "DocumentSymbolParams" $ \arg -> DocumentSymbolParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" <*> arg Aeson..: "textDocument" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentSymbolRegistrationOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentSymbolRegistrationOptions.hs index b159945a8..412c33778 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentSymbolRegistrationOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/DocumentSymbolRegistrationOptions.hs @@ -43,4 +43,4 @@ instance Aeson.ToJSON DocumentSymbolRegistrationOptions where ,"label" Language.LSP.Protocol.Types.Common..=? arg2] instance Aeson.FromJSON DocumentSymbolRegistrationOptions where - parseJSON = Aeson.withObject "DocumentSymbolRegistrationOptions" $ \arg -> DocumentSymbolRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "label" \ No newline at end of file + parseJSON = Aeson.withObject "DocumentSymbolRegistrationOptions" $ \arg -> DocumentSymbolRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "label" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ErrorCodes.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ErrorCodes.hs index a75c45f06..8aae30e18 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ErrorCodes.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ErrorCodes.hs @@ -81,3 +81,4 @@ instance Language.LSP.Protocol.Types.LspEnum.LspOpenEnum ErrorCodes where fromOpenEnumBaseType -32001 = ErrorCodes_UnknownErrorCode fromOpenEnumBaseType arg = ErrorCodes_Custom arg + diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ExecuteCommandClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ExecuteCommandClientCapabilities.hs index db2dd7401..b4c4923fb 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ExecuteCommandClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ExecuteCommandClientCapabilities.hs @@ -27,4 +27,4 @@ instance Aeson.ToJSON ExecuteCommandClientCapabilities where toJSON (ExecuteCommandClientCapabilities arg0) = Aeson.object $ concat $ ["dynamicRegistration" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON ExecuteCommandClientCapabilities where - parseJSON = Aeson.withObject "ExecuteCommandClientCapabilities" $ \arg -> ExecuteCommandClientCapabilities <$> arg Aeson..:! "dynamicRegistration" \ No newline at end of file + parseJSON = Aeson.withObject "ExecuteCommandClientCapabilities" $ \arg -> ExecuteCommandClientCapabilities <$> arg Aeson..:! "dynamicRegistration" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ExecuteCommandOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ExecuteCommandOptions.hs index cea327024..c28b5c3a9 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ExecuteCommandOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ExecuteCommandOptions.hs @@ -33,4 +33,4 @@ instance Aeson.ToJSON ExecuteCommandOptions where ,["commands" Aeson..= arg1]] instance Aeson.FromJSON ExecuteCommandOptions where - parseJSON = Aeson.withObject "ExecuteCommandOptions" $ \arg -> ExecuteCommandOptions <$> arg Aeson..:! "workDoneProgress" <*> arg Aeson..: "commands" \ No newline at end of file + parseJSON = Aeson.withObject "ExecuteCommandOptions" $ \arg -> ExecuteCommandOptions <$> arg Aeson..:! "workDoneProgress" <*> arg Aeson..: "commands" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ExecuteCommandParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ExecuteCommandParams.hs index c0e33b6ec..4e880b0b6 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ExecuteCommandParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ExecuteCommandParams.hs @@ -40,4 +40,4 @@ instance Aeson.ToJSON ExecuteCommandParams where ,"arguments" Language.LSP.Protocol.Types.Common..=? arg2] instance Aeson.FromJSON ExecuteCommandParams where - parseJSON = Aeson.withObject "ExecuteCommandParams" $ \arg -> ExecuteCommandParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..: "command" <*> arg Aeson..:! "arguments" \ No newline at end of file + parseJSON = Aeson.withObject "ExecuteCommandParams" $ \arg -> ExecuteCommandParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..: "command" <*> arg Aeson..:! "arguments" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ExecuteCommandRegistrationOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ExecuteCommandRegistrationOptions.hs index abc843323..8b039f83e 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ExecuteCommandRegistrationOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ExecuteCommandRegistrationOptions.hs @@ -33,4 +33,4 @@ instance Aeson.ToJSON ExecuteCommandRegistrationOptions where ,["commands" Aeson..= arg1]] instance Aeson.FromJSON ExecuteCommandRegistrationOptions where - parseJSON = Aeson.withObject "ExecuteCommandRegistrationOptions" $ \arg -> ExecuteCommandRegistrationOptions <$> arg Aeson..:! "workDoneProgress" <*> arg Aeson..: "commands" \ No newline at end of file + parseJSON = Aeson.withObject "ExecuteCommandRegistrationOptions" $ \arg -> ExecuteCommandRegistrationOptions <$> arg Aeson..:! "workDoneProgress" <*> arg Aeson..: "commands" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ExecutionSummary.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ExecutionSummary.hs index b4ac966da..3ddba2450 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ExecutionSummary.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ExecutionSummary.hs @@ -35,4 +35,4 @@ instance Aeson.ToJSON ExecutionSummary where ,"success" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON ExecutionSummary where - parseJSON = Aeson.withObject "ExecutionSummary" $ \arg -> ExecutionSummary <$> arg Aeson..: "executionOrder" <*> arg Aeson..:! "success" \ No newline at end of file + parseJSON = Aeson.withObject "ExecutionSummary" $ \arg -> ExecutionSummary <$> arg Aeson..: "executionOrder" <*> arg Aeson..:! "success" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FailureHandlingKind.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FailureHandlingKind.hs index 8a77471cf..bbb537c88 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FailureHandlingKind.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FailureHandlingKind.hs @@ -60,3 +60,4 @@ instance Language.LSP.Protocol.Types.LspEnum.LspEnum FailureHandlingKind where fromEnumBaseType "undo" = pure FailureHandlingKind_Undo fromEnumBaseType _ = Nothing + diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileChangeType.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileChangeType.hs index c7dfc2c01..4f967d52f 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileChangeType.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileChangeType.hs @@ -48,3 +48,4 @@ instance Language.LSP.Protocol.Types.LspEnum.LspEnum FileChangeType where fromEnumBaseType 3 = pure FileChangeType_Deleted fromEnumBaseType _ = Nothing + diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileCreate.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileCreate.hs index 8b47d0ff6..51c0e2950 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileCreate.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileCreate.hs @@ -30,4 +30,4 @@ instance Aeson.ToJSON FileCreate where toJSON (FileCreate arg0) = Aeson.object $ concat $ [["uri" Aeson..= arg0]] instance Aeson.FromJSON FileCreate where - parseJSON = Aeson.withObject "FileCreate" $ \arg -> FileCreate <$> arg Aeson..: "uri" \ No newline at end of file + parseJSON = Aeson.withObject "FileCreate" $ \arg -> FileCreate <$> arg Aeson..: "uri" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileDelete.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileDelete.hs index f60bb9c41..d405352bf 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileDelete.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileDelete.hs @@ -30,4 +30,4 @@ instance Aeson.ToJSON FileDelete where toJSON (FileDelete arg0) = Aeson.object $ concat $ [["uri" Aeson..= arg0]] instance Aeson.FromJSON FileDelete where - parseJSON = Aeson.withObject "FileDelete" $ \arg -> FileDelete <$> arg Aeson..: "uri" \ No newline at end of file + parseJSON = Aeson.withObject "FileDelete" $ \arg -> FileDelete <$> arg Aeson..: "uri" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileEvent.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileEvent.hs index cf5ebeb2f..ef4943cb2 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileEvent.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileEvent.hs @@ -34,4 +34,4 @@ instance Aeson.ToJSON FileEvent where ,["type" Aeson..= arg1]] instance Aeson.FromJSON FileEvent where - parseJSON = Aeson.withObject "FileEvent" $ \arg -> FileEvent <$> arg Aeson..: "uri" <*> arg Aeson..: "type" \ No newline at end of file + parseJSON = Aeson.withObject "FileEvent" $ \arg -> FileEvent <$> arg Aeson..: "uri" <*> arg Aeson..: "type" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileOperationClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileOperationClientCapabilities.hs index 8f7ab61bb..fcc2ba11b 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileOperationClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileOperationClientCapabilities.hs @@ -62,4 +62,4 @@ instance Aeson.ToJSON FileOperationClientCapabilities where ,"willDelete" Language.LSP.Protocol.Types.Common..=? arg6] instance Aeson.FromJSON FileOperationClientCapabilities where - parseJSON = Aeson.withObject "FileOperationClientCapabilities" $ \arg -> FileOperationClientCapabilities <$> arg Aeson..:! "dynamicRegistration" <*> arg Aeson..:! "didCreate" <*> arg Aeson..:! "willCreate" <*> arg Aeson..:! "didRename" <*> arg Aeson..:! "willRename" <*> arg Aeson..:! "didDelete" <*> arg Aeson..:! "willDelete" \ No newline at end of file + parseJSON = Aeson.withObject "FileOperationClientCapabilities" $ \arg -> FileOperationClientCapabilities <$> arg Aeson..:! "dynamicRegistration" <*> arg Aeson..:! "didCreate" <*> arg Aeson..:! "willCreate" <*> arg Aeson..:! "didRename" <*> arg Aeson..:! "willRename" <*> arg Aeson..:! "didDelete" <*> arg Aeson..:! "willDelete" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileOperationFilter.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileOperationFilter.hs index 464c6a50b..4fd3bfc2f 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileOperationFilter.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileOperationFilter.hs @@ -37,4 +37,4 @@ instance Aeson.ToJSON FileOperationFilter where ,["pattern" Aeson..= arg1]] instance Aeson.FromJSON FileOperationFilter where - parseJSON = Aeson.withObject "FileOperationFilter" $ \arg -> FileOperationFilter <$> arg Aeson..:! "scheme" <*> arg Aeson..: "pattern" \ No newline at end of file + parseJSON = Aeson.withObject "FileOperationFilter" $ \arg -> FileOperationFilter <$> arg Aeson..:! "scheme" <*> arg Aeson..: "pattern" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileOperationOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileOperationOptions.hs index 7a679cc49..9d8e949ec 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileOperationOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileOperationOptions.hs @@ -55,4 +55,4 @@ instance Aeson.ToJSON FileOperationOptions where ,"willDelete" Language.LSP.Protocol.Types.Common..=? arg5] instance Aeson.FromJSON FileOperationOptions where - parseJSON = Aeson.withObject "FileOperationOptions" $ \arg -> FileOperationOptions <$> arg Aeson..:! "didCreate" <*> arg Aeson..:! "willCreate" <*> arg Aeson..:! "didRename" <*> arg Aeson..:! "willRename" <*> arg Aeson..:! "didDelete" <*> arg Aeson..:! "willDelete" \ No newline at end of file + parseJSON = Aeson.withObject "FileOperationOptions" $ \arg -> FileOperationOptions <$> arg Aeson..:! "didCreate" <*> arg Aeson..:! "willCreate" <*> arg Aeson..:! "didRename" <*> arg Aeson..:! "willRename" <*> arg Aeson..:! "didDelete" <*> arg Aeson..:! "willDelete" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileOperationPattern.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileOperationPattern.hs index edbd4a9bd..a71f3f303 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileOperationPattern.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileOperationPattern.hs @@ -51,4 +51,4 @@ instance Aeson.ToJSON FileOperationPattern where ,"options" Language.LSP.Protocol.Types.Common..=? arg2] instance Aeson.FromJSON FileOperationPattern where - parseJSON = Aeson.withObject "FileOperationPattern" $ \arg -> FileOperationPattern <$> arg Aeson..: "glob" <*> arg Aeson..:! "matches" <*> arg Aeson..:! "options" \ No newline at end of file + parseJSON = Aeson.withObject "FileOperationPattern" $ \arg -> FileOperationPattern <$> arg Aeson..: "glob" <*> arg Aeson..:! "matches" <*> arg Aeson..:! "options" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileOperationPatternKind.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileOperationPatternKind.hs index f9b7c3dbd..bfedc39eb 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileOperationPatternKind.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileOperationPatternKind.hs @@ -44,3 +44,4 @@ instance Language.LSP.Protocol.Types.LspEnum.LspEnum FileOperationPatternKind wh fromEnumBaseType "folder" = pure FileOperationPatternKind_Folder fromEnumBaseType _ = Nothing + diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileOperationPatternOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileOperationPatternOptions.hs index fd296aacd..5710a9c03 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileOperationPatternOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileOperationPatternOptions.hs @@ -29,4 +29,4 @@ instance Aeson.ToJSON FileOperationPatternOptions where toJSON (FileOperationPatternOptions arg0) = Aeson.object $ concat $ ["ignoreCase" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON FileOperationPatternOptions where - parseJSON = Aeson.withObject "FileOperationPatternOptions" $ \arg -> FileOperationPatternOptions <$> arg Aeson..:! "ignoreCase" \ No newline at end of file + parseJSON = Aeson.withObject "FileOperationPatternOptions" $ \arg -> FileOperationPatternOptions <$> arg Aeson..:! "ignoreCase" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileOperationRegistrationOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileOperationRegistrationOptions.hs index 0f286d4cf..38adf7b61 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileOperationRegistrationOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileOperationRegistrationOptions.hs @@ -30,4 +30,4 @@ instance Aeson.ToJSON FileOperationRegistrationOptions where toJSON (FileOperationRegistrationOptions arg0) = Aeson.object $ concat $ [["filters" Aeson..= arg0]] instance Aeson.FromJSON FileOperationRegistrationOptions where - parseJSON = Aeson.withObject "FileOperationRegistrationOptions" $ \arg -> FileOperationRegistrationOptions <$> arg Aeson..: "filters" \ No newline at end of file + parseJSON = Aeson.withObject "FileOperationRegistrationOptions" $ \arg -> FileOperationRegistrationOptions <$> arg Aeson..: "filters" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileRename.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileRename.hs index 294561c2d..504538735 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileRename.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileRename.hs @@ -35,4 +35,4 @@ instance Aeson.ToJSON FileRename where ,["newUri" Aeson..= arg1]] instance Aeson.FromJSON FileRename where - parseJSON = Aeson.withObject "FileRename" $ \arg -> FileRename <$> arg Aeson..: "oldUri" <*> arg Aeson..: "newUri" \ No newline at end of file + parseJSON = Aeson.withObject "FileRename" $ \arg -> FileRename <$> arg Aeson..: "oldUri" <*> arg Aeson..: "newUri" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileSystemWatcher.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileSystemWatcher.hs index 69476539d..b6152c0da 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileSystemWatcher.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FileSystemWatcher.hs @@ -38,4 +38,4 @@ instance Aeson.ToJSON FileSystemWatcher where ,"kind" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON FileSystemWatcher where - parseJSON = Aeson.withObject "FileSystemWatcher" $ \arg -> FileSystemWatcher <$> arg Aeson..: "globPattern" <*> arg Aeson..:! "kind" \ No newline at end of file + parseJSON = Aeson.withObject "FileSystemWatcher" $ \arg -> FileSystemWatcher <$> arg Aeson..: "globPattern" <*> arg Aeson..:! "kind" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FoldingRange.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FoldingRange.hs index 1a2d8adc1..bbd6aa7d1 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FoldingRange.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FoldingRange.hs @@ -63,4 +63,4 @@ instance Aeson.ToJSON FoldingRange where ,"collapsedText" Language.LSP.Protocol.Types.Common..=? arg5] instance Aeson.FromJSON FoldingRange where - parseJSON = Aeson.withObject "FoldingRange" $ \arg -> FoldingRange <$> arg Aeson..: "startLine" <*> arg Aeson..:! "startCharacter" <*> arg Aeson..: "endLine" <*> arg Aeson..:! "endCharacter" <*> arg Aeson..:! "kind" <*> arg Aeson..:! "collapsedText" \ No newline at end of file + parseJSON = Aeson.withObject "FoldingRange" $ \arg -> FoldingRange <$> arg Aeson..: "startLine" <*> arg Aeson..:! "startCharacter" <*> arg Aeson..: "endLine" <*> arg Aeson..:! "endCharacter" <*> arg Aeson..:! "kind" <*> arg Aeson..:! "collapsedText" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FoldingRangeClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FoldingRangeClientCapabilities.hs index c2e0cdf32..8e764ed35 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FoldingRangeClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FoldingRangeClientCapabilities.hs @@ -60,4 +60,4 @@ instance Aeson.ToJSON FoldingRangeClientCapabilities where ,"foldingRange" Language.LSP.Protocol.Types.Common..=? arg4] instance Aeson.FromJSON FoldingRangeClientCapabilities where - parseJSON = Aeson.withObject "FoldingRangeClientCapabilities" $ \arg -> FoldingRangeClientCapabilities <$> arg Aeson..:! "dynamicRegistration" <*> arg Aeson..:! "rangeLimit" <*> arg Aeson..:! "lineFoldingOnly" <*> arg Aeson..:! "foldingRangeKind" <*> arg Aeson..:! "foldingRange" \ No newline at end of file + parseJSON = Aeson.withObject "FoldingRangeClientCapabilities" $ \arg -> FoldingRangeClientCapabilities <$> arg Aeson..:! "dynamicRegistration" <*> arg Aeson..:! "rangeLimit" <*> arg Aeson..:! "lineFoldingOnly" <*> arg Aeson..:! "foldingRangeKind" <*> arg Aeson..:! "foldingRange" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FoldingRangeKind.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FoldingRangeKind.hs index efcd2581a..23b8b1b29 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FoldingRangeKind.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FoldingRangeKind.hs @@ -53,3 +53,4 @@ instance Language.LSP.Protocol.Types.LspEnum.LspOpenEnum FoldingRangeKind where fromOpenEnumBaseType "region" = FoldingRangeKind_Region fromOpenEnumBaseType arg = FoldingRangeKind_Custom arg + diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FoldingRangeOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FoldingRangeOptions.hs index c6c86b4a5..16096852c 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FoldingRangeOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FoldingRangeOptions.hs @@ -27,4 +27,4 @@ instance Aeson.ToJSON FoldingRangeOptions where toJSON (FoldingRangeOptions arg0) = Aeson.object $ concat $ ["workDoneProgress" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON FoldingRangeOptions where - parseJSON = Aeson.withObject "FoldingRangeOptions" $ \arg -> FoldingRangeOptions <$> arg Aeson..:! "workDoneProgress" \ No newline at end of file + parseJSON = Aeson.withObject "FoldingRangeOptions" $ \arg -> FoldingRangeOptions <$> arg Aeson..:! "workDoneProgress" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FoldingRangeParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FoldingRangeParams.hs index 571608eda..75fe9b120 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FoldingRangeParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FoldingRangeParams.hs @@ -40,4 +40,4 @@ instance Aeson.ToJSON FoldingRangeParams where ,["textDocument" Aeson..= arg2]] instance Aeson.FromJSON FoldingRangeParams where - parseJSON = Aeson.withObject "FoldingRangeParams" $ \arg -> FoldingRangeParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" <*> arg Aeson..: "textDocument" \ No newline at end of file + parseJSON = Aeson.withObject "FoldingRangeParams" $ \arg -> FoldingRangeParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" <*> arg Aeson..: "textDocument" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FoldingRangeRegistrationOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FoldingRangeRegistrationOptions.hs index 206482599..3da23e821 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FoldingRangeRegistrationOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FoldingRangeRegistrationOptions.hs @@ -41,4 +41,4 @@ instance Aeson.ToJSON FoldingRangeRegistrationOptions where ,"id" Language.LSP.Protocol.Types.Common..=? arg2] instance Aeson.FromJSON FoldingRangeRegistrationOptions where - parseJSON = Aeson.withObject "FoldingRangeRegistrationOptions" $ \arg -> FoldingRangeRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "id" \ No newline at end of file + parseJSON = Aeson.withObject "FoldingRangeRegistrationOptions" $ \arg -> FoldingRangeRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "id" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FormattingOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FormattingOptions.hs index c731af4b8..c3844e0a4 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FormattingOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FormattingOptions.hs @@ -53,4 +53,4 @@ instance Aeson.ToJSON FormattingOptions where ,"trimFinalNewlines" Language.LSP.Protocol.Types.Common..=? arg4] instance Aeson.FromJSON FormattingOptions where - parseJSON = Aeson.withObject "FormattingOptions" $ \arg -> FormattingOptions <$> arg Aeson..: "tabSize" <*> arg Aeson..: "insertSpaces" <*> arg Aeson..:! "trimTrailingWhitespace" <*> arg Aeson..:! "insertFinalNewline" <*> arg Aeson..:! "trimFinalNewlines" \ No newline at end of file + parseJSON = Aeson.withObject "FormattingOptions" $ \arg -> FormattingOptions <$> arg Aeson..: "tabSize" <*> arg Aeson..: "insertSpaces" <*> arg Aeson..:! "trimTrailingWhitespace" <*> arg Aeson..:! "insertFinalNewline" <*> arg Aeson..:! "trimFinalNewlines" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FullDocumentDiagnosticReport.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FullDocumentDiagnosticReport.hs index ca703e464..947c39b18 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FullDocumentDiagnosticReport.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/FullDocumentDiagnosticReport.hs @@ -44,4 +44,4 @@ instance Aeson.ToJSON FullDocumentDiagnosticReport where ,["items" Aeson..= arg2]] instance Aeson.FromJSON FullDocumentDiagnosticReport where - parseJSON = Aeson.withObject "FullDocumentDiagnosticReport" $ \arg -> FullDocumentDiagnosticReport <$> arg Aeson..: "kind" <*> arg Aeson..:! "resultId" <*> arg Aeson..: "items" \ No newline at end of file + parseJSON = Aeson.withObject "FullDocumentDiagnosticReport" $ \arg -> FullDocumentDiagnosticReport <$> arg Aeson..: "kind" <*> arg Aeson..:! "resultId" <*> arg Aeson..: "items" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/GeneralClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/GeneralClientCapabilities.hs index f0c17072c..fd422792b 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/GeneralClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/GeneralClientCapabilities.hs @@ -75,4 +75,4 @@ instance Aeson.ToJSON GeneralClientCapabilities where ,"positionEncodings" Language.LSP.Protocol.Types.Common..=? arg3] instance Aeson.FromJSON GeneralClientCapabilities where - parseJSON = Aeson.withObject "GeneralClientCapabilities" $ \arg -> GeneralClientCapabilities <$> arg Aeson..:! "staleRequestSupport" <*> arg Aeson..:! "regularExpressions" <*> arg Aeson..:! "markdown" <*> arg Aeson..:! "positionEncodings" \ No newline at end of file + parseJSON = Aeson.withObject "GeneralClientCapabilities" $ \arg -> GeneralClientCapabilities <$> arg Aeson..:! "staleRequestSupport" <*> arg Aeson..:! "regularExpressions" <*> arg Aeson..:! "markdown" <*> arg Aeson..:! "positionEncodings" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/GlobPattern.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/GlobPattern.hs index adb5f9725..5d8b5fd44 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/GlobPattern.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/GlobPattern.hs @@ -21,4 +21,4 @@ The glob pattern. Either a string pattern or a relative pattern. newtype GlobPattern = GlobPattern (Language.LSP.Protocol.Internal.Types.Pattern.Pattern Language.LSP.Protocol.Types.Common.|? Language.LSP.Protocol.Internal.Types.RelativePattern.RelativePattern) deriving newtype (Aeson.ToJSON, Aeson.FromJSON) deriving stock (Show, Eq, Ord, Generic) - deriving anyclass (NFData) \ No newline at end of file + deriving anyclass (NFData) diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Hover.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Hover.hs index 2d84b19f0..772f0338d 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Hover.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Hover.hs @@ -36,4 +36,4 @@ instance Aeson.ToJSON Hover where ,"range" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON Hover where - parseJSON = Aeson.withObject "Hover" $ \arg -> Hover <$> arg Aeson..: "contents" <*> arg Aeson..:! "range" \ No newline at end of file + parseJSON = Aeson.withObject "Hover" $ \arg -> Hover <$> arg Aeson..: "contents" <*> arg Aeson..:! "range" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/HoverClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/HoverClientCapabilities.hs index 9546f65b7..0373bf535 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/HoverClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/HoverClientCapabilities.hs @@ -34,4 +34,4 @@ instance Aeson.ToJSON HoverClientCapabilities where ,"contentFormat" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON HoverClientCapabilities where - parseJSON = Aeson.withObject "HoverClientCapabilities" $ \arg -> HoverClientCapabilities <$> arg Aeson..:! "dynamicRegistration" <*> arg Aeson..:! "contentFormat" \ No newline at end of file + parseJSON = Aeson.withObject "HoverClientCapabilities" $ \arg -> HoverClientCapabilities <$> arg Aeson..:! "dynamicRegistration" <*> arg Aeson..:! "contentFormat" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/HoverOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/HoverOptions.hs index 04b4b26f5..ea4b0ee4a 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/HoverOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/HoverOptions.hs @@ -27,4 +27,4 @@ instance Aeson.ToJSON HoverOptions where toJSON (HoverOptions arg0) = Aeson.object $ concat $ ["workDoneProgress" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON HoverOptions where - parseJSON = Aeson.withObject "HoverOptions" $ \arg -> HoverOptions <$> arg Aeson..:! "workDoneProgress" \ No newline at end of file + parseJSON = Aeson.withObject "HoverOptions" $ \arg -> HoverOptions <$> arg Aeson..:! "workDoneProgress" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/HoverParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/HoverParams.hs index fd0f4d3a2..0f77115a4 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/HoverParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/HoverParams.hs @@ -40,4 +40,4 @@ instance Aeson.ToJSON HoverParams where ,"workDoneToken" Language.LSP.Protocol.Types.Common..=? arg2] instance Aeson.FromJSON HoverParams where - parseJSON = Aeson.withObject "HoverParams" $ \arg -> HoverParams <$> arg Aeson..: "textDocument" <*> arg Aeson..: "position" <*> arg Aeson..:! "workDoneToken" \ No newline at end of file + parseJSON = Aeson.withObject "HoverParams" $ \arg -> HoverParams <$> arg Aeson..: "textDocument" <*> arg Aeson..: "position" <*> arg Aeson..:! "workDoneToken" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/HoverRegistrationOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/HoverRegistrationOptions.hs index 45ac8c22d..e0b668c1a 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/HoverRegistrationOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/HoverRegistrationOptions.hs @@ -34,4 +34,4 @@ instance Aeson.ToJSON HoverRegistrationOptions where ,"workDoneProgress" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON HoverRegistrationOptions where - parseJSON = Aeson.withObject "HoverRegistrationOptions" $ \arg -> HoverRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" \ No newline at end of file + parseJSON = Aeson.withObject "HoverRegistrationOptions" $ \arg -> HoverRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ImplementationClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ImplementationClientCapabilities.hs index 00acb9e28..1317a11cc 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ImplementationClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ImplementationClientCapabilities.hs @@ -36,4 +36,4 @@ instance Aeson.ToJSON ImplementationClientCapabilities where ,"linkSupport" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON ImplementationClientCapabilities where - parseJSON = Aeson.withObject "ImplementationClientCapabilities" $ \arg -> ImplementationClientCapabilities <$> arg Aeson..:! "dynamicRegistration" <*> arg Aeson..:! "linkSupport" \ No newline at end of file + parseJSON = Aeson.withObject "ImplementationClientCapabilities" $ \arg -> ImplementationClientCapabilities <$> arg Aeson..:! "dynamicRegistration" <*> arg Aeson..:! "linkSupport" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ImplementationOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ImplementationOptions.hs index 45dce3c5d..ba52c4f49 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ImplementationOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ImplementationOptions.hs @@ -27,4 +27,4 @@ instance Aeson.ToJSON ImplementationOptions where toJSON (ImplementationOptions arg0) = Aeson.object $ concat $ ["workDoneProgress" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON ImplementationOptions where - parseJSON = Aeson.withObject "ImplementationOptions" $ \arg -> ImplementationOptions <$> arg Aeson..:! "workDoneProgress" \ No newline at end of file + parseJSON = Aeson.withObject "ImplementationOptions" $ \arg -> ImplementationOptions <$> arg Aeson..:! "workDoneProgress" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ImplementationParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ImplementationParams.hs index 5ee7e9309..3769334f2 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ImplementationParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ImplementationParams.hs @@ -46,4 +46,4 @@ instance Aeson.ToJSON ImplementationParams where ,"partialResultToken" Language.LSP.Protocol.Types.Common..=? arg3] instance Aeson.FromJSON ImplementationParams where - parseJSON = Aeson.withObject "ImplementationParams" $ \arg -> ImplementationParams <$> arg Aeson..: "textDocument" <*> arg Aeson..: "position" <*> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" \ No newline at end of file + parseJSON = Aeson.withObject "ImplementationParams" $ \arg -> ImplementationParams <$> arg Aeson..: "textDocument" <*> arg Aeson..: "position" <*> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ImplementationRegistrationOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ImplementationRegistrationOptions.hs index b6c69ca40..55d426d41 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ImplementationRegistrationOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ImplementationRegistrationOptions.hs @@ -41,4 +41,4 @@ instance Aeson.ToJSON ImplementationRegistrationOptions where ,"id" Language.LSP.Protocol.Types.Common..=? arg2] instance Aeson.FromJSON ImplementationRegistrationOptions where - parseJSON = Aeson.withObject "ImplementationRegistrationOptions" $ \arg -> ImplementationRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "id" \ No newline at end of file + parseJSON = Aeson.withObject "ImplementationRegistrationOptions" $ \arg -> ImplementationRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "id" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InitializeError.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InitializeError.hs index 66d57bf39..b3d1024c5 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InitializeError.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InitializeError.hs @@ -31,4 +31,4 @@ instance Aeson.ToJSON InitializeError where toJSON (InitializeError arg0) = Aeson.object $ concat $ [["retry" Aeson..= arg0]] instance Aeson.FromJSON InitializeError where - parseJSON = Aeson.withObject "InitializeError" $ \arg -> InitializeError <$> arg Aeson..: "retry" \ No newline at end of file + parseJSON = Aeson.withObject "InitializeError" $ \arg -> InitializeError <$> arg Aeson..: "retry" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InitializeParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InitializeParams.hs index 4471718c5..0a582dfc2 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InitializeParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InitializeParams.hs @@ -108,4 +108,4 @@ instance Aeson.ToJSON InitializeParams where ,"workspaceFolders" Language.LSP.Protocol.Types.Common..=? arg9] instance Aeson.FromJSON InitializeParams where - parseJSON = Aeson.withObject "InitializeParams" $ \arg -> InitializeParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..: "processId" <*> arg Aeson..:! "clientInfo" <*> arg Aeson..:! "locale" <*> arg Aeson..:! "rootPath" <*> arg Aeson..: "rootUri" <*> arg Aeson..: "capabilities" <*> arg Aeson..:! "initializationOptions" <*> arg Aeson..:! "trace" <*> arg Aeson..:! "workspaceFolders" \ No newline at end of file + parseJSON = Aeson.withObject "InitializeParams" $ \arg -> InitializeParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..: "processId" <*> arg Aeson..:! "clientInfo" <*> arg Aeson..:! "locale" <*> arg Aeson..:! "rootPath" <*> arg Aeson..: "rootUri" <*> arg Aeson..: "capabilities" <*> arg Aeson..:! "initializationOptions" <*> arg Aeson..:! "trace" <*> arg Aeson..:! "workspaceFolders" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InitializeResult.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InitializeResult.hs index 9297f03cb..26a84926c 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InitializeResult.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InitializeResult.hs @@ -37,4 +37,4 @@ instance Aeson.ToJSON InitializeResult where ,"serverInfo" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON InitializeResult where - parseJSON = Aeson.withObject "InitializeResult" $ \arg -> InitializeResult <$> arg Aeson..: "capabilities" <*> arg Aeson..:! "serverInfo" \ No newline at end of file + parseJSON = Aeson.withObject "InitializeResult" $ \arg -> InitializeResult <$> arg Aeson..: "capabilities" <*> arg Aeson..:! "serverInfo" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InitializedParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InitializedParams.hs index 15a48a980..c87e0d227 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InitializedParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InitializedParams.hs @@ -24,4 +24,4 @@ instance Aeson.ToJSON InitializedParams where toJSON (InitializedParams ) = Aeson.object $ concat $ [] instance Aeson.FromJSON InitializedParams where - parseJSON = Aeson.withObject "InitializedParams" $ \arg -> pure InitializedParams \ No newline at end of file + parseJSON = Aeson.withObject "InitializedParams" $ \arg -> pure InitializedParams diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlayHint.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlayHint.hs index 14992d374..2b50c43d3 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlayHint.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlayHint.hs @@ -88,4 +88,4 @@ instance Aeson.ToJSON InlayHint where ,"data" Language.LSP.Protocol.Types.Common..=? arg7] instance Aeson.FromJSON InlayHint where - parseJSON = Aeson.withObject "InlayHint" $ \arg -> InlayHint <$> arg Aeson..: "position" <*> arg Aeson..: "label" <*> arg Aeson..:! "kind" <*> arg Aeson..:! "textEdits" <*> arg Aeson..:! "tooltip" <*> arg Aeson..:! "paddingLeft" <*> arg Aeson..:! "paddingRight" <*> arg Aeson..:! "data" \ No newline at end of file + parseJSON = Aeson.withObject "InlayHint" $ \arg -> InlayHint <$> arg Aeson..: "position" <*> arg Aeson..: "label" <*> arg Aeson..:! "kind" <*> arg Aeson..:! "textEdits" <*> arg Aeson..:! "tooltip" <*> arg Aeson..:! "paddingLeft" <*> arg Aeson..:! "paddingRight" <*> arg Aeson..:! "data" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlayHintClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlayHintClientCapabilities.hs index 6077e43af..6e0abc2e2 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlayHintClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlayHintClientCapabilities.hs @@ -37,4 +37,4 @@ instance Aeson.ToJSON InlayHintClientCapabilities where ,"resolveSupport" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON InlayHintClientCapabilities where - parseJSON = Aeson.withObject "InlayHintClientCapabilities" $ \arg -> InlayHintClientCapabilities <$> arg Aeson..:! "dynamicRegistration" <*> arg Aeson..:! "resolveSupport" \ No newline at end of file + parseJSON = Aeson.withObject "InlayHintClientCapabilities" $ \arg -> InlayHintClientCapabilities <$> arg Aeson..:! "dynamicRegistration" <*> arg Aeson..:! "resolveSupport" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlayHintKind.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlayHintKind.hs index 011be650d..e1dd9a333 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlayHintKind.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlayHintKind.hs @@ -42,3 +42,4 @@ instance Language.LSP.Protocol.Types.LspEnum.LspEnum InlayHintKind where fromEnumBaseType 2 = pure InlayHintKind_Parameter fromEnumBaseType _ = Nothing + diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlayHintLabelPart.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlayHintLabelPart.hs index 12fcd4664..f78818657 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlayHintLabelPart.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlayHintLabelPart.hs @@ -64,4 +64,4 @@ instance Aeson.ToJSON InlayHintLabelPart where ,"command" Language.LSP.Protocol.Types.Common..=? arg3] instance Aeson.FromJSON InlayHintLabelPart where - parseJSON = Aeson.withObject "InlayHintLabelPart" $ \arg -> InlayHintLabelPart <$> arg Aeson..: "value" <*> arg Aeson..:! "tooltip" <*> arg Aeson..:! "location" <*> arg Aeson..:! "command" \ No newline at end of file + parseJSON = Aeson.withObject "InlayHintLabelPart" $ \arg -> InlayHintLabelPart <$> arg Aeson..: "value" <*> arg Aeson..:! "tooltip" <*> arg Aeson..:! "location" <*> arg Aeson..:! "command" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlayHintOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlayHintOptions.hs index a0bd3a858..8b10e53e5 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlayHintOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlayHintOptions.hs @@ -35,4 +35,4 @@ instance Aeson.ToJSON InlayHintOptions where ,"resolveProvider" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON InlayHintOptions where - parseJSON = Aeson.withObject "InlayHintOptions" $ \arg -> InlayHintOptions <$> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "resolveProvider" \ No newline at end of file + parseJSON = Aeson.withObject "InlayHintOptions" $ \arg -> InlayHintOptions <$> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "resolveProvider" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlayHintParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlayHintParams.hs index f9bdd155a..cbf3f7a9d 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlayHintParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlayHintParams.hs @@ -42,4 +42,4 @@ instance Aeson.ToJSON InlayHintParams where ,["range" Aeson..= arg2]] instance Aeson.FromJSON InlayHintParams where - parseJSON = Aeson.withObject "InlayHintParams" $ \arg -> InlayHintParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..: "textDocument" <*> arg Aeson..: "range" \ No newline at end of file + parseJSON = Aeson.withObject "InlayHintParams" $ \arg -> InlayHintParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..: "textDocument" <*> arg Aeson..: "range" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlayHintRegistrationOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlayHintRegistrationOptions.hs index 27ceb91ad..8bf8ddd0e 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlayHintRegistrationOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlayHintRegistrationOptions.hs @@ -49,4 +49,4 @@ instance Aeson.ToJSON InlayHintRegistrationOptions where ,"id" Language.LSP.Protocol.Types.Common..=? arg3] instance Aeson.FromJSON InlayHintRegistrationOptions where - parseJSON = Aeson.withObject "InlayHintRegistrationOptions" $ \arg -> InlayHintRegistrationOptions <$> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "resolveProvider" <*> arg Aeson..: "documentSelector" <*> arg Aeson..:! "id" \ No newline at end of file + parseJSON = Aeson.withObject "InlayHintRegistrationOptions" $ \arg -> InlayHintRegistrationOptions <$> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "resolveProvider" <*> arg Aeson..: "documentSelector" <*> arg Aeson..:! "id" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlayHintWorkspaceClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlayHintWorkspaceClientCapabilities.hs index 97e4b8b69..b36e51652 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlayHintWorkspaceClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlayHintWorkspaceClientCapabilities.hs @@ -35,4 +35,4 @@ instance Aeson.ToJSON InlayHintWorkspaceClientCapabilities where toJSON (InlayHintWorkspaceClientCapabilities arg0) = Aeson.object $ concat $ ["refreshSupport" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON InlayHintWorkspaceClientCapabilities where - parseJSON = Aeson.withObject "InlayHintWorkspaceClientCapabilities" $ \arg -> InlayHintWorkspaceClientCapabilities <$> arg Aeson..:! "refreshSupport" \ No newline at end of file + parseJSON = Aeson.withObject "InlayHintWorkspaceClientCapabilities" $ \arg -> InlayHintWorkspaceClientCapabilities <$> arg Aeson..:! "refreshSupport" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlineValue.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlineValue.hs index a33ed516f..386dcc420 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlineValue.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlineValue.hs @@ -26,4 +26,4 @@ The InlineValue types combines all inline value types into one type. newtype InlineValue = InlineValue (Language.LSP.Protocol.Internal.Types.InlineValueText.InlineValueText Language.LSP.Protocol.Types.Common.|? (Language.LSP.Protocol.Internal.Types.InlineValueVariableLookup.InlineValueVariableLookup Language.LSP.Protocol.Types.Common.|? Language.LSP.Protocol.Internal.Types.InlineValueEvaluatableExpression.InlineValueEvaluatableExpression)) deriving newtype (Aeson.ToJSON, Aeson.FromJSON) deriving stock (Show, Eq, Ord, Generic) - deriving anyclass (NFData) \ No newline at end of file + deriving anyclass (NFData) diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlineValueClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlineValueClientCapabilities.hs index d61ae3c9c..96613431a 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlineValueClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlineValueClientCapabilities.hs @@ -29,4 +29,4 @@ instance Aeson.ToJSON InlineValueClientCapabilities where toJSON (InlineValueClientCapabilities arg0) = Aeson.object $ concat $ ["dynamicRegistration" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON InlineValueClientCapabilities where - parseJSON = Aeson.withObject "InlineValueClientCapabilities" $ \arg -> InlineValueClientCapabilities <$> arg Aeson..:! "dynamicRegistration" \ No newline at end of file + parseJSON = Aeson.withObject "InlineValueClientCapabilities" $ \arg -> InlineValueClientCapabilities <$> arg Aeson..:! "dynamicRegistration" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlineValueContext.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlineValueContext.hs index 4a5697ed9..e4cf85831 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlineValueContext.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlineValueContext.hs @@ -34,4 +34,4 @@ instance Aeson.ToJSON InlineValueContext where ,["stoppedLocation" Aeson..= arg1]] instance Aeson.FromJSON InlineValueContext where - parseJSON = Aeson.withObject "InlineValueContext" $ \arg -> InlineValueContext <$> arg Aeson..: "frameId" <*> arg Aeson..: "stoppedLocation" \ No newline at end of file + parseJSON = Aeson.withObject "InlineValueContext" $ \arg -> InlineValueContext <$> arg Aeson..: "frameId" <*> arg Aeson..: "stoppedLocation" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlineValueEvaluatableExpression.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlineValueEvaluatableExpression.hs index a6f4f6be3..96616f6d1 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlineValueEvaluatableExpression.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlineValueEvaluatableExpression.hs @@ -39,4 +39,4 @@ instance Aeson.ToJSON InlineValueEvaluatableExpression where ,"expression" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON InlineValueEvaluatableExpression where - parseJSON = Aeson.withObject "InlineValueEvaluatableExpression" $ \arg -> InlineValueEvaluatableExpression <$> arg Aeson..: "range" <*> arg Aeson..:! "expression" \ No newline at end of file + parseJSON = Aeson.withObject "InlineValueEvaluatableExpression" $ \arg -> InlineValueEvaluatableExpression <$> arg Aeson..: "range" <*> arg Aeson..:! "expression" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlineValueOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlineValueOptions.hs index 1364a9b58..85cfac8bc 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlineValueOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlineValueOptions.hs @@ -29,4 +29,4 @@ instance Aeson.ToJSON InlineValueOptions where toJSON (InlineValueOptions arg0) = Aeson.object $ concat $ ["workDoneProgress" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON InlineValueOptions where - parseJSON = Aeson.withObject "InlineValueOptions" $ \arg -> InlineValueOptions <$> arg Aeson..:! "workDoneProgress" \ No newline at end of file + parseJSON = Aeson.withObject "InlineValueOptions" $ \arg -> InlineValueOptions <$> arg Aeson..:! "workDoneProgress" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlineValueParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlineValueParams.hs index 2325f1367..778ccdeda 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlineValueParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlineValueParams.hs @@ -49,4 +49,4 @@ instance Aeson.ToJSON InlineValueParams where ,["context" Aeson..= arg3]] instance Aeson.FromJSON InlineValueParams where - parseJSON = Aeson.withObject "InlineValueParams" $ \arg -> InlineValueParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..: "textDocument" <*> arg Aeson..: "range" <*> arg Aeson..: "context" \ No newline at end of file + parseJSON = Aeson.withObject "InlineValueParams" $ \arg -> InlineValueParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..: "textDocument" <*> arg Aeson..: "range" <*> arg Aeson..: "context" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlineValueRegistrationOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlineValueRegistrationOptions.hs index 010fa6440..e4a2310c9 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlineValueRegistrationOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlineValueRegistrationOptions.hs @@ -43,4 +43,4 @@ instance Aeson.ToJSON InlineValueRegistrationOptions where ,"id" Language.LSP.Protocol.Types.Common..=? arg2] instance Aeson.FromJSON InlineValueRegistrationOptions where - parseJSON = Aeson.withObject "InlineValueRegistrationOptions" $ \arg -> InlineValueRegistrationOptions <$> arg Aeson..:! "workDoneProgress" <*> arg Aeson..: "documentSelector" <*> arg Aeson..:! "id" \ No newline at end of file + parseJSON = Aeson.withObject "InlineValueRegistrationOptions" $ \arg -> InlineValueRegistrationOptions <$> arg Aeson..:! "workDoneProgress" <*> arg Aeson..: "documentSelector" <*> arg Aeson..:! "id" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlineValueText.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlineValueText.hs index 25b18ff6b..c33205b7a 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlineValueText.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlineValueText.hs @@ -36,4 +36,4 @@ instance Aeson.ToJSON InlineValueText where ,["text" Aeson..= arg1]] instance Aeson.FromJSON InlineValueText where - parseJSON = Aeson.withObject "InlineValueText" $ \arg -> InlineValueText <$> arg Aeson..: "range" <*> arg Aeson..: "text" \ No newline at end of file + parseJSON = Aeson.withObject "InlineValueText" $ \arg -> InlineValueText <$> arg Aeson..: "range" <*> arg Aeson..: "text" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlineValueVariableLookup.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlineValueVariableLookup.hs index 62668f6e5..0155f7483 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlineValueVariableLookup.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlineValueVariableLookup.hs @@ -44,4 +44,4 @@ instance Aeson.ToJSON InlineValueVariableLookup where ,["caseSensitiveLookup" Aeson..= arg2]] instance Aeson.FromJSON InlineValueVariableLookup where - parseJSON = Aeson.withObject "InlineValueVariableLookup" $ \arg -> InlineValueVariableLookup <$> arg Aeson..: "range" <*> arg Aeson..:! "variableName" <*> arg Aeson..: "caseSensitiveLookup" \ No newline at end of file + parseJSON = Aeson.withObject "InlineValueVariableLookup" $ \arg -> InlineValueVariableLookup <$> arg Aeson..: "range" <*> arg Aeson..:! "variableName" <*> arg Aeson..: "caseSensitiveLookup" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlineValueWorkspaceClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlineValueWorkspaceClientCapabilities.hs index a5b465fff..cd0948755 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlineValueWorkspaceClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InlineValueWorkspaceClientCapabilities.hs @@ -35,4 +35,4 @@ instance Aeson.ToJSON InlineValueWorkspaceClientCapabilities where toJSON (InlineValueWorkspaceClientCapabilities arg0) = Aeson.object $ concat $ ["refreshSupport" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON InlineValueWorkspaceClientCapabilities where - parseJSON = Aeson.withObject "InlineValueWorkspaceClientCapabilities" $ \arg -> InlineValueWorkspaceClientCapabilities <$> arg Aeson..:! "refreshSupport" \ No newline at end of file + parseJSON = Aeson.withObject "InlineValueWorkspaceClientCapabilities" $ \arg -> InlineValueWorkspaceClientCapabilities <$> arg Aeson..:! "refreshSupport" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InsertReplaceEdit.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InsertReplaceEdit.hs index 3bb1a4e15..63dc8e2fc 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InsertReplaceEdit.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InsertReplaceEdit.hs @@ -41,4 +41,4 @@ instance Aeson.ToJSON InsertReplaceEdit where ,["replace" Aeson..= arg2]] instance Aeson.FromJSON InsertReplaceEdit where - parseJSON = Aeson.withObject "InsertReplaceEdit" $ \arg -> InsertReplaceEdit <$> arg Aeson..: "newText" <*> arg Aeson..: "insert" <*> arg Aeson..: "replace" \ No newline at end of file + parseJSON = Aeson.withObject "InsertReplaceEdit" $ \arg -> InsertReplaceEdit <$> arg Aeson..: "newText" <*> arg Aeson..: "insert" <*> arg Aeson..: "replace" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InsertTextFormat.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InsertTextFormat.hs index 90265af17..e9ca77213 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InsertTextFormat.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InsertTextFormat.hs @@ -49,3 +49,4 @@ instance Language.LSP.Protocol.Types.LspEnum.LspEnum InsertTextFormat where fromEnumBaseType 2 = pure InsertTextFormat_Snippet fromEnumBaseType _ = Nothing + diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InsertTextMode.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InsertTextMode.hs index 9273a9024..c38e1943c 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InsertTextMode.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/InsertTextMode.hs @@ -54,3 +54,4 @@ instance Language.LSP.Protocol.Types.LspEnum.LspEnum InsertTextMode where fromEnumBaseType 2 = pure InsertTextMode_AdjustIndentation fromEnumBaseType _ = Nothing + diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LSPAny.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LSPAny.hs index f7bed36e9..594a5c80d 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LSPAny.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LSPAny.hs @@ -24,4 +24,4 @@ optional as well. newtype LSPAny = LSPAny (Data.Aeson.Object Language.LSP.Protocol.Types.Common.|? (Data.Aeson.Array Language.LSP.Protocol.Types.Common.|? (Data.Text.Text Language.LSP.Protocol.Types.Common.|? (Language.LSP.Protocol.Types.Common.Int32 Language.LSP.Protocol.Types.Common.|? (Language.LSP.Protocol.Types.Common.UInt Language.LSP.Protocol.Types.Common.|? (Float Language.LSP.Protocol.Types.Common.|? (Bool Language.LSP.Protocol.Types.Common.|? Language.LSP.Protocol.Types.Common.Null))))))) deriving newtype (Aeson.ToJSON, Aeson.FromJSON) deriving stock (Show, Eq, Ord, Generic) - deriving anyclass (NFData) \ No newline at end of file + deriving anyclass (NFData) diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LSPArray.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LSPArray.hs index ba55a4784..d69dedeac 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LSPArray.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LSPArray.hs @@ -18,4 +18,4 @@ LSP arrays. newtype LSPArray = LSPArray [Data.Aeson.Value] deriving newtype (Aeson.ToJSON, Aeson.FromJSON) deriving stock (Show, Eq, Ord, Generic) - deriving anyclass (NFData) \ No newline at end of file + deriving anyclass (NFData) diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LSPErrorCodes.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LSPErrorCodes.hs index 34b00e608..c1a36f365 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LSPErrorCodes.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LSPErrorCodes.hs @@ -76,3 +76,4 @@ instance Language.LSP.Protocol.Types.LspEnum.LspOpenEnum LSPErrorCodes where fromOpenEnumBaseType -32800 = LSPErrorCodes_RequestCancelled fromOpenEnumBaseType arg = LSPErrorCodes_Custom arg + diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LSPObject.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LSPObject.hs index 94f21d726..c5122e9c8 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LSPObject.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LSPObject.hs @@ -20,4 +20,4 @@ LSP object definition. newtype LSPObject = LSPObject (Data.Map.Map Data.Text.Text Data.Aeson.Value) deriving newtype (Aeson.ToJSON, Aeson.FromJSON) deriving stock (Show, Eq, Ord, Generic) - deriving anyclass (NFData) \ No newline at end of file + deriving anyclass (NFData) diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LinkedEditingRangeClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LinkedEditingRangeClientCapabilities.hs index baeb24119..ebb1e50d9 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LinkedEditingRangeClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LinkedEditingRangeClientCapabilities.hs @@ -31,4 +31,4 @@ instance Aeson.ToJSON LinkedEditingRangeClientCapabilities where toJSON (LinkedEditingRangeClientCapabilities arg0) = Aeson.object $ concat $ ["dynamicRegistration" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON LinkedEditingRangeClientCapabilities where - parseJSON = Aeson.withObject "LinkedEditingRangeClientCapabilities" $ \arg -> LinkedEditingRangeClientCapabilities <$> arg Aeson..:! "dynamicRegistration" \ No newline at end of file + parseJSON = Aeson.withObject "LinkedEditingRangeClientCapabilities" $ \arg -> LinkedEditingRangeClientCapabilities <$> arg Aeson..:! "dynamicRegistration" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LinkedEditingRangeOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LinkedEditingRangeOptions.hs index d3bd11b91..d33c8e06e 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LinkedEditingRangeOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LinkedEditingRangeOptions.hs @@ -27,4 +27,4 @@ instance Aeson.ToJSON LinkedEditingRangeOptions where toJSON (LinkedEditingRangeOptions arg0) = Aeson.object $ concat $ ["workDoneProgress" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON LinkedEditingRangeOptions where - parseJSON = Aeson.withObject "LinkedEditingRangeOptions" $ \arg -> LinkedEditingRangeOptions <$> arg Aeson..:! "workDoneProgress" \ No newline at end of file + parseJSON = Aeson.withObject "LinkedEditingRangeOptions" $ \arg -> LinkedEditingRangeOptions <$> arg Aeson..:! "workDoneProgress" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LinkedEditingRangeParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LinkedEditingRangeParams.hs index 9dcf4eaee..d672e919e 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LinkedEditingRangeParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LinkedEditingRangeParams.hs @@ -40,4 +40,4 @@ instance Aeson.ToJSON LinkedEditingRangeParams where ,"workDoneToken" Language.LSP.Protocol.Types.Common..=? arg2] instance Aeson.FromJSON LinkedEditingRangeParams where - parseJSON = Aeson.withObject "LinkedEditingRangeParams" $ \arg -> LinkedEditingRangeParams <$> arg Aeson..: "textDocument" <*> arg Aeson..: "position" <*> arg Aeson..:! "workDoneToken" \ No newline at end of file + parseJSON = Aeson.withObject "LinkedEditingRangeParams" $ \arg -> LinkedEditingRangeParams <$> arg Aeson..: "textDocument" <*> arg Aeson..: "position" <*> arg Aeson..:! "workDoneToken" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LinkedEditingRangeRegistrationOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LinkedEditingRangeRegistrationOptions.hs index 8ca0cf2e5..6ba16f492 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LinkedEditingRangeRegistrationOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LinkedEditingRangeRegistrationOptions.hs @@ -41,4 +41,4 @@ instance Aeson.ToJSON LinkedEditingRangeRegistrationOptions where ,"id" Language.LSP.Protocol.Types.Common..=? arg2] instance Aeson.FromJSON LinkedEditingRangeRegistrationOptions where - parseJSON = Aeson.withObject "LinkedEditingRangeRegistrationOptions" $ \arg -> LinkedEditingRangeRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "id" \ No newline at end of file + parseJSON = Aeson.withObject "LinkedEditingRangeRegistrationOptions" $ \arg -> LinkedEditingRangeRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "id" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LinkedEditingRanges.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LinkedEditingRanges.hs index 6285e59dc..501c7b7d2 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LinkedEditingRanges.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LinkedEditingRanges.hs @@ -39,4 +39,4 @@ instance Aeson.ToJSON LinkedEditingRanges where ,"wordPattern" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON LinkedEditingRanges where - parseJSON = Aeson.withObject "LinkedEditingRanges" $ \arg -> LinkedEditingRanges <$> arg Aeson..: "ranges" <*> arg Aeson..:! "wordPattern" \ No newline at end of file + parseJSON = Aeson.withObject "LinkedEditingRanges" $ \arg -> LinkedEditingRanges <$> arg Aeson..: "ranges" <*> arg Aeson..:! "wordPattern" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Location.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Location.hs index ae8d31e21..26675c71f 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Location.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Location.hs @@ -35,4 +35,4 @@ instance Aeson.ToJSON Location where ,["range" Aeson..= arg1]] instance Aeson.FromJSON Location where - parseJSON = Aeson.withObject "Location" $ \arg -> Location <$> arg Aeson..: "uri" <*> arg Aeson..: "range" \ No newline at end of file + parseJSON = Aeson.withObject "Location" $ \arg -> Location <$> arg Aeson..: "uri" <*> arg Aeson..: "range" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LocationLink.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LocationLink.hs index f4cfdba60..c3a2658ca 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LocationLink.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LocationLink.hs @@ -51,4 +51,4 @@ instance Aeson.ToJSON LocationLink where ,["targetSelectionRange" Aeson..= arg3]] instance Aeson.FromJSON LocationLink where - parseJSON = Aeson.withObject "LocationLink" $ \arg -> LocationLink <$> arg Aeson..:! "originSelectionRange" <*> arg Aeson..: "targetUri" <*> arg Aeson..: "targetRange" <*> arg Aeson..: "targetSelectionRange" \ No newline at end of file + parseJSON = Aeson.withObject "LocationLink" $ \arg -> LocationLink <$> arg Aeson..:! "originSelectionRange" <*> arg Aeson..: "targetUri" <*> arg Aeson..: "targetRange" <*> arg Aeson..: "targetSelectionRange" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LogMessageParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LogMessageParams.hs index ab9a84f84..bc1fe8382 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LogMessageParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LogMessageParams.hs @@ -34,4 +34,4 @@ instance Aeson.ToJSON LogMessageParams where ,["message" Aeson..= arg1]] instance Aeson.FromJSON LogMessageParams where - parseJSON = Aeson.withObject "LogMessageParams" $ \arg -> LogMessageParams <$> arg Aeson..: "type" <*> arg Aeson..: "message" \ No newline at end of file + parseJSON = Aeson.withObject "LogMessageParams" $ \arg -> LogMessageParams <$> arg Aeson..: "type" <*> arg Aeson..: "message" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LogTraceParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LogTraceParams.hs index 92dfcb2d4..adb5f4989 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LogTraceParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/LogTraceParams.hs @@ -33,4 +33,4 @@ instance Aeson.ToJSON LogTraceParams where ,"verbose" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON LogTraceParams where - parseJSON = Aeson.withObject "LogTraceParams" $ \arg -> LogTraceParams <$> arg Aeson..: "message" <*> arg Aeson..:! "verbose" \ No newline at end of file + parseJSON = Aeson.withObject "LogTraceParams" $ \arg -> LogTraceParams <$> arg Aeson..: "message" <*> arg Aeson..:! "verbose" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MarkdownClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MarkdownClientCapabilities.hs index 2b2f555c3..bdae034d0 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MarkdownClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MarkdownClientCapabilities.hs @@ -43,4 +43,4 @@ instance Aeson.ToJSON MarkdownClientCapabilities where ,"allowedTags" Language.LSP.Protocol.Types.Common..=? arg2] instance Aeson.FromJSON MarkdownClientCapabilities where - parseJSON = Aeson.withObject "MarkdownClientCapabilities" $ \arg -> MarkdownClientCapabilities <$> arg Aeson..: "parser" <*> arg Aeson..:! "version" <*> arg Aeson..:! "allowedTags" \ No newline at end of file + parseJSON = Aeson.withObject "MarkdownClientCapabilities" $ \arg -> MarkdownClientCapabilities <$> arg Aeson..: "parser" <*> arg Aeson..:! "version" <*> arg Aeson..:! "allowedTags" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MarkedString.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MarkedString.hs index 93e665a7c..d65220b30 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MarkedString.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MarkedString.hs @@ -31,4 +31,4 @@ Note that markdown strings will be sanitized - that means html will be escaped. newtype MarkedString = MarkedString (Data.Text.Text Language.LSP.Protocol.Types.Common.|? (Row.Rec ("language" Row..== Data.Text.Text Row..+ ("value" Row..== Data.Text.Text Row..+ Row.Empty)))) deriving newtype (Aeson.ToJSON, Aeson.FromJSON) deriving stock (Show, Eq, Ord, Generic) - deriving anyclass (NFData) \ No newline at end of file + deriving anyclass (NFData) diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MarkupContent.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MarkupContent.hs index 1f1142009..d164f1b53 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MarkupContent.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MarkupContent.hs @@ -55,4 +55,4 @@ instance Aeson.ToJSON MarkupContent where ,["value" Aeson..= arg1]] instance Aeson.FromJSON MarkupContent where - parseJSON = Aeson.withObject "MarkupContent" $ \arg -> MarkupContent <$> arg Aeson..: "kind" <*> arg Aeson..: "value" \ No newline at end of file + parseJSON = Aeson.withObject "MarkupContent" $ \arg -> MarkupContent <$> arg Aeson..: "kind" <*> arg Aeson..: "value" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MarkupKind.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MarkupKind.hs index c6f08e7e8..98c2abc0c 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MarkupKind.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MarkupKind.hs @@ -44,3 +44,4 @@ instance Language.LSP.Protocol.Types.LspEnum.LspEnum MarkupKind where fromEnumBaseType "markdown" = pure MarkupKind_Markdown fromEnumBaseType _ = Nothing + diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MessageActionItem.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MessageActionItem.hs index c75b59cbb..a8ffdec12 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MessageActionItem.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MessageActionItem.hs @@ -28,4 +28,4 @@ instance Aeson.ToJSON MessageActionItem where toJSON (MessageActionItem arg0) = Aeson.object $ concat $ [["title" Aeson..= arg0]] instance Aeson.FromJSON MessageActionItem where - parseJSON = Aeson.withObject "MessageActionItem" $ \arg -> MessageActionItem <$> arg Aeson..: "title" \ No newline at end of file + parseJSON = Aeson.withObject "MessageActionItem" $ \arg -> MessageActionItem <$> arg Aeson..: "title" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MessageType.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MessageType.hs index 9745595ff..2a4c27f9d 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MessageType.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MessageType.hs @@ -55,3 +55,4 @@ instance Language.LSP.Protocol.Types.LspEnum.LspEnum MessageType where fromEnumBaseType 4 = pure MessageType_Log fromEnumBaseType _ = Nothing + diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Moniker.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Moniker.hs index 62be8db3a..a06c0f2e2 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Moniker.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Moniker.hs @@ -48,4 +48,4 @@ instance Aeson.ToJSON Moniker where ,"kind" Language.LSP.Protocol.Types.Common..=? arg3] instance Aeson.FromJSON Moniker where - parseJSON = Aeson.withObject "Moniker" $ \arg -> Moniker <$> arg Aeson..: "scheme" <*> arg Aeson..: "identifier" <*> arg Aeson..: "unique" <*> arg Aeson..:! "kind" \ No newline at end of file + parseJSON = Aeson.withObject "Moniker" $ \arg -> Moniker <$> arg Aeson..: "scheme" <*> arg Aeson..: "identifier" <*> arg Aeson..: "unique" <*> arg Aeson..:! "kind" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MonikerClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MonikerClientCapabilities.hs index 95cf28b28..bced37db8 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MonikerClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MonikerClientCapabilities.hs @@ -31,4 +31,4 @@ instance Aeson.ToJSON MonikerClientCapabilities where toJSON (MonikerClientCapabilities arg0) = Aeson.object $ concat $ ["dynamicRegistration" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON MonikerClientCapabilities where - parseJSON = Aeson.withObject "MonikerClientCapabilities" $ \arg -> MonikerClientCapabilities <$> arg Aeson..:! "dynamicRegistration" \ No newline at end of file + parseJSON = Aeson.withObject "MonikerClientCapabilities" $ \arg -> MonikerClientCapabilities <$> arg Aeson..:! "dynamicRegistration" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MonikerKind.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MonikerKind.hs index 5bc3fc868..cab604ef6 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MonikerKind.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MonikerKind.hs @@ -51,3 +51,4 @@ instance Language.LSP.Protocol.Types.LspEnum.LspEnum MonikerKind where fromEnumBaseType "local" = pure MonikerKind_Local fromEnumBaseType _ = Nothing + diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MonikerOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MonikerOptions.hs index cf200ec74..1c0c5eef5 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MonikerOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MonikerOptions.hs @@ -27,4 +27,4 @@ instance Aeson.ToJSON MonikerOptions where toJSON (MonikerOptions arg0) = Aeson.object $ concat $ ["workDoneProgress" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON MonikerOptions where - parseJSON = Aeson.withObject "MonikerOptions" $ \arg -> MonikerOptions <$> arg Aeson..:! "workDoneProgress" \ No newline at end of file + parseJSON = Aeson.withObject "MonikerOptions" $ \arg -> MonikerOptions <$> arg Aeson..:! "workDoneProgress" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MonikerParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MonikerParams.hs index 30da5d7a1..95f1af957 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MonikerParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MonikerParams.hs @@ -46,4 +46,4 @@ instance Aeson.ToJSON MonikerParams where ,"partialResultToken" Language.LSP.Protocol.Types.Common..=? arg3] instance Aeson.FromJSON MonikerParams where - parseJSON = Aeson.withObject "MonikerParams" $ \arg -> MonikerParams <$> arg Aeson..: "textDocument" <*> arg Aeson..: "position" <*> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" \ No newline at end of file + parseJSON = Aeson.withObject "MonikerParams" $ \arg -> MonikerParams <$> arg Aeson..: "textDocument" <*> arg Aeson..: "position" <*> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MonikerRegistrationOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MonikerRegistrationOptions.hs index 2a8fdbc91..b9faf2166 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MonikerRegistrationOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/MonikerRegistrationOptions.hs @@ -34,4 +34,4 @@ instance Aeson.ToJSON MonikerRegistrationOptions where ,"workDoneProgress" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON MonikerRegistrationOptions where - parseJSON = Aeson.withObject "MonikerRegistrationOptions" $ \arg -> MonikerRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" \ No newline at end of file + parseJSON = Aeson.withObject "MonikerRegistrationOptions" $ \arg -> MonikerRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookCell.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookCell.hs index d428058db..9319e5911 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookCell.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookCell.hs @@ -56,4 +56,4 @@ instance Aeson.ToJSON NotebookCell where ,"executionSummary" Language.LSP.Protocol.Types.Common..=? arg3] instance Aeson.FromJSON NotebookCell where - parseJSON = Aeson.withObject "NotebookCell" $ \arg -> NotebookCell <$> arg Aeson..: "kind" <*> arg Aeson..: "document" <*> arg Aeson..:! "metadata" <*> arg Aeson..:! "executionSummary" \ No newline at end of file + parseJSON = Aeson.withObject "NotebookCell" $ \arg -> NotebookCell <$> arg Aeson..: "kind" <*> arg Aeson..: "document" <*> arg Aeson..:! "metadata" <*> arg Aeson..:! "executionSummary" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookCellArrayChange.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookCellArrayChange.hs index 62805f5bf..4f09ec130 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookCellArrayChange.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookCellArrayChange.hs @@ -41,4 +41,4 @@ instance Aeson.ToJSON NotebookCellArrayChange where ,"cells" Language.LSP.Protocol.Types.Common..=? arg2] instance Aeson.FromJSON NotebookCellArrayChange where - parseJSON = Aeson.withObject "NotebookCellArrayChange" $ \arg -> NotebookCellArrayChange <$> arg Aeson..: "start" <*> arg Aeson..: "deleteCount" <*> arg Aeson..:! "cells" \ No newline at end of file + parseJSON = Aeson.withObject "NotebookCellArrayChange" $ \arg -> NotebookCellArrayChange <$> arg Aeson..: "start" <*> arg Aeson..: "deleteCount" <*> arg Aeson..:! "cells" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookCellKind.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookCellKind.hs index 1485e3f8c..734a0a2d7 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookCellKind.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookCellKind.hs @@ -43,3 +43,4 @@ instance Language.LSP.Protocol.Types.LspEnum.LspEnum NotebookCellKind where fromEnumBaseType 2 = pure NotebookCellKind_Code fromEnumBaseType _ = Nothing + diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookCellTextDocumentFilter.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookCellTextDocumentFilter.hs index 4845133b8..998887d33 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookCellTextDocumentFilter.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookCellTextDocumentFilter.hs @@ -43,4 +43,4 @@ instance Aeson.ToJSON NotebookCellTextDocumentFilter where ,"language" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON NotebookCellTextDocumentFilter where - parseJSON = Aeson.withObject "NotebookCellTextDocumentFilter" $ \arg -> NotebookCellTextDocumentFilter <$> arg Aeson..: "notebook" <*> arg Aeson..:! "language" \ No newline at end of file + parseJSON = Aeson.withObject "NotebookCellTextDocumentFilter" $ \arg -> NotebookCellTextDocumentFilter <$> arg Aeson..: "notebook" <*> arg Aeson..:! "language" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookDocument.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookDocument.hs index 67110e3ec..db0987d3e 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookDocument.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookDocument.hs @@ -57,4 +57,4 @@ instance Aeson.ToJSON NotebookDocument where ,["cells" Aeson..= arg4]] instance Aeson.FromJSON NotebookDocument where - parseJSON = Aeson.withObject "NotebookDocument" $ \arg -> NotebookDocument <$> arg Aeson..: "uri" <*> arg Aeson..: "notebookType" <*> arg Aeson..: "version" <*> arg Aeson..:! "metadata" <*> arg Aeson..: "cells" \ No newline at end of file + parseJSON = Aeson.withObject "NotebookDocument" $ \arg -> NotebookDocument <$> arg Aeson..: "uri" <*> arg Aeson..: "notebookType" <*> arg Aeson..: "version" <*> arg Aeson..:! "metadata" <*> arg Aeson..: "cells" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookDocumentChangeEvent.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookDocumentChangeEvent.hs index 1cefe0e10..810517645 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookDocumentChangeEvent.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookDocumentChangeEvent.hs @@ -44,4 +44,4 @@ instance Aeson.ToJSON NotebookDocumentChangeEvent where ,"cells" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON NotebookDocumentChangeEvent where - parseJSON = Aeson.withObject "NotebookDocumentChangeEvent" $ \arg -> NotebookDocumentChangeEvent <$> arg Aeson..:! "metadata" <*> arg Aeson..:! "cells" \ No newline at end of file + parseJSON = Aeson.withObject "NotebookDocumentChangeEvent" $ \arg -> NotebookDocumentChangeEvent <$> arg Aeson..:! "metadata" <*> arg Aeson..:! "cells" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookDocumentClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookDocumentClientCapabilities.hs index cd1bd6e78..a1d9833b0 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookDocumentClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookDocumentClientCapabilities.hs @@ -32,4 +32,4 @@ instance Aeson.ToJSON NotebookDocumentClientCapabilities where toJSON (NotebookDocumentClientCapabilities arg0) = Aeson.object $ concat $ [["synchronization" Aeson..= arg0]] instance Aeson.FromJSON NotebookDocumentClientCapabilities where - parseJSON = Aeson.withObject "NotebookDocumentClientCapabilities" $ \arg -> NotebookDocumentClientCapabilities <$> arg Aeson..: "synchronization" \ No newline at end of file + parseJSON = Aeson.withObject "NotebookDocumentClientCapabilities" $ \arg -> NotebookDocumentClientCapabilities <$> arg Aeson..: "synchronization" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookDocumentFilter.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookDocumentFilter.hs index 9d7dbc95b..31a8e0bf2 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookDocumentFilter.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookDocumentFilter.hs @@ -23,4 +23,4 @@ against the notebook's URI (same as with documents) newtype NotebookDocumentFilter = NotebookDocumentFilter ((Row.Rec ("notebookType" Row..== Data.Text.Text Row..+ ("scheme" Row..== (Maybe Data.Text.Text) Row..+ ("pattern" Row..== (Maybe Data.Text.Text) Row..+ Row.Empty)))) Language.LSP.Protocol.Types.Common.|? ((Row.Rec ("notebookType" Row..== (Maybe Data.Text.Text) Row..+ ("scheme" Row..== Data.Text.Text Row..+ ("pattern" Row..== (Maybe Data.Text.Text) Row..+ Row.Empty)))) Language.LSP.Protocol.Types.Common.|? (Row.Rec ("notebookType" Row..== (Maybe Data.Text.Text) Row..+ ("scheme" Row..== (Maybe Data.Text.Text) Row..+ ("pattern" Row..== Data.Text.Text Row..+ Row.Empty)))))) deriving newtype (Aeson.ToJSON, Aeson.FromJSON) deriving stock (Show, Eq, Ord, Generic) - deriving anyclass (NFData) \ No newline at end of file + deriving anyclass (NFData) diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookDocumentIdentifier.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookDocumentIdentifier.hs index 7196286b7..a77b09754 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookDocumentIdentifier.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookDocumentIdentifier.hs @@ -30,4 +30,4 @@ instance Aeson.ToJSON NotebookDocumentIdentifier where toJSON (NotebookDocumentIdentifier arg0) = Aeson.object $ concat $ [["uri" Aeson..= arg0]] instance Aeson.FromJSON NotebookDocumentIdentifier where - parseJSON = Aeson.withObject "NotebookDocumentIdentifier" $ \arg -> NotebookDocumentIdentifier <$> arg Aeson..: "uri" \ No newline at end of file + parseJSON = Aeson.withObject "NotebookDocumentIdentifier" $ \arg -> NotebookDocumentIdentifier <$> arg Aeson..: "uri" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookDocumentSyncClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookDocumentSyncClientCapabilities.hs index 643334403..ee8588d22 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookDocumentSyncClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookDocumentSyncClientCapabilities.hs @@ -37,4 +37,4 @@ instance Aeson.ToJSON NotebookDocumentSyncClientCapabilities where ,"executionSummarySupport" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON NotebookDocumentSyncClientCapabilities where - parseJSON = Aeson.withObject "NotebookDocumentSyncClientCapabilities" $ \arg -> NotebookDocumentSyncClientCapabilities <$> arg Aeson..:! "dynamicRegistration" <*> arg Aeson..:! "executionSummarySupport" \ No newline at end of file + parseJSON = Aeson.withObject "NotebookDocumentSyncClientCapabilities" $ \arg -> NotebookDocumentSyncClientCapabilities <$> arg Aeson..:! "dynamicRegistration" <*> arg Aeson..:! "executionSummarySupport" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookDocumentSyncOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookDocumentSyncOptions.hs index 26b737f26..ca517bba8 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookDocumentSyncOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookDocumentSyncOptions.hs @@ -48,4 +48,4 @@ instance Aeson.ToJSON NotebookDocumentSyncOptions where ,"save" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON NotebookDocumentSyncOptions where - parseJSON = Aeson.withObject "NotebookDocumentSyncOptions" $ \arg -> NotebookDocumentSyncOptions <$> arg Aeson..: "notebookSelector" <*> arg Aeson..:! "save" \ No newline at end of file + parseJSON = Aeson.withObject "NotebookDocumentSyncOptions" $ \arg -> NotebookDocumentSyncOptions <$> arg Aeson..: "notebookSelector" <*> arg Aeson..:! "save" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookDocumentSyncRegistrationOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookDocumentSyncRegistrationOptions.hs index 62efefc9f..3af04ae61 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookDocumentSyncRegistrationOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/NotebookDocumentSyncRegistrationOptions.hs @@ -44,4 +44,4 @@ instance Aeson.ToJSON NotebookDocumentSyncRegistrationOptions where ,"id" Language.LSP.Protocol.Types.Common..=? arg2] instance Aeson.FromJSON NotebookDocumentSyncRegistrationOptions where - parseJSON = Aeson.withObject "NotebookDocumentSyncRegistrationOptions" $ \arg -> NotebookDocumentSyncRegistrationOptions <$> arg Aeson..: "notebookSelector" <*> arg Aeson..:! "save" <*> arg Aeson..:! "id" \ No newline at end of file + parseJSON = Aeson.withObject "NotebookDocumentSyncRegistrationOptions" $ \arg -> NotebookDocumentSyncRegistrationOptions <$> arg Aeson..: "notebookSelector" <*> arg Aeson..:! "save" <*> arg Aeson..:! "id" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/OptionalVersionedTextDocumentIdentifier.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/OptionalVersionedTextDocumentIdentifier.hs index 7bed6dc8a..8bb3649bc 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/OptionalVersionedTextDocumentIdentifier.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/OptionalVersionedTextDocumentIdentifier.hs @@ -37,4 +37,4 @@ instance Aeson.ToJSON OptionalVersionedTextDocumentIdentifier where ,["version" Aeson..= arg1]] instance Aeson.FromJSON OptionalVersionedTextDocumentIdentifier where - parseJSON = Aeson.withObject "OptionalVersionedTextDocumentIdentifier" $ \arg -> OptionalVersionedTextDocumentIdentifier <$> arg Aeson..: "uri" <*> arg Aeson..: "version" \ No newline at end of file + parseJSON = Aeson.withObject "OptionalVersionedTextDocumentIdentifier" $ \arg -> OptionalVersionedTextDocumentIdentifier <$> arg Aeson..: "uri" <*> arg Aeson..: "version" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ParameterInformation.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ParameterInformation.hs index 7fac0b393..64dc309cb 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ParameterInformation.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ParameterInformation.hs @@ -44,4 +44,4 @@ instance Aeson.ToJSON ParameterInformation where ,"documentation" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON ParameterInformation where - parseJSON = Aeson.withObject "ParameterInformation" $ \arg -> ParameterInformation <$> arg Aeson..: "label" <*> arg Aeson..:! "documentation" \ No newline at end of file + parseJSON = Aeson.withObject "ParameterInformation" $ \arg -> ParameterInformation <$> arg Aeson..: "label" <*> arg Aeson..:! "documentation" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/PartialResultParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/PartialResultParams.hs index da6a972f8..ebe4db4f6 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/PartialResultParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/PartialResultParams.hs @@ -29,4 +29,4 @@ instance Aeson.ToJSON PartialResultParams where toJSON (PartialResultParams arg0) = Aeson.object $ concat $ ["partialResultToken" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON PartialResultParams where - parseJSON = Aeson.withObject "PartialResultParams" $ \arg -> PartialResultParams <$> arg Aeson..:! "partialResultToken" \ No newline at end of file + parseJSON = Aeson.withObject "PartialResultParams" $ \arg -> PartialResultParams <$> arg Aeson..:! "partialResultToken" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Pattern.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Pattern.hs index 01646adf5..cd2ea5d45 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Pattern.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Pattern.hs @@ -28,4 +28,4 @@ newtype Pattern = Pattern Data.Text.Text , Aeson.ToJSONKey , Aeson.FromJSONKey ) deriving stock (Show, Eq, Ord, Generic) - deriving anyclass (NFData) \ No newline at end of file + deriving anyclass (NFData) diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Position.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Position.hs index c731433e4..ad4c794fa 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Position.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Position.hs @@ -67,4 +67,4 @@ instance Aeson.ToJSON Position where ,["character" Aeson..= arg1]] instance Aeson.FromJSON Position where - parseJSON = Aeson.withObject "Position" $ \arg -> Position <$> arg Aeson..: "line" <*> arg Aeson..: "character" \ No newline at end of file + parseJSON = Aeson.withObject "Position" $ \arg -> Position <$> arg Aeson..: "line" <*> arg Aeson..: "character" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/PositionEncodingKind.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/PositionEncodingKind.hs index f312c0fcb..2f72210eb 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/PositionEncodingKind.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/PositionEncodingKind.hs @@ -62,3 +62,4 @@ instance Language.LSP.Protocol.Types.LspEnum.LspOpenEnum PositionEncodingKind wh fromOpenEnumBaseType "utf-32" = PositionEncodingKind_UTF32 fromOpenEnumBaseType arg = PositionEncodingKind_Custom arg + diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/PrepareRenameParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/PrepareRenameParams.hs index 9d912d155..b9f446b9a 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/PrepareRenameParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/PrepareRenameParams.hs @@ -40,4 +40,4 @@ instance Aeson.ToJSON PrepareRenameParams where ,"workDoneToken" Language.LSP.Protocol.Types.Common..=? arg2] instance Aeson.FromJSON PrepareRenameParams where - parseJSON = Aeson.withObject "PrepareRenameParams" $ \arg -> PrepareRenameParams <$> arg Aeson..: "textDocument" <*> arg Aeson..: "position" <*> arg Aeson..:! "workDoneToken" \ No newline at end of file + parseJSON = Aeson.withObject "PrepareRenameParams" $ \arg -> PrepareRenameParams <$> arg Aeson..: "textDocument" <*> arg Aeson..: "position" <*> arg Aeson..:! "workDoneToken" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/PrepareRenameResult.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/PrepareRenameResult.hs index b9e4a60fb..d7bbe0234 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/PrepareRenameResult.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/PrepareRenameResult.hs @@ -20,4 +20,4 @@ import qualified Language.LSP.Protocol.Types.Common newtype PrepareRenameResult = PrepareRenameResult (Language.LSP.Protocol.Internal.Types.Range.Range Language.LSP.Protocol.Types.Common.|? ((Row.Rec ("range" Row..== Language.LSP.Protocol.Internal.Types.Range.Range Row..+ ("placeholder" Row..== Data.Text.Text Row..+ Row.Empty))) Language.LSP.Protocol.Types.Common.|? (Row.Rec ("defaultBehavior" Row..== Bool Row..+ Row.Empty)))) deriving newtype (Aeson.ToJSON, Aeson.FromJSON) deriving stock (Show, Eq, Ord, Generic) - deriving anyclass (NFData) \ No newline at end of file + deriving anyclass (NFData) diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/PrepareSupportDefaultBehavior.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/PrepareSupportDefaultBehavior.hs index 75fb3d2b5..966770a03 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/PrepareSupportDefaultBehavior.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/PrepareSupportDefaultBehavior.hs @@ -35,3 +35,4 @@ instance Language.LSP.Protocol.Types.LspEnum.LspEnum PrepareSupportDefaultBehavi fromEnumBaseType 1 = pure PrepareSupportDefaultBehavior_Identifier fromEnumBaseType _ = Nothing + diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/PreviousResultId.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/PreviousResultId.hs index 70df5f813..a764d8f1d 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/PreviousResultId.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/PreviousResultId.hs @@ -37,4 +37,4 @@ instance Aeson.ToJSON PreviousResultId where ,["value" Aeson..= arg1]] instance Aeson.FromJSON PreviousResultId where - parseJSON = Aeson.withObject "PreviousResultId" $ \arg -> PreviousResultId <$> arg Aeson..: "uri" <*> arg Aeson..: "value" \ No newline at end of file + parseJSON = Aeson.withObject "PreviousResultId" $ \arg -> PreviousResultId <$> arg Aeson..: "uri" <*> arg Aeson..: "value" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ProgressParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ProgressParams.hs index 0fa99d024..45549a55f 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ProgressParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ProgressParams.hs @@ -34,4 +34,4 @@ instance Aeson.ToJSON ProgressParams where ,["value" Aeson..= arg1]] instance Aeson.FromJSON ProgressParams where - parseJSON = Aeson.withObject "ProgressParams" $ \arg -> ProgressParams <$> arg Aeson..: "token" <*> arg Aeson..: "value" \ No newline at end of file + parseJSON = Aeson.withObject "ProgressParams" $ \arg -> ProgressParams <$> arg Aeson..: "token" <*> arg Aeson..: "value" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ProgressToken.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ProgressToken.hs index 84d1bda60..366e1069a 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ProgressToken.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ProgressToken.hs @@ -18,4 +18,4 @@ import qualified Language.LSP.Protocol.Types.Common newtype ProgressToken = ProgressToken (Language.LSP.Protocol.Types.Common.Int32 Language.LSP.Protocol.Types.Common.|? Data.Text.Text) deriving newtype (Aeson.ToJSON, Aeson.FromJSON) deriving stock (Show, Eq, Ord, Generic) - deriving anyclass (NFData) \ No newline at end of file + deriving anyclass (NFData) diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/PublishDiagnosticsClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/PublishDiagnosticsClientCapabilities.hs index 4a1709b35..9bfac6d92 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/PublishDiagnosticsClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/PublishDiagnosticsClientCapabilities.hs @@ -61,4 +61,4 @@ instance Aeson.ToJSON PublishDiagnosticsClientCapabilities where ,"dataSupport" Language.LSP.Protocol.Types.Common..=? arg4] instance Aeson.FromJSON PublishDiagnosticsClientCapabilities where - parseJSON = Aeson.withObject "PublishDiagnosticsClientCapabilities" $ \arg -> PublishDiagnosticsClientCapabilities <$> arg Aeson..:! "relatedInformation" <*> arg Aeson..:! "tagSupport" <*> arg Aeson..:! "versionSupport" <*> arg Aeson..:! "codeDescriptionSupport" <*> arg Aeson..:! "dataSupport" \ No newline at end of file + parseJSON = Aeson.withObject "PublishDiagnosticsClientCapabilities" $ \arg -> PublishDiagnosticsClientCapabilities <$> arg Aeson..:! "relatedInformation" <*> arg Aeson..:! "tagSupport" <*> arg Aeson..:! "versionSupport" <*> arg Aeson..:! "codeDescriptionSupport" <*> arg Aeson..:! "dataSupport" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/PublishDiagnosticsParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/PublishDiagnosticsParams.hs index b74107aea..da1fdc8d6 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/PublishDiagnosticsParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/PublishDiagnosticsParams.hs @@ -41,4 +41,4 @@ instance Aeson.ToJSON PublishDiagnosticsParams where ,["diagnostics" Aeson..= arg2]] instance Aeson.FromJSON PublishDiagnosticsParams where - parseJSON = Aeson.withObject "PublishDiagnosticsParams" $ \arg -> PublishDiagnosticsParams <$> arg Aeson..: "uri" <*> arg Aeson..:! "version" <*> arg Aeson..: "diagnostics" \ No newline at end of file + parseJSON = Aeson.withObject "PublishDiagnosticsParams" $ \arg -> PublishDiagnosticsParams <$> arg Aeson..: "uri" <*> arg Aeson..:! "version" <*> arg Aeson..: "diagnostics" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Range.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Range.hs index 4101779a8..7a0d914ed 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Range.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Range.hs @@ -43,4 +43,4 @@ instance Aeson.ToJSON Range where ,["end" Aeson..= arg1]] instance Aeson.FromJSON Range where - parseJSON = Aeson.withObject "Range" $ \arg -> Range <$> arg Aeson..: "start" <*> arg Aeson..: "end" \ No newline at end of file + parseJSON = Aeson.withObject "Range" $ \arg -> Range <$> arg Aeson..: "start" <*> arg Aeson..: "end" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ReferenceClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ReferenceClientCapabilities.hs index d14d13671..c5a04b44a 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ReferenceClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ReferenceClientCapabilities.hs @@ -27,4 +27,4 @@ instance Aeson.ToJSON ReferenceClientCapabilities where toJSON (ReferenceClientCapabilities arg0) = Aeson.object $ concat $ ["dynamicRegistration" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON ReferenceClientCapabilities where - parseJSON = Aeson.withObject "ReferenceClientCapabilities" $ \arg -> ReferenceClientCapabilities <$> arg Aeson..:! "dynamicRegistration" \ No newline at end of file + parseJSON = Aeson.withObject "ReferenceClientCapabilities" $ \arg -> ReferenceClientCapabilities <$> arg Aeson..:! "dynamicRegistration" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ReferenceContext.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ReferenceContext.hs index 20d033834..1e44b2a2f 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ReferenceContext.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ReferenceContext.hs @@ -28,4 +28,4 @@ instance Aeson.ToJSON ReferenceContext where toJSON (ReferenceContext arg0) = Aeson.object $ concat $ [["includeDeclaration" Aeson..= arg0]] instance Aeson.FromJSON ReferenceContext where - parseJSON = Aeson.withObject "ReferenceContext" $ \arg -> ReferenceContext <$> arg Aeson..: "includeDeclaration" \ No newline at end of file + parseJSON = Aeson.withObject "ReferenceContext" $ \arg -> ReferenceContext <$> arg Aeson..: "includeDeclaration" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ReferenceOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ReferenceOptions.hs index 19b2af350..34fc15ad1 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ReferenceOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ReferenceOptions.hs @@ -27,4 +27,4 @@ instance Aeson.ToJSON ReferenceOptions where toJSON (ReferenceOptions arg0) = Aeson.object $ concat $ ["workDoneProgress" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON ReferenceOptions where - parseJSON = Aeson.withObject "ReferenceOptions" $ \arg -> ReferenceOptions <$> arg Aeson..:! "workDoneProgress" \ No newline at end of file + parseJSON = Aeson.withObject "ReferenceOptions" $ \arg -> ReferenceOptions <$> arg Aeson..:! "workDoneProgress" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ReferenceParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ReferenceParams.hs index cb0a780a5..46c7313a8 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ReferenceParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ReferenceParams.hs @@ -52,4 +52,4 @@ instance Aeson.ToJSON ReferenceParams where ,["context" Aeson..= arg4]] instance Aeson.FromJSON ReferenceParams where - parseJSON = Aeson.withObject "ReferenceParams" $ \arg -> ReferenceParams <$> arg Aeson..: "textDocument" <*> arg Aeson..: "position" <*> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" <*> arg Aeson..: "context" \ No newline at end of file + parseJSON = Aeson.withObject "ReferenceParams" $ \arg -> ReferenceParams <$> arg Aeson..: "textDocument" <*> arg Aeson..: "position" <*> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" <*> arg Aeson..: "context" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ReferenceRegistrationOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ReferenceRegistrationOptions.hs index 334439c5e..2b545f850 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ReferenceRegistrationOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ReferenceRegistrationOptions.hs @@ -34,4 +34,4 @@ instance Aeson.ToJSON ReferenceRegistrationOptions where ,"workDoneProgress" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON ReferenceRegistrationOptions where - parseJSON = Aeson.withObject "ReferenceRegistrationOptions" $ \arg -> ReferenceRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" \ No newline at end of file + parseJSON = Aeson.withObject "ReferenceRegistrationOptions" $ \arg -> ReferenceRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Registration.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Registration.hs index 19d3633d6..2dc69f558 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Registration.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Registration.hs @@ -40,4 +40,4 @@ instance Aeson.ToJSON Registration where ,"registerOptions" Language.LSP.Protocol.Types.Common..=? arg2] instance Aeson.FromJSON Registration where - parseJSON = Aeson.withObject "Registration" $ \arg -> Registration <$> arg Aeson..: "id" <*> arg Aeson..: "method" <*> arg Aeson..:! "registerOptions" \ No newline at end of file + parseJSON = Aeson.withObject "Registration" $ \arg -> Registration <$> arg Aeson..: "id" <*> arg Aeson..: "method" <*> arg Aeson..:! "registerOptions" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RegistrationParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RegistrationParams.hs index 5e0b5e214..869d2a564 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RegistrationParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RegistrationParams.hs @@ -28,4 +28,4 @@ instance Aeson.ToJSON RegistrationParams where toJSON (RegistrationParams arg0) = Aeson.object $ concat $ [["registrations" Aeson..= arg0]] instance Aeson.FromJSON RegistrationParams where - parseJSON = Aeson.withObject "RegistrationParams" $ \arg -> RegistrationParams <$> arg Aeson..: "registrations" \ No newline at end of file + parseJSON = Aeson.withObject "RegistrationParams" $ \arg -> RegistrationParams <$> arg Aeson..: "registrations" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RegularExpressionsClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RegularExpressionsClientCapabilities.hs index 8f3e9b9f7..87b6886a1 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RegularExpressionsClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RegularExpressionsClientCapabilities.hs @@ -35,4 +35,4 @@ instance Aeson.ToJSON RegularExpressionsClientCapabilities where ,"version" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON RegularExpressionsClientCapabilities where - parseJSON = Aeson.withObject "RegularExpressionsClientCapabilities" $ \arg -> RegularExpressionsClientCapabilities <$> arg Aeson..: "engine" <*> arg Aeson..:! "version" \ No newline at end of file + parseJSON = Aeson.withObject "RegularExpressionsClientCapabilities" $ \arg -> RegularExpressionsClientCapabilities <$> arg Aeson..: "engine" <*> arg Aeson..:! "version" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RelatedFullDocumentDiagnosticReport.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RelatedFullDocumentDiagnosticReport.hs index 729ebfa4a..7fc56506e 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RelatedFullDocumentDiagnosticReport.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RelatedFullDocumentDiagnosticReport.hs @@ -59,4 +59,4 @@ instance Aeson.ToJSON RelatedFullDocumentDiagnosticReport where ,"relatedDocuments" Language.LSP.Protocol.Types.Common..=? arg3] instance Aeson.FromJSON RelatedFullDocumentDiagnosticReport where - parseJSON = Aeson.withObject "RelatedFullDocumentDiagnosticReport" $ \arg -> RelatedFullDocumentDiagnosticReport <$> arg Aeson..: "kind" <*> arg Aeson..:! "resultId" <*> arg Aeson..: "items" <*> arg Aeson..:! "relatedDocuments" \ No newline at end of file + parseJSON = Aeson.withObject "RelatedFullDocumentDiagnosticReport" $ \arg -> RelatedFullDocumentDiagnosticReport <$> arg Aeson..: "kind" <*> arg Aeson..:! "resultId" <*> arg Aeson..: "items" <*> arg Aeson..:! "relatedDocuments" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RelatedUnchangedDocumentDiagnosticReport.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RelatedUnchangedDocumentDiagnosticReport.hs index 5824b5613..dcf1d3b88 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RelatedUnchangedDocumentDiagnosticReport.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RelatedUnchangedDocumentDiagnosticReport.hs @@ -55,4 +55,4 @@ instance Aeson.ToJSON RelatedUnchangedDocumentDiagnosticReport where ,"relatedDocuments" Language.LSP.Protocol.Types.Common..=? arg2] instance Aeson.FromJSON RelatedUnchangedDocumentDiagnosticReport where - parseJSON = Aeson.withObject "RelatedUnchangedDocumentDiagnosticReport" $ \arg -> RelatedUnchangedDocumentDiagnosticReport <$> arg Aeson..: "kind" <*> arg Aeson..: "resultId" <*> arg Aeson..:! "relatedDocuments" \ No newline at end of file + parseJSON = Aeson.withObject "RelatedUnchangedDocumentDiagnosticReport" $ \arg -> RelatedUnchangedDocumentDiagnosticReport <$> arg Aeson..: "kind" <*> arg Aeson..: "resultId" <*> arg Aeson..:! "relatedDocuments" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RelativePattern.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RelativePattern.hs index b1924e7c2..98af49db9 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RelativePattern.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RelativePattern.hs @@ -40,4 +40,4 @@ instance Aeson.ToJSON RelativePattern where ,["pattern" Aeson..= arg1]] instance Aeson.FromJSON RelativePattern where - parseJSON = Aeson.withObject "RelativePattern" $ \arg -> RelativePattern <$> arg Aeson..: "baseUri" <*> arg Aeson..: "pattern" \ No newline at end of file + parseJSON = Aeson.withObject "RelativePattern" $ \arg -> RelativePattern <$> arg Aeson..: "baseUri" <*> arg Aeson..: "pattern" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RenameClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RenameClientCapabilities.hs index dd9b7be19..889b266ce 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RenameClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RenameClientCapabilities.hs @@ -57,4 +57,4 @@ instance Aeson.ToJSON RenameClientCapabilities where ,"honorsChangeAnnotations" Language.LSP.Protocol.Types.Common..=? arg3] instance Aeson.FromJSON RenameClientCapabilities where - parseJSON = Aeson.withObject "RenameClientCapabilities" $ \arg -> RenameClientCapabilities <$> arg Aeson..:! "dynamicRegistration" <*> arg Aeson..:! "prepareSupport" <*> arg Aeson..:! "prepareSupportDefaultBehavior" <*> arg Aeson..:! "honorsChangeAnnotations" \ No newline at end of file + parseJSON = Aeson.withObject "RenameClientCapabilities" $ \arg -> RenameClientCapabilities <$> arg Aeson..:! "dynamicRegistration" <*> arg Aeson..:! "prepareSupport" <*> arg Aeson..:! "prepareSupportDefaultBehavior" <*> arg Aeson..:! "honorsChangeAnnotations" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RenameFile.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RenameFile.hs index 161f5a633..bba0897ec 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RenameFile.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RenameFile.hs @@ -53,4 +53,4 @@ instance Aeson.ToJSON RenameFile where ,"options" Language.LSP.Protocol.Types.Common..=? arg4] instance Aeson.FromJSON RenameFile where - parseJSON = Aeson.withObject "RenameFile" $ \arg -> RenameFile <$> arg Aeson..:! "annotationId" <*> arg Aeson..: "kind" <*> arg Aeson..: "oldUri" <*> arg Aeson..: "newUri" <*> arg Aeson..:! "options" \ No newline at end of file + parseJSON = Aeson.withObject "RenameFile" $ \arg -> RenameFile <$> arg Aeson..:! "annotationId" <*> arg Aeson..: "kind" <*> arg Aeson..: "oldUri" <*> arg Aeson..: "newUri" <*> arg Aeson..:! "options" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RenameFileOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RenameFileOptions.hs index e7b339c7e..cd5fe4580 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RenameFileOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RenameFileOptions.hs @@ -32,4 +32,4 @@ instance Aeson.ToJSON RenameFileOptions where ,"ignoreIfExists" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON RenameFileOptions where - parseJSON = Aeson.withObject "RenameFileOptions" $ \arg -> RenameFileOptions <$> arg Aeson..:! "overwrite" <*> arg Aeson..:! "ignoreIfExists" \ No newline at end of file + parseJSON = Aeson.withObject "RenameFileOptions" $ \arg -> RenameFileOptions <$> arg Aeson..:! "overwrite" <*> arg Aeson..:! "ignoreIfExists" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RenameFilesParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RenameFilesParams.hs index 36ec7c175..4a70ef7d7 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RenameFilesParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RenameFilesParams.hs @@ -32,4 +32,4 @@ instance Aeson.ToJSON RenameFilesParams where toJSON (RenameFilesParams arg0) = Aeson.object $ concat $ [["files" Aeson..= arg0]] instance Aeson.FromJSON RenameFilesParams where - parseJSON = Aeson.withObject "RenameFilesParams" $ \arg -> RenameFilesParams <$> arg Aeson..: "files" \ No newline at end of file + parseJSON = Aeson.withObject "RenameFilesParams" $ \arg -> RenameFilesParams <$> arg Aeson..: "files" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RenameOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RenameOptions.hs index be9a9bea2..7fbfef178 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RenameOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RenameOptions.hs @@ -34,4 +34,4 @@ instance Aeson.ToJSON RenameOptions where ,"prepareProvider" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON RenameOptions where - parseJSON = Aeson.withObject "RenameOptions" $ \arg -> RenameOptions <$> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "prepareProvider" \ No newline at end of file + parseJSON = Aeson.withObject "RenameOptions" $ \arg -> RenameOptions <$> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "prepareProvider" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RenameParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RenameParams.hs index 18071ac41..b133b29cf 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RenameParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RenameParams.hs @@ -48,4 +48,4 @@ instance Aeson.ToJSON RenameParams where ,["newName" Aeson..= arg3]] instance Aeson.FromJSON RenameParams where - parseJSON = Aeson.withObject "RenameParams" $ \arg -> RenameParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..: "textDocument" <*> arg Aeson..: "position" <*> arg Aeson..: "newName" \ No newline at end of file + parseJSON = Aeson.withObject "RenameParams" $ \arg -> RenameParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..: "textDocument" <*> arg Aeson..: "position" <*> arg Aeson..: "newName" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RenameRegistrationOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RenameRegistrationOptions.hs index b0e2112f5..4b0977ed0 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RenameRegistrationOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/RenameRegistrationOptions.hs @@ -41,4 +41,4 @@ instance Aeson.ToJSON RenameRegistrationOptions where ,"prepareProvider" Language.LSP.Protocol.Types.Common..=? arg2] instance Aeson.FromJSON RenameRegistrationOptions where - parseJSON = Aeson.withObject "RenameRegistrationOptions" $ \arg -> RenameRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "prepareProvider" \ No newline at end of file + parseJSON = Aeson.withObject "RenameRegistrationOptions" $ \arg -> RenameRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "prepareProvider" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ResourceOperation.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ResourceOperation.hs index f4a2a65de..7adc0d71b 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ResourceOperation.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ResourceOperation.hs @@ -36,4 +36,4 @@ instance Aeson.ToJSON ResourceOperation where ,"annotationId" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON ResourceOperation where - parseJSON = Aeson.withObject "ResourceOperation" $ \arg -> ResourceOperation <$> arg Aeson..: "kind" <*> arg Aeson..:! "annotationId" \ No newline at end of file + parseJSON = Aeson.withObject "ResourceOperation" $ \arg -> ResourceOperation <$> arg Aeson..: "kind" <*> arg Aeson..:! "annotationId" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ResourceOperationKind.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ResourceOperationKind.hs index 60329962b..a4b83bfd5 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ResourceOperationKind.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ResourceOperationKind.hs @@ -48,3 +48,4 @@ instance Language.LSP.Protocol.Types.LspEnum.LspEnum ResourceOperationKind where fromEnumBaseType "delete" = pure ResourceOperationKind_Delete fromEnumBaseType _ = Nothing + diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SaveOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SaveOptions.hs index b655a3fee..662f2d7c5 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SaveOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SaveOptions.hs @@ -27,4 +27,4 @@ instance Aeson.ToJSON SaveOptions where toJSON (SaveOptions arg0) = Aeson.object $ concat $ ["includeText" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON SaveOptions where - parseJSON = Aeson.withObject "SaveOptions" $ \arg -> SaveOptions <$> arg Aeson..:! "includeText" \ No newline at end of file + parseJSON = Aeson.withObject "SaveOptions" $ \arg -> SaveOptions <$> arg Aeson..:! "includeText" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SelectionRange.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SelectionRange.hs index 105202c5e..941d20002 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SelectionRange.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SelectionRange.hs @@ -34,4 +34,4 @@ instance Aeson.ToJSON SelectionRange where ,"parent" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON SelectionRange where - parseJSON = Aeson.withObject "SelectionRange" $ \arg -> SelectionRange <$> arg Aeson..: "range" <*> arg Aeson..:! "parent" \ No newline at end of file + parseJSON = Aeson.withObject "SelectionRange" $ \arg -> SelectionRange <$> arg Aeson..: "range" <*> arg Aeson..:! "parent" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SelectionRangeClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SelectionRangeClientCapabilities.hs index b3f5f614d..58164844a 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SelectionRangeClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SelectionRangeClientCapabilities.hs @@ -29,4 +29,4 @@ instance Aeson.ToJSON SelectionRangeClientCapabilities where toJSON (SelectionRangeClientCapabilities arg0) = Aeson.object $ concat $ ["dynamicRegistration" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON SelectionRangeClientCapabilities where - parseJSON = Aeson.withObject "SelectionRangeClientCapabilities" $ \arg -> SelectionRangeClientCapabilities <$> arg Aeson..:! "dynamicRegistration" \ No newline at end of file + parseJSON = Aeson.withObject "SelectionRangeClientCapabilities" $ \arg -> SelectionRangeClientCapabilities <$> arg Aeson..:! "dynamicRegistration" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SelectionRangeOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SelectionRangeOptions.hs index e48e4e3d1..6d9650f82 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SelectionRangeOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SelectionRangeOptions.hs @@ -27,4 +27,4 @@ instance Aeson.ToJSON SelectionRangeOptions where toJSON (SelectionRangeOptions arg0) = Aeson.object $ concat $ ["workDoneProgress" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON SelectionRangeOptions where - parseJSON = Aeson.withObject "SelectionRangeOptions" $ \arg -> SelectionRangeOptions <$> arg Aeson..:! "workDoneProgress" \ No newline at end of file + parseJSON = Aeson.withObject "SelectionRangeOptions" $ \arg -> SelectionRangeOptions <$> arg Aeson..:! "workDoneProgress" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SelectionRangeParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SelectionRangeParams.hs index 6567f1c33..5b1425c3a 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SelectionRangeParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SelectionRangeParams.hs @@ -46,4 +46,4 @@ instance Aeson.ToJSON SelectionRangeParams where ,["positions" Aeson..= arg3]] instance Aeson.FromJSON SelectionRangeParams where - parseJSON = Aeson.withObject "SelectionRangeParams" $ \arg -> SelectionRangeParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" <*> arg Aeson..: "textDocument" <*> arg Aeson..: "positions" \ No newline at end of file + parseJSON = Aeson.withObject "SelectionRangeParams" $ \arg -> SelectionRangeParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" <*> arg Aeson..: "textDocument" <*> arg Aeson..: "positions" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SelectionRangeRegistrationOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SelectionRangeRegistrationOptions.hs index 2640d10b1..0a50ae2ac 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SelectionRangeRegistrationOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SelectionRangeRegistrationOptions.hs @@ -41,4 +41,4 @@ instance Aeson.ToJSON SelectionRangeRegistrationOptions where ,"id" Language.LSP.Protocol.Types.Common..=? arg2] instance Aeson.FromJSON SelectionRangeRegistrationOptions where - parseJSON = Aeson.withObject "SelectionRangeRegistrationOptions" $ \arg -> SelectionRangeRegistrationOptions <$> arg Aeson..:! "workDoneProgress" <*> arg Aeson..: "documentSelector" <*> arg Aeson..:! "id" \ No newline at end of file + parseJSON = Aeson.withObject "SelectionRangeRegistrationOptions" $ \arg -> SelectionRangeRegistrationOptions <$> arg Aeson..:! "workDoneProgress" <*> arg Aeson..: "documentSelector" <*> arg Aeson..:! "id" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokenModifiers.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokenModifiers.hs index 480c88a6f..9d354fcff 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokenModifiers.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokenModifiers.hs @@ -106,3 +106,4 @@ instance Language.LSP.Protocol.Types.LspEnum.LspOpenEnum SemanticTokenModifiers fromOpenEnumBaseType "defaultLibrary" = SemanticTokenModifiers_DefaultLibrary fromOpenEnumBaseType arg = SemanticTokenModifiers_Custom arg + diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokenTypes.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokenTypes.hs index 31f321f46..a849318d0 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokenTypes.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokenTypes.hs @@ -198,3 +198,4 @@ instance Language.LSP.Protocol.Types.LspEnum.LspOpenEnum SemanticTokenTypes wher fromOpenEnumBaseType "decorator" = SemanticTokenTypes_Decorator fromOpenEnumBaseType arg = SemanticTokenTypes_Custom arg + diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokens.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokens.hs index e90cbf734..2293bb991 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokens.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokens.hs @@ -36,4 +36,4 @@ instance Aeson.ToJSON SemanticTokens where ,["data" Aeson..= arg1]] instance Aeson.FromJSON SemanticTokens where - parseJSON = Aeson.withObject "SemanticTokens" $ \arg -> SemanticTokens <$> arg Aeson..:! "resultId" <*> arg Aeson..: "data" \ No newline at end of file + parseJSON = Aeson.withObject "SemanticTokens" $ \arg -> SemanticTokens <$> arg Aeson..:! "resultId" <*> arg Aeson..: "data" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensClientCapabilities.hs index 1265453a4..f372b7e96 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensClientCapabilities.hs @@ -93,4 +93,4 @@ instance Aeson.ToJSON SemanticTokensClientCapabilities where ,"augmentsSyntaxTokens" Language.LSP.Protocol.Types.Common..=? arg8] instance Aeson.FromJSON SemanticTokensClientCapabilities where - parseJSON = Aeson.withObject "SemanticTokensClientCapabilities" $ \arg -> SemanticTokensClientCapabilities <$> arg Aeson..:! "dynamicRegistration" <*> arg Aeson..: "requests" <*> arg Aeson..: "tokenTypes" <*> arg Aeson..: "tokenModifiers" <*> arg Aeson..: "formats" <*> arg Aeson..:! "overlappingTokenSupport" <*> arg Aeson..:! "multilineTokenSupport" <*> arg Aeson..:! "serverCancelSupport" <*> arg Aeson..:! "augmentsSyntaxTokens" \ No newline at end of file + parseJSON = Aeson.withObject "SemanticTokensClientCapabilities" $ \arg -> SemanticTokensClientCapabilities <$> arg Aeson..:! "dynamicRegistration" <*> arg Aeson..: "requests" <*> arg Aeson..: "tokenTypes" <*> arg Aeson..: "tokenModifiers" <*> arg Aeson..: "formats" <*> arg Aeson..:! "overlappingTokenSupport" <*> arg Aeson..:! "multilineTokenSupport" <*> arg Aeson..:! "serverCancelSupport" <*> arg Aeson..:! "augmentsSyntaxTokens" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensDelta.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensDelta.hs index c9bf85f88..b6995af93 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensDelta.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensDelta.hs @@ -34,4 +34,4 @@ instance Aeson.ToJSON SemanticTokensDelta where ,["edits" Aeson..= arg1]] instance Aeson.FromJSON SemanticTokensDelta where - parseJSON = Aeson.withObject "SemanticTokensDelta" $ \arg -> SemanticTokensDelta <$> arg Aeson..:! "resultId" <*> arg Aeson..: "edits" \ No newline at end of file + parseJSON = Aeson.withObject "SemanticTokensDelta" $ \arg -> SemanticTokensDelta <$> arg Aeson..:! "resultId" <*> arg Aeson..: "edits" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensDeltaParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensDeltaParams.hs index 8e0346166..204485165 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensDeltaParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensDeltaParams.hs @@ -47,4 +47,4 @@ instance Aeson.ToJSON SemanticTokensDeltaParams where ,["previousResultId" Aeson..= arg3]] instance Aeson.FromJSON SemanticTokensDeltaParams where - parseJSON = Aeson.withObject "SemanticTokensDeltaParams" $ \arg -> SemanticTokensDeltaParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" <*> arg Aeson..: "textDocument" <*> arg Aeson..: "previousResultId" \ No newline at end of file + parseJSON = Aeson.withObject "SemanticTokensDeltaParams" $ \arg -> SemanticTokensDeltaParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" <*> arg Aeson..: "textDocument" <*> arg Aeson..: "previousResultId" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensDeltaPartialResult.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensDeltaPartialResult.hs index b80d694e5..244dd896c 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensDeltaPartialResult.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensDeltaPartialResult.hs @@ -28,4 +28,4 @@ instance Aeson.ToJSON SemanticTokensDeltaPartialResult where toJSON (SemanticTokensDeltaPartialResult arg0) = Aeson.object $ concat $ [["edits" Aeson..= arg0]] instance Aeson.FromJSON SemanticTokensDeltaPartialResult where - parseJSON = Aeson.withObject "SemanticTokensDeltaPartialResult" $ \arg -> SemanticTokensDeltaPartialResult <$> arg Aeson..: "edits" \ No newline at end of file + parseJSON = Aeson.withObject "SemanticTokensDeltaPartialResult" $ \arg -> SemanticTokensDeltaPartialResult <$> arg Aeson..: "edits" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensEdit.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensEdit.hs index 482132be5..0b532929d 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensEdit.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensEdit.hs @@ -37,4 +37,4 @@ instance Aeson.ToJSON SemanticTokensEdit where ,"data" Language.LSP.Protocol.Types.Common..=? arg2] instance Aeson.FromJSON SemanticTokensEdit where - parseJSON = Aeson.withObject "SemanticTokensEdit" $ \arg -> SemanticTokensEdit <$> arg Aeson..: "start" <*> arg Aeson..: "deleteCount" <*> arg Aeson..:! "data" \ No newline at end of file + parseJSON = Aeson.withObject "SemanticTokensEdit" $ \arg -> SemanticTokensEdit <$> arg Aeson..: "start" <*> arg Aeson..: "deleteCount" <*> arg Aeson..:! "data" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensLegend.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensLegend.hs index 98d166022..3411c4441 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensLegend.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensLegend.hs @@ -33,4 +33,4 @@ instance Aeson.ToJSON SemanticTokensLegend where ,["tokenModifiers" Aeson..= arg1]] instance Aeson.FromJSON SemanticTokensLegend where - parseJSON = Aeson.withObject "SemanticTokensLegend" $ \arg -> SemanticTokensLegend <$> arg Aeson..: "tokenTypes" <*> arg Aeson..: "tokenModifiers" \ No newline at end of file + parseJSON = Aeson.withObject "SemanticTokensLegend" $ \arg -> SemanticTokensLegend <$> arg Aeson..: "tokenTypes" <*> arg Aeson..: "tokenModifiers" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensOptions.hs index 985f3e336..4d20046af 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensOptions.hs @@ -45,4 +45,4 @@ instance Aeson.ToJSON SemanticTokensOptions where ,"full" Language.LSP.Protocol.Types.Common..=? arg3] instance Aeson.FromJSON SemanticTokensOptions where - parseJSON = Aeson.withObject "SemanticTokensOptions" $ \arg -> SemanticTokensOptions <$> arg Aeson..:! "workDoneProgress" <*> arg Aeson..: "legend" <*> arg Aeson..:! "range" <*> arg Aeson..:! "full" \ No newline at end of file + parseJSON = Aeson.withObject "SemanticTokensOptions" $ \arg -> SemanticTokensOptions <$> arg Aeson..:! "workDoneProgress" <*> arg Aeson..: "legend" <*> arg Aeson..:! "range" <*> arg Aeson..:! "full" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensParams.hs index 4a2209da0..53936bfa7 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensParams.hs @@ -40,4 +40,4 @@ instance Aeson.ToJSON SemanticTokensParams where ,["textDocument" Aeson..= arg2]] instance Aeson.FromJSON SemanticTokensParams where - parseJSON = Aeson.withObject "SemanticTokensParams" $ \arg -> SemanticTokensParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" <*> arg Aeson..: "textDocument" \ No newline at end of file + parseJSON = Aeson.withObject "SemanticTokensParams" $ \arg -> SemanticTokensParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" <*> arg Aeson..: "textDocument" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensPartialResult.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensPartialResult.hs index c7da94ce3..0f29591a4 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensPartialResult.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensPartialResult.hs @@ -27,4 +27,4 @@ instance Aeson.ToJSON SemanticTokensPartialResult where toJSON (SemanticTokensPartialResult arg0) = Aeson.object $ concat $ [["data" Aeson..= arg0]] instance Aeson.FromJSON SemanticTokensPartialResult where - parseJSON = Aeson.withObject "SemanticTokensPartialResult" $ \arg -> SemanticTokensPartialResult <$> arg Aeson..: "data" \ No newline at end of file + parseJSON = Aeson.withObject "SemanticTokensPartialResult" $ \arg -> SemanticTokensPartialResult <$> arg Aeson..: "data" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensRangeParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensRangeParams.hs index 873522672..dcef49dd7 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensRangeParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensRangeParams.hs @@ -46,4 +46,4 @@ instance Aeson.ToJSON SemanticTokensRangeParams where ,["range" Aeson..= arg3]] instance Aeson.FromJSON SemanticTokensRangeParams where - parseJSON = Aeson.withObject "SemanticTokensRangeParams" $ \arg -> SemanticTokensRangeParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" <*> arg Aeson..: "textDocument" <*> arg Aeson..: "range" \ No newline at end of file + parseJSON = Aeson.withObject "SemanticTokensRangeParams" $ \arg -> SemanticTokensRangeParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" <*> arg Aeson..: "textDocument" <*> arg Aeson..: "range" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensRegistrationOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensRegistrationOptions.hs index 8ac7f9edc..13c9e69a2 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensRegistrationOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensRegistrationOptions.hs @@ -59,4 +59,4 @@ instance Aeson.ToJSON SemanticTokensRegistrationOptions where ,"id" Language.LSP.Protocol.Types.Common..=? arg5] instance Aeson.FromJSON SemanticTokensRegistrationOptions where - parseJSON = Aeson.withObject "SemanticTokensRegistrationOptions" $ \arg -> SemanticTokensRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" <*> arg Aeson..: "legend" <*> arg Aeson..:! "range" <*> arg Aeson..:! "full" <*> arg Aeson..:! "id" \ No newline at end of file + parseJSON = Aeson.withObject "SemanticTokensRegistrationOptions" $ \arg -> SemanticTokensRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" <*> arg Aeson..: "legend" <*> arg Aeson..:! "range" <*> arg Aeson..:! "full" <*> arg Aeson..:! "id" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensWorkspaceClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensWorkspaceClientCapabilities.hs index 17905652e..1a65cae92 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensWorkspaceClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SemanticTokensWorkspaceClientCapabilities.hs @@ -33,4 +33,4 @@ instance Aeson.ToJSON SemanticTokensWorkspaceClientCapabilities where toJSON (SemanticTokensWorkspaceClientCapabilities arg0) = Aeson.object $ concat $ ["refreshSupport" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON SemanticTokensWorkspaceClientCapabilities where - parseJSON = Aeson.withObject "SemanticTokensWorkspaceClientCapabilities" $ \arg -> SemanticTokensWorkspaceClientCapabilities <$> arg Aeson..:! "refreshSupport" \ No newline at end of file + parseJSON = Aeson.withObject "SemanticTokensWorkspaceClientCapabilities" $ \arg -> SemanticTokensWorkspaceClientCapabilities <$> arg Aeson..:! "refreshSupport" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ServerCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ServerCapabilities.hs index 57931e608..16cb70412 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ServerCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ServerCapabilities.hs @@ -283,4 +283,4 @@ instance Aeson.ToJSON ServerCapabilities where ,"experimental" Language.LSP.Protocol.Types.Common..=? arg34] instance Aeson.FromJSON ServerCapabilities where - parseJSON = Aeson.withObject "ServerCapabilities" $ \arg -> ServerCapabilities <$> arg Aeson..:! "positionEncoding" <*> arg Aeson..:! "textDocumentSync" <*> arg Aeson..:! "notebookDocumentSync" <*> arg Aeson..:! "completionProvider" <*> arg Aeson..:! "hoverProvider" <*> arg Aeson..:! "signatureHelpProvider" <*> arg Aeson..:! "declarationProvider" <*> arg Aeson..:! "definitionProvider" <*> arg Aeson..:! "typeDefinitionProvider" <*> arg Aeson..:! "implementationProvider" <*> arg Aeson..:! "referencesProvider" <*> arg Aeson..:! "documentHighlightProvider" <*> arg Aeson..:! "documentSymbolProvider" <*> arg Aeson..:! "codeActionProvider" <*> arg Aeson..:! "codeLensProvider" <*> arg Aeson..:! "documentLinkProvider" <*> arg Aeson..:! "colorProvider" <*> arg Aeson..:! "workspaceSymbolProvider" <*> arg Aeson..:! "documentFormattingProvider" <*> arg Aeson..:! "documentRangeFormattingProvider" <*> arg Aeson..:! "documentOnTypeFormattingProvider" <*> arg Aeson..:! "renameProvider" <*> arg Aeson..:! "foldingRangeProvider" <*> arg Aeson..:! "selectionRangeProvider" <*> arg Aeson..:! "executeCommandProvider" <*> arg Aeson..:! "callHierarchyProvider" <*> arg Aeson..:! "linkedEditingRangeProvider" <*> arg Aeson..:! "semanticTokensProvider" <*> arg Aeson..:! "monikerProvider" <*> arg Aeson..:! "typeHierarchyProvider" <*> arg Aeson..:! "inlineValueProvider" <*> arg Aeson..:! "inlayHintProvider" <*> arg Aeson..:! "diagnosticProvider" <*> arg Aeson..:! "workspace" <*> arg Aeson..:! "experimental" \ No newline at end of file + parseJSON = Aeson.withObject "ServerCapabilities" $ \arg -> ServerCapabilities <$> arg Aeson..:! "positionEncoding" <*> arg Aeson..:! "textDocumentSync" <*> arg Aeson..:! "notebookDocumentSync" <*> arg Aeson..:! "completionProvider" <*> arg Aeson..:! "hoverProvider" <*> arg Aeson..:! "signatureHelpProvider" <*> arg Aeson..:! "declarationProvider" <*> arg Aeson..:! "definitionProvider" <*> arg Aeson..:! "typeDefinitionProvider" <*> arg Aeson..:! "implementationProvider" <*> arg Aeson..:! "referencesProvider" <*> arg Aeson..:! "documentHighlightProvider" <*> arg Aeson..:! "documentSymbolProvider" <*> arg Aeson..:! "codeActionProvider" <*> arg Aeson..:! "codeLensProvider" <*> arg Aeson..:! "documentLinkProvider" <*> arg Aeson..:! "colorProvider" <*> arg Aeson..:! "workspaceSymbolProvider" <*> arg Aeson..:! "documentFormattingProvider" <*> arg Aeson..:! "documentRangeFormattingProvider" <*> arg Aeson..:! "documentOnTypeFormattingProvider" <*> arg Aeson..:! "renameProvider" <*> arg Aeson..:! "foldingRangeProvider" <*> arg Aeson..:! "selectionRangeProvider" <*> arg Aeson..:! "executeCommandProvider" <*> arg Aeson..:! "callHierarchyProvider" <*> arg Aeson..:! "linkedEditingRangeProvider" <*> arg Aeson..:! "semanticTokensProvider" <*> arg Aeson..:! "monikerProvider" <*> arg Aeson..:! "typeHierarchyProvider" <*> arg Aeson..:! "inlineValueProvider" <*> arg Aeson..:! "inlayHintProvider" <*> arg Aeson..:! "diagnosticProvider" <*> arg Aeson..:! "workspace" <*> arg Aeson..:! "experimental" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SetTraceParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SetTraceParams.hs index b3168256c..d07c0976c 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SetTraceParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SetTraceParams.hs @@ -28,4 +28,4 @@ instance Aeson.ToJSON SetTraceParams where toJSON (SetTraceParams arg0) = Aeson.object $ concat $ [["value" Aeson..= arg0]] instance Aeson.FromJSON SetTraceParams where - parseJSON = Aeson.withObject "SetTraceParams" $ \arg -> SetTraceParams <$> arg Aeson..: "value" \ No newline at end of file + parseJSON = Aeson.withObject "SetTraceParams" $ \arg -> SetTraceParams <$> arg Aeson..: "value" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ShowDocumentClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ShowDocumentClientCapabilities.hs index 0fac2fce0..a3f8ef9a2 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ShowDocumentClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ShowDocumentClientCapabilities.hs @@ -30,4 +30,4 @@ instance Aeson.ToJSON ShowDocumentClientCapabilities where toJSON (ShowDocumentClientCapabilities arg0) = Aeson.object $ concat $ [["support" Aeson..= arg0]] instance Aeson.FromJSON ShowDocumentClientCapabilities where - parseJSON = Aeson.withObject "ShowDocumentClientCapabilities" $ \arg -> ShowDocumentClientCapabilities <$> arg Aeson..: "support" \ No newline at end of file + parseJSON = Aeson.withObject "ShowDocumentClientCapabilities" $ \arg -> ShowDocumentClientCapabilities <$> arg Aeson..: "support" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ShowDocumentParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ShowDocumentParams.hs index 4425a95d2..781718904 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ShowDocumentParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ShowDocumentParams.hs @@ -54,4 +54,4 @@ instance Aeson.ToJSON ShowDocumentParams where ,"selection" Language.LSP.Protocol.Types.Common..=? arg3] instance Aeson.FromJSON ShowDocumentParams where - parseJSON = Aeson.withObject "ShowDocumentParams" $ \arg -> ShowDocumentParams <$> arg Aeson..: "uri" <*> arg Aeson..:! "external" <*> arg Aeson..:! "takeFocus" <*> arg Aeson..:! "selection" \ No newline at end of file + parseJSON = Aeson.withObject "ShowDocumentParams" $ \arg -> ShowDocumentParams <$> arg Aeson..: "uri" <*> arg Aeson..:! "external" <*> arg Aeson..:! "takeFocus" <*> arg Aeson..:! "selection" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ShowDocumentResult.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ShowDocumentResult.hs index b79d2129c..a128a7fbd 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ShowDocumentResult.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ShowDocumentResult.hs @@ -29,4 +29,4 @@ instance Aeson.ToJSON ShowDocumentResult where toJSON (ShowDocumentResult arg0) = Aeson.object $ concat $ [["success" Aeson..= arg0]] instance Aeson.FromJSON ShowDocumentResult where - parseJSON = Aeson.withObject "ShowDocumentResult" $ \arg -> ShowDocumentResult <$> arg Aeson..: "success" \ No newline at end of file + parseJSON = Aeson.withObject "ShowDocumentResult" $ \arg -> ShowDocumentResult <$> arg Aeson..: "success" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ShowMessageParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ShowMessageParams.hs index 2a047c0c8..f1615c356 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ShowMessageParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ShowMessageParams.hs @@ -34,4 +34,4 @@ instance Aeson.ToJSON ShowMessageParams where ,["message" Aeson..= arg1]] instance Aeson.FromJSON ShowMessageParams where - parseJSON = Aeson.withObject "ShowMessageParams" $ \arg -> ShowMessageParams <$> arg Aeson..: "type" <*> arg Aeson..: "message" \ No newline at end of file + parseJSON = Aeson.withObject "ShowMessageParams" $ \arg -> ShowMessageParams <$> arg Aeson..: "type" <*> arg Aeson..: "message" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ShowMessageRequestClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ShowMessageRequestClientCapabilities.hs index a158e393a..988a90b0f 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ShowMessageRequestClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ShowMessageRequestClientCapabilities.hs @@ -28,4 +28,4 @@ instance Aeson.ToJSON ShowMessageRequestClientCapabilities where toJSON (ShowMessageRequestClientCapabilities arg0) = Aeson.object $ concat $ ["messageActionItem" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON ShowMessageRequestClientCapabilities where - parseJSON = Aeson.withObject "ShowMessageRequestClientCapabilities" $ \arg -> ShowMessageRequestClientCapabilities <$> arg Aeson..:! "messageActionItem" \ No newline at end of file + parseJSON = Aeson.withObject "ShowMessageRequestClientCapabilities" $ \arg -> ShowMessageRequestClientCapabilities <$> arg Aeson..:! "messageActionItem" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ShowMessageRequestParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ShowMessageRequestParams.hs index 95d16fb00..60acec280 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ShowMessageRequestParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/ShowMessageRequestParams.hs @@ -40,4 +40,4 @@ instance Aeson.ToJSON ShowMessageRequestParams where ,"actions" Language.LSP.Protocol.Types.Common..=? arg2] instance Aeson.FromJSON ShowMessageRequestParams where - parseJSON = Aeson.withObject "ShowMessageRequestParams" $ \arg -> ShowMessageRequestParams <$> arg Aeson..: "type" <*> arg Aeson..: "message" <*> arg Aeson..:! "actions" \ No newline at end of file + parseJSON = Aeson.withObject "ShowMessageRequestParams" $ \arg -> ShowMessageRequestParams <$> arg Aeson..: "type" <*> arg Aeson..: "message" <*> arg Aeson..:! "actions" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SignatureHelp.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SignatureHelp.hs index b0ad04b0d..ab3da9012 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SignatureHelp.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SignatureHelp.hs @@ -54,4 +54,4 @@ instance Aeson.ToJSON SignatureHelp where ,"activeParameter" Language.LSP.Protocol.Types.Common..=? arg2] instance Aeson.FromJSON SignatureHelp where - parseJSON = Aeson.withObject "SignatureHelp" $ \arg -> SignatureHelp <$> arg Aeson..: "signatures" <*> arg Aeson..:! "activeSignature" <*> arg Aeson..:! "activeParameter" \ No newline at end of file + parseJSON = Aeson.withObject "SignatureHelp" $ \arg -> SignatureHelp <$> arg Aeson..: "signatures" <*> arg Aeson..:! "activeSignature" <*> arg Aeson..:! "activeParameter" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SignatureHelpClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SignatureHelpClientCapabilities.hs index e035732ec..0b69215d0 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SignatureHelpClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SignatureHelpClientCapabilities.hs @@ -45,4 +45,4 @@ instance Aeson.ToJSON SignatureHelpClientCapabilities where ,"contextSupport" Language.LSP.Protocol.Types.Common..=? arg2] instance Aeson.FromJSON SignatureHelpClientCapabilities where - parseJSON = Aeson.withObject "SignatureHelpClientCapabilities" $ \arg -> SignatureHelpClientCapabilities <$> arg Aeson..:! "dynamicRegistration" <*> arg Aeson..:! "signatureInformation" <*> arg Aeson..:! "contextSupport" \ No newline at end of file + parseJSON = Aeson.withObject "SignatureHelpClientCapabilities" $ \arg -> SignatureHelpClientCapabilities <$> arg Aeson..:! "dynamicRegistration" <*> arg Aeson..:! "signatureInformation" <*> arg Aeson..:! "contextSupport" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SignatureHelpContext.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SignatureHelpContext.hs index 53cb314e1..a1c4eb03d 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SignatureHelpContext.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SignatureHelpContext.hs @@ -55,4 +55,4 @@ instance Aeson.ToJSON SignatureHelpContext where ,"activeSignatureHelp" Language.LSP.Protocol.Types.Common..=? arg3] instance Aeson.FromJSON SignatureHelpContext where - parseJSON = Aeson.withObject "SignatureHelpContext" $ \arg -> SignatureHelpContext <$> arg Aeson..: "triggerKind" <*> arg Aeson..:! "triggerCharacter" <*> arg Aeson..: "isRetrigger" <*> arg Aeson..:! "activeSignatureHelp" \ No newline at end of file + parseJSON = Aeson.withObject "SignatureHelpContext" $ \arg -> SignatureHelpContext <$> arg Aeson..: "triggerKind" <*> arg Aeson..:! "triggerCharacter" <*> arg Aeson..: "isRetrigger" <*> arg Aeson..:! "activeSignatureHelp" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SignatureHelpOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SignatureHelpOptions.hs index f6200028c..00c01a207 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SignatureHelpOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SignatureHelpOptions.hs @@ -43,4 +43,4 @@ instance Aeson.ToJSON SignatureHelpOptions where ,"retriggerCharacters" Language.LSP.Protocol.Types.Common..=? arg2] instance Aeson.FromJSON SignatureHelpOptions where - parseJSON = Aeson.withObject "SignatureHelpOptions" $ \arg -> SignatureHelpOptions <$> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "triggerCharacters" <*> arg Aeson..:! "retriggerCharacters" \ No newline at end of file + parseJSON = Aeson.withObject "SignatureHelpOptions" $ \arg -> SignatureHelpOptions <$> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "triggerCharacters" <*> arg Aeson..:! "retriggerCharacters" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SignatureHelpParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SignatureHelpParams.hs index b14d5e576..2a691fc37 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SignatureHelpParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SignatureHelpParams.hs @@ -49,4 +49,4 @@ instance Aeson.ToJSON SignatureHelpParams where ,"context" Language.LSP.Protocol.Types.Common..=? arg3] instance Aeson.FromJSON SignatureHelpParams where - parseJSON = Aeson.withObject "SignatureHelpParams" $ \arg -> SignatureHelpParams <$> arg Aeson..: "textDocument" <*> arg Aeson..: "position" <*> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "context" \ No newline at end of file + parseJSON = Aeson.withObject "SignatureHelpParams" $ \arg -> SignatureHelpParams <$> arg Aeson..: "textDocument" <*> arg Aeson..: "position" <*> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "context" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SignatureHelpRegistrationOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SignatureHelpRegistrationOptions.hs index b4b300efa..4fa920343 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SignatureHelpRegistrationOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SignatureHelpRegistrationOptions.hs @@ -50,4 +50,4 @@ instance Aeson.ToJSON SignatureHelpRegistrationOptions where ,"retriggerCharacters" Language.LSP.Protocol.Types.Common..=? arg3] instance Aeson.FromJSON SignatureHelpRegistrationOptions where - parseJSON = Aeson.withObject "SignatureHelpRegistrationOptions" $ \arg -> SignatureHelpRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "triggerCharacters" <*> arg Aeson..:! "retriggerCharacters" \ No newline at end of file + parseJSON = Aeson.withObject "SignatureHelpRegistrationOptions" $ \arg -> SignatureHelpRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "triggerCharacters" <*> arg Aeson..:! "retriggerCharacters" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SignatureHelpTriggerKind.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SignatureHelpTriggerKind.hs index 83a794ca9..fb3e5121e 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SignatureHelpTriggerKind.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SignatureHelpTriggerKind.hs @@ -50,3 +50,4 @@ instance Language.LSP.Protocol.Types.LspEnum.LspEnum SignatureHelpTriggerKind wh fromEnumBaseType 3 = pure SignatureHelpTriggerKind_ContentChange fromEnumBaseType _ = Nothing + diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SignatureInformation.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SignatureInformation.hs index f37f31299..9a123de10 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SignatureInformation.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SignatureInformation.hs @@ -53,4 +53,4 @@ instance Aeson.ToJSON SignatureInformation where ,"activeParameter" Language.LSP.Protocol.Types.Common..=? arg3] instance Aeson.FromJSON SignatureInformation where - parseJSON = Aeson.withObject "SignatureInformation" $ \arg -> SignatureInformation <$> arg Aeson..: "label" <*> arg Aeson..:! "documentation" <*> arg Aeson..:! "parameters" <*> arg Aeson..:! "activeParameter" \ No newline at end of file + parseJSON = Aeson.withObject "SignatureInformation" $ \arg -> SignatureInformation <$> arg Aeson..: "label" <*> arg Aeson..:! "documentation" <*> arg Aeson..:! "parameters" <*> arg Aeson..:! "activeParameter" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/StaticRegistrationOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/StaticRegistrationOptions.hs index 4fff21abd..4a956d6c2 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/StaticRegistrationOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/StaticRegistrationOptions.hs @@ -30,4 +30,4 @@ instance Aeson.ToJSON StaticRegistrationOptions where toJSON (StaticRegistrationOptions arg0) = Aeson.object $ concat $ ["id" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON StaticRegistrationOptions where - parseJSON = Aeson.withObject "StaticRegistrationOptions" $ \arg -> StaticRegistrationOptions <$> arg Aeson..:! "id" \ No newline at end of file + parseJSON = Aeson.withObject "StaticRegistrationOptions" $ \arg -> StaticRegistrationOptions <$> arg Aeson..:! "id" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SymbolInformation.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SymbolInformation.hs index 4d67d68d7..8a84247fb 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SymbolInformation.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SymbolInformation.hs @@ -73,4 +73,4 @@ instance Aeson.ToJSON SymbolInformation where ,["location" Aeson..= arg5]] instance Aeson.FromJSON SymbolInformation where - parseJSON = Aeson.withObject "SymbolInformation" $ \arg -> SymbolInformation <$> arg Aeson..: "name" <*> arg Aeson..: "kind" <*> arg Aeson..:! "tags" <*> arg Aeson..:! "containerName" <*> arg Aeson..:! "deprecated" <*> arg Aeson..: "location" \ No newline at end of file + parseJSON = Aeson.withObject "SymbolInformation" $ \arg -> SymbolInformation <$> arg Aeson..: "name" <*> arg Aeson..: "kind" <*> arg Aeson..:! "tags" <*> arg Aeson..:! "containerName" <*> arg Aeson..:! "deprecated" <*> arg Aeson..: "location" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SymbolKind.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SymbolKind.hs index 4b9bb9fd2..6518bc62c 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SymbolKind.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SymbolKind.hs @@ -209,3 +209,4 @@ instance Language.LSP.Protocol.Types.LspEnum.LspEnum SymbolKind where fromEnumBaseType 26 = pure SymbolKind_TypeParameter fromEnumBaseType _ = Nothing + diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SymbolTag.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SymbolTag.hs index 929a1ccae..9b1737a00 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SymbolTag.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/SymbolTag.hs @@ -36,3 +36,4 @@ instance Language.LSP.Protocol.Types.LspEnum.LspEnum SymbolTag where fromEnumBaseType 1 = pure SymbolTag_Deprecated fromEnumBaseType _ = Nothing + diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentChangeRegistrationOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentChangeRegistrationOptions.hs index 664f2ba53..e8c6f486e 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentChangeRegistrationOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentChangeRegistrationOptions.hs @@ -35,4 +35,4 @@ instance Aeson.ToJSON TextDocumentChangeRegistrationOptions where ,["syncKind" Aeson..= arg1]] instance Aeson.FromJSON TextDocumentChangeRegistrationOptions where - parseJSON = Aeson.withObject "TextDocumentChangeRegistrationOptions" $ \arg -> TextDocumentChangeRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..: "syncKind" \ No newline at end of file + parseJSON = Aeson.withObject "TextDocumentChangeRegistrationOptions" $ \arg -> TextDocumentChangeRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..: "syncKind" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentClientCapabilities.hs index 3f0f13efa..76c27e14b 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentClientCapabilities.hs @@ -231,4 +231,4 @@ instance Aeson.ToJSON TextDocumentClientCapabilities where ,"diagnostic" Language.LSP.Protocol.Types.Common..=? arg29] instance Aeson.FromJSON TextDocumentClientCapabilities where - parseJSON = Aeson.withObject "TextDocumentClientCapabilities" $ \arg -> TextDocumentClientCapabilities <$> arg Aeson..:! "synchronization" <*> arg Aeson..:! "completion" <*> arg Aeson..:! "hover" <*> arg Aeson..:! "signatureHelp" <*> arg Aeson..:! "declaration" <*> arg Aeson..:! "definition" <*> arg Aeson..:! "typeDefinition" <*> arg Aeson..:! "implementation" <*> arg Aeson..:! "references" <*> arg Aeson..:! "documentHighlight" <*> arg Aeson..:! "documentSymbol" <*> arg Aeson..:! "codeAction" <*> arg Aeson..:! "codeLens" <*> arg Aeson..:! "documentLink" <*> arg Aeson..:! "colorProvider" <*> arg Aeson..:! "formatting" <*> arg Aeson..:! "rangeFormatting" <*> arg Aeson..:! "onTypeFormatting" <*> arg Aeson..:! "rename" <*> arg Aeson..:! "foldingRange" <*> arg Aeson..:! "selectionRange" <*> arg Aeson..:! "publishDiagnostics" <*> arg Aeson..:! "callHierarchy" <*> arg Aeson..:! "semanticTokens" <*> arg Aeson..:! "linkedEditingRange" <*> arg Aeson..:! "moniker" <*> arg Aeson..:! "typeHierarchy" <*> arg Aeson..:! "inlineValue" <*> arg Aeson..:! "inlayHint" <*> arg Aeson..:! "diagnostic" \ No newline at end of file + parseJSON = Aeson.withObject "TextDocumentClientCapabilities" $ \arg -> TextDocumentClientCapabilities <$> arg Aeson..:! "synchronization" <*> arg Aeson..:! "completion" <*> arg Aeson..:! "hover" <*> arg Aeson..:! "signatureHelp" <*> arg Aeson..:! "declaration" <*> arg Aeson..:! "definition" <*> arg Aeson..:! "typeDefinition" <*> arg Aeson..:! "implementation" <*> arg Aeson..:! "references" <*> arg Aeson..:! "documentHighlight" <*> arg Aeson..:! "documentSymbol" <*> arg Aeson..:! "codeAction" <*> arg Aeson..:! "codeLens" <*> arg Aeson..:! "documentLink" <*> arg Aeson..:! "colorProvider" <*> arg Aeson..:! "formatting" <*> arg Aeson..:! "rangeFormatting" <*> arg Aeson..:! "onTypeFormatting" <*> arg Aeson..:! "rename" <*> arg Aeson..:! "foldingRange" <*> arg Aeson..:! "selectionRange" <*> arg Aeson..:! "publishDiagnostics" <*> arg Aeson..:! "callHierarchy" <*> arg Aeson..:! "semanticTokens" <*> arg Aeson..:! "linkedEditingRange" <*> arg Aeson..:! "moniker" <*> arg Aeson..:! "typeHierarchy" <*> arg Aeson..:! "inlineValue" <*> arg Aeson..:! "inlayHint" <*> arg Aeson..:! "diagnostic" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentContentChangeEvent.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentContentChangeEvent.hs index 26dfdb816..d5206e31c 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentContentChangeEvent.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentContentChangeEvent.hs @@ -21,4 +21,4 @@ it is considered to be the full content of the document. newtype TextDocumentContentChangeEvent = TextDocumentContentChangeEvent ((Row.Rec ("range" Row..== Language.LSP.Protocol.Internal.Types.Range.Range Row..+ ("rangeLength" Row..== (Maybe Language.LSP.Protocol.Types.Common.UInt) Row..+ ("text" Row..== Data.Text.Text Row..+ Row.Empty)))) Language.LSP.Protocol.Types.Common.|? (Row.Rec ("text" Row..== Data.Text.Text Row..+ Row.Empty))) deriving newtype (Aeson.ToJSON, Aeson.FromJSON) deriving stock (Show, Eq, Ord, Generic) - deriving anyclass (NFData) \ No newline at end of file + deriving anyclass (NFData) diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentEdit.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentEdit.hs index 185eb8645..3ef1ed5c7 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentEdit.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentEdit.hs @@ -41,4 +41,4 @@ instance Aeson.ToJSON TextDocumentEdit where ,["edits" Aeson..= arg1]] instance Aeson.FromJSON TextDocumentEdit where - parseJSON = Aeson.withObject "TextDocumentEdit" $ \arg -> TextDocumentEdit <$> arg Aeson..: "textDocument" <*> arg Aeson..: "edits" \ No newline at end of file + parseJSON = Aeson.withObject "TextDocumentEdit" $ \arg -> TextDocumentEdit <$> arg Aeson..: "textDocument" <*> arg Aeson..: "edits" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentFilter.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentFilter.hs index 2a7779dd7..ed9fdfc88 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentFilter.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentFilter.hs @@ -34,4 +34,4 @@ Glob patterns can have the following syntax: newtype TextDocumentFilter = TextDocumentFilter ((Row.Rec ("language" Row..== Data.Text.Text Row..+ ("scheme" Row..== (Maybe Data.Text.Text) Row..+ ("pattern" Row..== (Maybe Data.Text.Text) Row..+ Row.Empty)))) Language.LSP.Protocol.Types.Common.|? ((Row.Rec ("language" Row..== (Maybe Data.Text.Text) Row..+ ("scheme" Row..== Data.Text.Text Row..+ ("pattern" Row..== (Maybe Data.Text.Text) Row..+ Row.Empty)))) Language.LSP.Protocol.Types.Common.|? (Row.Rec ("language" Row..== (Maybe Data.Text.Text) Row..+ ("scheme" Row..== (Maybe Data.Text.Text) Row..+ ("pattern" Row..== Data.Text.Text Row..+ Row.Empty)))))) deriving newtype (Aeson.ToJSON, Aeson.FromJSON) deriving stock (Show, Eq, Ord, Generic) - deriving anyclass (NFData) \ No newline at end of file + deriving anyclass (NFData) diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentIdentifier.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentIdentifier.hs index 4c64b8f31..def895617 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentIdentifier.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentIdentifier.hs @@ -28,4 +28,4 @@ instance Aeson.ToJSON TextDocumentIdentifier where toJSON (TextDocumentIdentifier arg0) = Aeson.object $ concat $ [["uri" Aeson..= arg0]] instance Aeson.FromJSON TextDocumentIdentifier where - parseJSON = Aeson.withObject "TextDocumentIdentifier" $ \arg -> TextDocumentIdentifier <$> arg Aeson..: "uri" \ No newline at end of file + parseJSON = Aeson.withObject "TextDocumentIdentifier" $ \arg -> TextDocumentIdentifier <$> arg Aeson..: "uri" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentItem.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentItem.hs index 57184fdc9..68a793ca6 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentItem.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentItem.hs @@ -46,4 +46,4 @@ instance Aeson.ToJSON TextDocumentItem where ,["text" Aeson..= arg3]] instance Aeson.FromJSON TextDocumentItem where - parseJSON = Aeson.withObject "TextDocumentItem" $ \arg -> TextDocumentItem <$> arg Aeson..: "uri" <*> arg Aeson..: "languageId" <*> arg Aeson..: "version" <*> arg Aeson..: "text" \ No newline at end of file + parseJSON = Aeson.withObject "TextDocumentItem" $ \arg -> TextDocumentItem <$> arg Aeson..: "uri" <*> arg Aeson..: "languageId" <*> arg Aeson..: "version" <*> arg Aeson..: "text" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentPositionParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentPositionParams.hs index e78be86c4..47b7c99be 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentPositionParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentPositionParams.hs @@ -35,4 +35,4 @@ instance Aeson.ToJSON TextDocumentPositionParams where ,["position" Aeson..= arg1]] instance Aeson.FromJSON TextDocumentPositionParams where - parseJSON = Aeson.withObject "TextDocumentPositionParams" $ \arg -> TextDocumentPositionParams <$> arg Aeson..: "textDocument" <*> arg Aeson..: "position" \ No newline at end of file + parseJSON = Aeson.withObject "TextDocumentPositionParams" $ \arg -> TextDocumentPositionParams <$> arg Aeson..: "textDocument" <*> arg Aeson..: "position" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentRegistrationOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentRegistrationOptions.hs index fbd4eed09..89033c45f 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentRegistrationOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentRegistrationOptions.hs @@ -29,4 +29,4 @@ instance Aeson.ToJSON TextDocumentRegistrationOptions where toJSON (TextDocumentRegistrationOptions arg0) = Aeson.object $ concat $ [["documentSelector" Aeson..= arg0]] instance Aeson.FromJSON TextDocumentRegistrationOptions where - parseJSON = Aeson.withObject "TextDocumentRegistrationOptions" $ \arg -> TextDocumentRegistrationOptions <$> arg Aeson..: "documentSelector" \ No newline at end of file + parseJSON = Aeson.withObject "TextDocumentRegistrationOptions" $ \arg -> TextDocumentRegistrationOptions <$> arg Aeson..: "documentSelector" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentSaveReason.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentSaveReason.hs index cf37fff03..08f61d3f2 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentSaveReason.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentSaveReason.hs @@ -49,3 +49,4 @@ instance Language.LSP.Protocol.Types.LspEnum.LspEnum TextDocumentSaveReason wher fromEnumBaseType 3 = pure TextDocumentSaveReason_FocusOut fromEnumBaseType _ = Nothing + diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentSaveRegistrationOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentSaveRegistrationOptions.hs index 942122d78..2da4b3ad6 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentSaveRegistrationOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentSaveRegistrationOptions.hs @@ -34,4 +34,4 @@ instance Aeson.ToJSON TextDocumentSaveRegistrationOptions where ,"includeText" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON TextDocumentSaveRegistrationOptions where - parseJSON = Aeson.withObject "TextDocumentSaveRegistrationOptions" $ \arg -> TextDocumentSaveRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "includeText" \ No newline at end of file + parseJSON = Aeson.withObject "TextDocumentSaveRegistrationOptions" $ \arg -> TextDocumentSaveRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "includeText" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentSyncClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentSyncClientCapabilities.hs index 1d585ee20..4554f70d8 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentSyncClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentSyncClientCapabilities.hs @@ -44,4 +44,4 @@ instance Aeson.ToJSON TextDocumentSyncClientCapabilities where ,"didSave" Language.LSP.Protocol.Types.Common..=? arg3] instance Aeson.FromJSON TextDocumentSyncClientCapabilities where - parseJSON = Aeson.withObject "TextDocumentSyncClientCapabilities" $ \arg -> TextDocumentSyncClientCapabilities <$> arg Aeson..:! "dynamicRegistration" <*> arg Aeson..:! "willSave" <*> arg Aeson..:! "willSaveWaitUntil" <*> arg Aeson..:! "didSave" \ No newline at end of file + parseJSON = Aeson.withObject "TextDocumentSyncClientCapabilities" $ \arg -> TextDocumentSyncClientCapabilities <$> arg Aeson..:! "dynamicRegistration" <*> arg Aeson..:! "willSave" <*> arg Aeson..:! "willSaveWaitUntil" <*> arg Aeson..:! "didSave" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentSyncKind.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentSyncKind.hs index 190e9871b..43767e9af 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentSyncKind.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentSyncKind.hs @@ -52,3 +52,4 @@ instance Language.LSP.Protocol.Types.LspEnum.LspEnum TextDocumentSyncKind where fromEnumBaseType 2 = pure TextDocumentSyncKind_Incremental fromEnumBaseType _ = Nothing + diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentSyncOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentSyncOptions.hs index 3f20ae783..d46759a8e 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentSyncOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextDocumentSyncOptions.hs @@ -54,4 +54,4 @@ instance Aeson.ToJSON TextDocumentSyncOptions where ,"save" Language.LSP.Protocol.Types.Common..=? arg4] instance Aeson.FromJSON TextDocumentSyncOptions where - parseJSON = Aeson.withObject "TextDocumentSyncOptions" $ \arg -> TextDocumentSyncOptions <$> arg Aeson..:! "openClose" <*> arg Aeson..:! "change" <*> arg Aeson..:! "willSave" <*> arg Aeson..:! "willSaveWaitUntil" <*> arg Aeson..:! "save" \ No newline at end of file + parseJSON = Aeson.withObject "TextDocumentSyncOptions" $ \arg -> TextDocumentSyncOptions <$> arg Aeson..:! "openClose" <*> arg Aeson..:! "change" <*> arg Aeson..:! "willSave" <*> arg Aeson..:! "willSaveWaitUntil" <*> arg Aeson..:! "save" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextEdit.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextEdit.hs index 190adcd94..a922aff9c 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextEdit.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TextEdit.hs @@ -36,4 +36,4 @@ instance Aeson.ToJSON TextEdit where ,["newText" Aeson..= arg1]] instance Aeson.FromJSON TextEdit where - parseJSON = Aeson.withObject "TextEdit" $ \arg -> TextEdit <$> arg Aeson..: "range" <*> arg Aeson..: "newText" \ No newline at end of file + parseJSON = Aeson.withObject "TextEdit" $ \arg -> TextEdit <$> arg Aeson..: "range" <*> arg Aeson..: "newText" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TokenFormat.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TokenFormat.hs index d2c9c0ff8..34b8cc860 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TokenFormat.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TokenFormat.hs @@ -34,3 +34,4 @@ instance Language.LSP.Protocol.Types.LspEnum.LspEnum TokenFormat where fromEnumBaseType "relative" = pure TokenFormat_Relative fromEnumBaseType _ = Nothing + diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TraceValues.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TraceValues.hs index cc5a04fc7..d0f083175 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TraceValues.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TraceValues.hs @@ -48,3 +48,4 @@ instance Language.LSP.Protocol.Types.LspEnum.LspEnum TraceValues where fromEnumBaseType "verbose" = pure TraceValues_Verbose fromEnumBaseType _ = Nothing + diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeDefinitionClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeDefinitionClientCapabilities.hs index c53498251..85d40d47a 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeDefinitionClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeDefinitionClientCapabilities.hs @@ -36,4 +36,4 @@ instance Aeson.ToJSON TypeDefinitionClientCapabilities where ,"linkSupport" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON TypeDefinitionClientCapabilities where - parseJSON = Aeson.withObject "TypeDefinitionClientCapabilities" $ \arg -> TypeDefinitionClientCapabilities <$> arg Aeson..:! "dynamicRegistration" <*> arg Aeson..:! "linkSupport" \ No newline at end of file + parseJSON = Aeson.withObject "TypeDefinitionClientCapabilities" $ \arg -> TypeDefinitionClientCapabilities <$> arg Aeson..:! "dynamicRegistration" <*> arg Aeson..:! "linkSupport" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeDefinitionOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeDefinitionOptions.hs index a3e6c33ff..8f7feb8dc 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeDefinitionOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeDefinitionOptions.hs @@ -27,4 +27,4 @@ instance Aeson.ToJSON TypeDefinitionOptions where toJSON (TypeDefinitionOptions arg0) = Aeson.object $ concat $ ["workDoneProgress" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON TypeDefinitionOptions where - parseJSON = Aeson.withObject "TypeDefinitionOptions" $ \arg -> TypeDefinitionOptions <$> arg Aeson..:! "workDoneProgress" \ No newline at end of file + parseJSON = Aeson.withObject "TypeDefinitionOptions" $ \arg -> TypeDefinitionOptions <$> arg Aeson..:! "workDoneProgress" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeDefinitionParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeDefinitionParams.hs index 145ae65d4..5f7877f70 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeDefinitionParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeDefinitionParams.hs @@ -46,4 +46,4 @@ instance Aeson.ToJSON TypeDefinitionParams where ,"partialResultToken" Language.LSP.Protocol.Types.Common..=? arg3] instance Aeson.FromJSON TypeDefinitionParams where - parseJSON = Aeson.withObject "TypeDefinitionParams" $ \arg -> TypeDefinitionParams <$> arg Aeson..: "textDocument" <*> arg Aeson..: "position" <*> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" \ No newline at end of file + parseJSON = Aeson.withObject "TypeDefinitionParams" $ \arg -> TypeDefinitionParams <$> arg Aeson..: "textDocument" <*> arg Aeson..: "position" <*> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeDefinitionRegistrationOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeDefinitionRegistrationOptions.hs index 4972b0e9a..6c0526836 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeDefinitionRegistrationOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeDefinitionRegistrationOptions.hs @@ -41,4 +41,4 @@ instance Aeson.ToJSON TypeDefinitionRegistrationOptions where ,"id" Language.LSP.Protocol.Types.Common..=? arg2] instance Aeson.FromJSON TypeDefinitionRegistrationOptions where - parseJSON = Aeson.withObject "TypeDefinitionRegistrationOptions" $ \arg -> TypeDefinitionRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "id" \ No newline at end of file + parseJSON = Aeson.withObject "TypeDefinitionRegistrationOptions" $ \arg -> TypeDefinitionRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "id" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeHierarchyClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeHierarchyClientCapabilities.hs index fad4c1676..8fa29c603 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeHierarchyClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeHierarchyClientCapabilities.hs @@ -29,4 +29,4 @@ instance Aeson.ToJSON TypeHierarchyClientCapabilities where toJSON (TypeHierarchyClientCapabilities arg0) = Aeson.object $ concat $ ["dynamicRegistration" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON TypeHierarchyClientCapabilities where - parseJSON = Aeson.withObject "TypeHierarchyClientCapabilities" $ \arg -> TypeHierarchyClientCapabilities <$> arg Aeson..:! "dynamicRegistration" \ No newline at end of file + parseJSON = Aeson.withObject "TypeHierarchyClientCapabilities" $ \arg -> TypeHierarchyClientCapabilities <$> arg Aeson..:! "dynamicRegistration" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeHierarchyItem.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeHierarchyItem.hs index e545e930e..75d149773 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeHierarchyItem.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeHierarchyItem.hs @@ -74,4 +74,4 @@ instance Aeson.ToJSON TypeHierarchyItem where ,"data" Language.LSP.Protocol.Types.Common..=? arg7] instance Aeson.FromJSON TypeHierarchyItem where - parseJSON = Aeson.withObject "TypeHierarchyItem" $ \arg -> TypeHierarchyItem <$> arg Aeson..: "name" <*> arg Aeson..: "kind" <*> arg Aeson..:! "tags" <*> arg Aeson..:! "detail" <*> arg Aeson..: "uri" <*> arg Aeson..: "range" <*> arg Aeson..: "selectionRange" <*> arg Aeson..:! "data" \ No newline at end of file + parseJSON = Aeson.withObject "TypeHierarchyItem" $ \arg -> TypeHierarchyItem <$> arg Aeson..: "name" <*> arg Aeson..: "kind" <*> arg Aeson..:! "tags" <*> arg Aeson..:! "detail" <*> arg Aeson..: "uri" <*> arg Aeson..: "range" <*> arg Aeson..: "selectionRange" <*> arg Aeson..:! "data" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeHierarchyOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeHierarchyOptions.hs index e80409635..e56e4364e 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeHierarchyOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeHierarchyOptions.hs @@ -29,4 +29,4 @@ instance Aeson.ToJSON TypeHierarchyOptions where toJSON (TypeHierarchyOptions arg0) = Aeson.object $ concat $ ["workDoneProgress" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON TypeHierarchyOptions where - parseJSON = Aeson.withObject "TypeHierarchyOptions" $ \arg -> TypeHierarchyOptions <$> arg Aeson..:! "workDoneProgress" \ No newline at end of file + parseJSON = Aeson.withObject "TypeHierarchyOptions" $ \arg -> TypeHierarchyOptions <$> arg Aeson..:! "workDoneProgress" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeHierarchyPrepareParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeHierarchyPrepareParams.hs index 57a08e4f3..d351d1e3e 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeHierarchyPrepareParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeHierarchyPrepareParams.hs @@ -42,4 +42,4 @@ instance Aeson.ToJSON TypeHierarchyPrepareParams where ,"workDoneToken" Language.LSP.Protocol.Types.Common..=? arg2] instance Aeson.FromJSON TypeHierarchyPrepareParams where - parseJSON = Aeson.withObject "TypeHierarchyPrepareParams" $ \arg -> TypeHierarchyPrepareParams <$> arg Aeson..: "textDocument" <*> arg Aeson..: "position" <*> arg Aeson..:! "workDoneToken" \ No newline at end of file + parseJSON = Aeson.withObject "TypeHierarchyPrepareParams" $ \arg -> TypeHierarchyPrepareParams <$> arg Aeson..: "textDocument" <*> arg Aeson..: "position" <*> arg Aeson..:! "workDoneToken" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeHierarchyRegistrationOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeHierarchyRegistrationOptions.hs index 8c64debb8..895dbde90 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeHierarchyRegistrationOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeHierarchyRegistrationOptions.hs @@ -43,4 +43,4 @@ instance Aeson.ToJSON TypeHierarchyRegistrationOptions where ,"id" Language.LSP.Protocol.Types.Common..=? arg2] instance Aeson.FromJSON TypeHierarchyRegistrationOptions where - parseJSON = Aeson.withObject "TypeHierarchyRegistrationOptions" $ \arg -> TypeHierarchyRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "id" \ No newline at end of file + parseJSON = Aeson.withObject "TypeHierarchyRegistrationOptions" $ \arg -> TypeHierarchyRegistrationOptions <$> arg Aeson..: "documentSelector" <*> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "id" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeHierarchySubtypesParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeHierarchySubtypesParams.hs index 16e178ad4..797fabe15 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeHierarchySubtypesParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeHierarchySubtypesParams.hs @@ -42,4 +42,4 @@ instance Aeson.ToJSON TypeHierarchySubtypesParams where ,["item" Aeson..= arg2]] instance Aeson.FromJSON TypeHierarchySubtypesParams where - parseJSON = Aeson.withObject "TypeHierarchySubtypesParams" $ \arg -> TypeHierarchySubtypesParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" <*> arg Aeson..: "item" \ No newline at end of file + parseJSON = Aeson.withObject "TypeHierarchySubtypesParams" $ \arg -> TypeHierarchySubtypesParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" <*> arg Aeson..: "item" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeHierarchySupertypesParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeHierarchySupertypesParams.hs index bbffca49f..ec302a989 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeHierarchySupertypesParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/TypeHierarchySupertypesParams.hs @@ -42,4 +42,4 @@ instance Aeson.ToJSON TypeHierarchySupertypesParams where ,["item" Aeson..= arg2]] instance Aeson.FromJSON TypeHierarchySupertypesParams where - parseJSON = Aeson.withObject "TypeHierarchySupertypesParams" $ \arg -> TypeHierarchySupertypesParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" <*> arg Aeson..: "item" \ No newline at end of file + parseJSON = Aeson.withObject "TypeHierarchySupertypesParams" $ \arg -> TypeHierarchySupertypesParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" <*> arg Aeson..: "item" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/UInitializeParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/UInitializeParams.hs index 83b56e455..314043bcb 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/UInitializeParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/UInitializeParams.hs @@ -96,4 +96,4 @@ instance Aeson.ToJSON UInitializeParams where ,"trace" Language.LSP.Protocol.Types.Common..=? arg8] instance Aeson.FromJSON UInitializeParams where - parseJSON = Aeson.withObject "_InitializeParams" $ \arg -> UInitializeParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..: "processId" <*> arg Aeson..:! "clientInfo" <*> arg Aeson..:! "locale" <*> arg Aeson..:! "rootPath" <*> arg Aeson..: "rootUri" <*> arg Aeson..: "capabilities" <*> arg Aeson..:! "initializationOptions" <*> arg Aeson..:! "trace" \ No newline at end of file + parseJSON = Aeson.withObject "_InitializeParams" $ \arg -> UInitializeParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..: "processId" <*> arg Aeson..:! "clientInfo" <*> arg Aeson..:! "locale" <*> arg Aeson..:! "rootPath" <*> arg Aeson..: "rootUri" <*> arg Aeson..: "capabilities" <*> arg Aeson..:! "initializationOptions" <*> arg Aeson..:! "trace" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/UnchangedDocumentDiagnosticReport.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/UnchangedDocumentDiagnosticReport.hs index 11cfe9321..263f7a69d 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/UnchangedDocumentDiagnosticReport.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/UnchangedDocumentDiagnosticReport.hs @@ -41,4 +41,4 @@ instance Aeson.ToJSON UnchangedDocumentDiagnosticReport where ,["resultId" Aeson..= arg1]] instance Aeson.FromJSON UnchangedDocumentDiagnosticReport where - parseJSON = Aeson.withObject "UnchangedDocumentDiagnosticReport" $ \arg -> UnchangedDocumentDiagnosticReport <$> arg Aeson..: "kind" <*> arg Aeson..: "resultId" \ No newline at end of file + parseJSON = Aeson.withObject "UnchangedDocumentDiagnosticReport" $ \arg -> UnchangedDocumentDiagnosticReport <$> arg Aeson..: "kind" <*> arg Aeson..: "resultId" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/UniquenessLevel.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/UniquenessLevel.hs index 88a62a642..05788d2d3 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/UniquenessLevel.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/UniquenessLevel.hs @@ -64,3 +64,4 @@ instance Language.LSP.Protocol.Types.LspEnum.LspEnum UniquenessLevel where fromEnumBaseType "global" = pure UniquenessLevel_Global fromEnumBaseType _ = Nothing + diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Unregistration.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Unregistration.hs index a14510869..4f641e560 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Unregistration.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/Unregistration.hs @@ -34,4 +34,4 @@ instance Aeson.ToJSON Unregistration where ,["method" Aeson..= arg1]] instance Aeson.FromJSON Unregistration where - parseJSON = Aeson.withObject "Unregistration" $ \arg -> Unregistration <$> arg Aeson..: "id" <*> arg Aeson..: "method" \ No newline at end of file + parseJSON = Aeson.withObject "Unregistration" $ \arg -> Unregistration <$> arg Aeson..: "id" <*> arg Aeson..: "method" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/UnregistrationParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/UnregistrationParams.hs index fbe134a85..a8100e237 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/UnregistrationParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/UnregistrationParams.hs @@ -28,4 +28,4 @@ instance Aeson.ToJSON UnregistrationParams where toJSON (UnregistrationParams arg0) = Aeson.object $ concat $ [["unregisterations" Aeson..= arg0]] instance Aeson.FromJSON UnregistrationParams where - parseJSON = Aeson.withObject "UnregistrationParams" $ \arg -> UnregistrationParams <$> arg Aeson..: "unregisterations" \ No newline at end of file + parseJSON = Aeson.withObject "UnregistrationParams" $ \arg -> UnregistrationParams <$> arg Aeson..: "unregisterations" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/VersionedNotebookDocumentIdentifier.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/VersionedNotebookDocumentIdentifier.hs index 18d29359f..7d02fac72 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/VersionedNotebookDocumentIdentifier.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/VersionedNotebookDocumentIdentifier.hs @@ -35,4 +35,4 @@ instance Aeson.ToJSON VersionedNotebookDocumentIdentifier where ,["uri" Aeson..= arg1]] instance Aeson.FromJSON VersionedNotebookDocumentIdentifier where - parseJSON = Aeson.withObject "VersionedNotebookDocumentIdentifier" $ \arg -> VersionedNotebookDocumentIdentifier <$> arg Aeson..: "version" <*> arg Aeson..: "uri" \ No newline at end of file + parseJSON = Aeson.withObject "VersionedNotebookDocumentIdentifier" $ \arg -> VersionedNotebookDocumentIdentifier <$> arg Aeson..: "version" <*> arg Aeson..: "uri" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/VersionedTextDocumentIdentifier.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/VersionedTextDocumentIdentifier.hs index fd026e800..a0315da00 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/VersionedTextDocumentIdentifier.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/VersionedTextDocumentIdentifier.hs @@ -33,4 +33,4 @@ instance Aeson.ToJSON VersionedTextDocumentIdentifier where ,["version" Aeson..= arg1]] instance Aeson.FromJSON VersionedTextDocumentIdentifier where - parseJSON = Aeson.withObject "VersionedTextDocumentIdentifier" $ \arg -> VersionedTextDocumentIdentifier <$> arg Aeson..: "uri" <*> arg Aeson..: "version" \ No newline at end of file + parseJSON = Aeson.withObject "VersionedTextDocumentIdentifier" $ \arg -> VersionedTextDocumentIdentifier <$> arg Aeson..: "uri" <*> arg Aeson..: "version" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WatchKind.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WatchKind.hs index 2f022063c..d7c3591d1 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WatchKind.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WatchKind.hs @@ -52,3 +52,4 @@ instance Language.LSP.Protocol.Types.LspEnum.LspOpenEnum WatchKind where fromOpenEnumBaseType 4 = WatchKind_Delete fromOpenEnumBaseType arg = WatchKind_Custom arg + diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WillSaveTextDocumentParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WillSaveTextDocumentParams.hs index b168a1b03..770c430c7 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WillSaveTextDocumentParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WillSaveTextDocumentParams.hs @@ -34,4 +34,4 @@ instance Aeson.ToJSON WillSaveTextDocumentParams where ,["reason" Aeson..= arg1]] instance Aeson.FromJSON WillSaveTextDocumentParams where - parseJSON = Aeson.withObject "WillSaveTextDocumentParams" $ \arg -> WillSaveTextDocumentParams <$> arg Aeson..: "textDocument" <*> arg Aeson..: "reason" \ No newline at end of file + parseJSON = Aeson.withObject "WillSaveTextDocumentParams" $ \arg -> WillSaveTextDocumentParams <$> arg Aeson..: "textDocument" <*> arg Aeson..: "reason" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WindowClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WindowClientCapabilities.hs index 8f4eee1b2..3d16f16b1 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WindowClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WindowClientCapabilities.hs @@ -51,4 +51,4 @@ instance Aeson.ToJSON WindowClientCapabilities where ,"showDocument" Language.LSP.Protocol.Types.Common..=? arg2] instance Aeson.FromJSON WindowClientCapabilities where - parseJSON = Aeson.withObject "WindowClientCapabilities" $ \arg -> WindowClientCapabilities <$> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "showMessage" <*> arg Aeson..:! "showDocument" \ No newline at end of file + parseJSON = Aeson.withObject "WindowClientCapabilities" $ \arg -> WindowClientCapabilities <$> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "showMessage" <*> arg Aeson..:! "showDocument" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkDoneProgressBegin.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkDoneProgressBegin.hs index 5955c3e53..6aea20e1d 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkDoneProgressBegin.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkDoneProgressBegin.hs @@ -63,4 +63,4 @@ instance Aeson.ToJSON WorkDoneProgressBegin where ,"percentage" Language.LSP.Protocol.Types.Common..=? arg4] instance Aeson.FromJSON WorkDoneProgressBegin where - parseJSON = Aeson.withObject "WorkDoneProgressBegin" $ \arg -> WorkDoneProgressBegin <$> arg Aeson..: "kind" <*> arg Aeson..: "title" <*> arg Aeson..:! "cancellable" <*> arg Aeson..:! "message" <*> arg Aeson..:! "percentage" \ No newline at end of file + parseJSON = Aeson.withObject "WorkDoneProgressBegin" $ \arg -> WorkDoneProgressBegin <$> arg Aeson..: "kind" <*> arg Aeson..: "title" <*> arg Aeson..:! "cancellable" <*> arg Aeson..:! "message" <*> arg Aeson..:! "percentage" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkDoneProgressCancelParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkDoneProgressCancelParams.hs index cb0beae09..29dbbf34b 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkDoneProgressCancelParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkDoneProgressCancelParams.hs @@ -28,4 +28,4 @@ instance Aeson.ToJSON WorkDoneProgressCancelParams where toJSON (WorkDoneProgressCancelParams arg0) = Aeson.object $ concat $ [["token" Aeson..= arg0]] instance Aeson.FromJSON WorkDoneProgressCancelParams where - parseJSON = Aeson.withObject "WorkDoneProgressCancelParams" $ \arg -> WorkDoneProgressCancelParams <$> arg Aeson..: "token" \ No newline at end of file + parseJSON = Aeson.withObject "WorkDoneProgressCancelParams" $ \arg -> WorkDoneProgressCancelParams <$> arg Aeson..: "token" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkDoneProgressCreateParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkDoneProgressCreateParams.hs index db3919557..5940173d2 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkDoneProgressCreateParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkDoneProgressCreateParams.hs @@ -28,4 +28,4 @@ instance Aeson.ToJSON WorkDoneProgressCreateParams where toJSON (WorkDoneProgressCreateParams arg0) = Aeson.object $ concat $ [["token" Aeson..= arg0]] instance Aeson.FromJSON WorkDoneProgressCreateParams where - parseJSON = Aeson.withObject "WorkDoneProgressCreateParams" $ \arg -> WorkDoneProgressCreateParams <$> arg Aeson..: "token" \ No newline at end of file + parseJSON = Aeson.withObject "WorkDoneProgressCreateParams" $ \arg -> WorkDoneProgressCreateParams <$> arg Aeson..: "token" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkDoneProgressEnd.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkDoneProgressEnd.hs index 3d3d22413..0f72898cf 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkDoneProgressEnd.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkDoneProgressEnd.hs @@ -35,4 +35,4 @@ instance Aeson.ToJSON WorkDoneProgressEnd where ,"message" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON WorkDoneProgressEnd where - parseJSON = Aeson.withObject "WorkDoneProgressEnd" $ \arg -> WorkDoneProgressEnd <$> arg Aeson..: "kind" <*> arg Aeson..:! "message" \ No newline at end of file + parseJSON = Aeson.withObject "WorkDoneProgressEnd" $ \arg -> WorkDoneProgressEnd <$> arg Aeson..: "kind" <*> arg Aeson..:! "message" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkDoneProgressOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkDoneProgressOptions.hs index 7d950b30d..a1b222135 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkDoneProgressOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkDoneProgressOptions.hs @@ -27,4 +27,4 @@ instance Aeson.ToJSON WorkDoneProgressOptions where toJSON (WorkDoneProgressOptions arg0) = Aeson.object $ concat $ ["workDoneProgress" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON WorkDoneProgressOptions where - parseJSON = Aeson.withObject "WorkDoneProgressOptions" $ \arg -> WorkDoneProgressOptions <$> arg Aeson..:! "workDoneProgress" \ No newline at end of file + parseJSON = Aeson.withObject "WorkDoneProgressOptions" $ \arg -> WorkDoneProgressOptions <$> arg Aeson..:! "workDoneProgress" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkDoneProgressParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkDoneProgressParams.hs index 92ead4101..7d9373184 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkDoneProgressParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkDoneProgressParams.hs @@ -28,4 +28,4 @@ instance Aeson.ToJSON WorkDoneProgressParams where toJSON (WorkDoneProgressParams arg0) = Aeson.object $ concat $ ["workDoneToken" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON WorkDoneProgressParams where - parseJSON = Aeson.withObject "WorkDoneProgressParams" $ \arg -> WorkDoneProgressParams <$> arg Aeson..:! "workDoneToken" \ No newline at end of file + parseJSON = Aeson.withObject "WorkDoneProgressParams" $ \arg -> WorkDoneProgressParams <$> arg Aeson..:! "workDoneToken" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkDoneProgressReport.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkDoneProgressReport.hs index fe47533e1..e15d22e3a 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkDoneProgressReport.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkDoneProgressReport.hs @@ -56,4 +56,4 @@ instance Aeson.ToJSON WorkDoneProgressReport where ,"percentage" Language.LSP.Protocol.Types.Common..=? arg3] instance Aeson.FromJSON WorkDoneProgressReport where - parseJSON = Aeson.withObject "WorkDoneProgressReport" $ \arg -> WorkDoneProgressReport <$> arg Aeson..: "kind" <*> arg Aeson..:! "cancellable" <*> arg Aeson..:! "message" <*> arg Aeson..:! "percentage" \ No newline at end of file + parseJSON = Aeson.withObject "WorkDoneProgressReport" $ \arg -> WorkDoneProgressReport <$> arg Aeson..: "kind" <*> arg Aeson..:! "cancellable" <*> arg Aeson..:! "message" <*> arg Aeson..:! "percentage" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceClientCapabilities.hs index d56b46a75..48d5f43e0 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceClientCapabilities.hs @@ -126,4 +126,4 @@ instance Aeson.ToJSON WorkspaceClientCapabilities where ,"diagnostics" Language.LSP.Protocol.Types.Common..=? arg13] instance Aeson.FromJSON WorkspaceClientCapabilities where - parseJSON = Aeson.withObject "WorkspaceClientCapabilities" $ \arg -> WorkspaceClientCapabilities <$> arg Aeson..:! "applyEdit" <*> arg Aeson..:! "workspaceEdit" <*> arg Aeson..:! "didChangeConfiguration" <*> arg Aeson..:! "didChangeWatchedFiles" <*> arg Aeson..:! "symbol" <*> arg Aeson..:! "executeCommand" <*> arg Aeson..:! "workspaceFolders" <*> arg Aeson..:! "configuration" <*> arg Aeson..:! "semanticTokens" <*> arg Aeson..:! "codeLens" <*> arg Aeson..:! "fileOperations" <*> arg Aeson..:! "inlineValue" <*> arg Aeson..:! "inlayHint" <*> arg Aeson..:! "diagnostics" \ No newline at end of file + parseJSON = Aeson.withObject "WorkspaceClientCapabilities" $ \arg -> WorkspaceClientCapabilities <$> arg Aeson..:! "applyEdit" <*> arg Aeson..:! "workspaceEdit" <*> arg Aeson..:! "didChangeConfiguration" <*> arg Aeson..:! "didChangeWatchedFiles" <*> arg Aeson..:! "symbol" <*> arg Aeson..:! "executeCommand" <*> arg Aeson..:! "workspaceFolders" <*> arg Aeson..:! "configuration" <*> arg Aeson..:! "semanticTokens" <*> arg Aeson..:! "codeLens" <*> arg Aeson..:! "fileOperations" <*> arg Aeson..:! "inlineValue" <*> arg Aeson..:! "inlayHint" <*> arg Aeson..:! "diagnostics" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceDiagnosticParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceDiagnosticParams.hs index 890de5c4d..b69978454 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceDiagnosticParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceDiagnosticParams.hs @@ -49,4 +49,4 @@ instance Aeson.ToJSON WorkspaceDiagnosticParams where ,["previousResultIds" Aeson..= arg3]] instance Aeson.FromJSON WorkspaceDiagnosticParams where - parseJSON = Aeson.withObject "WorkspaceDiagnosticParams" $ \arg -> WorkspaceDiagnosticParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" <*> arg Aeson..:! "identifier" <*> arg Aeson..: "previousResultIds" \ No newline at end of file + parseJSON = Aeson.withObject "WorkspaceDiagnosticParams" $ \arg -> WorkspaceDiagnosticParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" <*> arg Aeson..:! "identifier" <*> arg Aeson..: "previousResultIds" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceDiagnosticReport.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceDiagnosticReport.hs index c68762a9d..3a648a1e6 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceDiagnosticReport.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceDiagnosticReport.hs @@ -30,4 +30,4 @@ instance Aeson.ToJSON WorkspaceDiagnosticReport where toJSON (WorkspaceDiagnosticReport arg0) = Aeson.object $ concat $ [["items" Aeson..= arg0]] instance Aeson.FromJSON WorkspaceDiagnosticReport where - parseJSON = Aeson.withObject "WorkspaceDiagnosticReport" $ \arg -> WorkspaceDiagnosticReport <$> arg Aeson..: "items" \ No newline at end of file + parseJSON = Aeson.withObject "WorkspaceDiagnosticReport" $ \arg -> WorkspaceDiagnosticReport <$> arg Aeson..: "items" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceDiagnosticReportPartialResult.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceDiagnosticReportPartialResult.hs index db1dff1c0..f31874a8e 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceDiagnosticReportPartialResult.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceDiagnosticReportPartialResult.hs @@ -30,4 +30,4 @@ instance Aeson.ToJSON WorkspaceDiagnosticReportPartialResult where toJSON (WorkspaceDiagnosticReportPartialResult arg0) = Aeson.object $ concat $ [["items" Aeson..= arg0]] instance Aeson.FromJSON WorkspaceDiagnosticReportPartialResult where - parseJSON = Aeson.withObject "WorkspaceDiagnosticReportPartialResult" $ \arg -> WorkspaceDiagnosticReportPartialResult <$> arg Aeson..: "items" \ No newline at end of file + parseJSON = Aeson.withObject "WorkspaceDiagnosticReportPartialResult" $ \arg -> WorkspaceDiagnosticReportPartialResult <$> arg Aeson..: "items" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceDocumentDiagnosticReport.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceDocumentDiagnosticReport.hs index 803f0d07b..8f1c4d10f 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceDocumentDiagnosticReport.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceDocumentDiagnosticReport.hs @@ -21,4 +21,4 @@ A workspace diagnostic document report. newtype WorkspaceDocumentDiagnosticReport = WorkspaceDocumentDiagnosticReport (Language.LSP.Protocol.Internal.Types.WorkspaceFullDocumentDiagnosticReport.WorkspaceFullDocumentDiagnosticReport Language.LSP.Protocol.Types.Common.|? Language.LSP.Protocol.Internal.Types.WorkspaceUnchangedDocumentDiagnosticReport.WorkspaceUnchangedDocumentDiagnosticReport) deriving newtype (Aeson.ToJSON, Aeson.FromJSON) deriving stock (Show, Eq, Ord, Generic) - deriving anyclass (NFData) \ No newline at end of file + deriving anyclass (NFData) diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceEdit.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceEdit.hs index de52ce6f1..3b911a90f 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceEdit.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceEdit.hs @@ -71,4 +71,4 @@ instance Aeson.ToJSON WorkspaceEdit where ,"changeAnnotations" Language.LSP.Protocol.Types.Common..=? arg2] instance Aeson.FromJSON WorkspaceEdit where - parseJSON = Aeson.withObject "WorkspaceEdit" $ \arg -> WorkspaceEdit <$> arg Aeson..:! "changes" <*> arg Aeson..:! "documentChanges" <*> arg Aeson..:! "changeAnnotations" \ No newline at end of file + parseJSON = Aeson.withObject "WorkspaceEdit" $ \arg -> WorkspaceEdit <$> arg Aeson..:! "changes" <*> arg Aeson..:! "documentChanges" <*> arg Aeson..:! "changeAnnotations" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceEditClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceEditClientCapabilities.hs index 37012fae3..612acd3ce 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceEditClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceEditClientCapabilities.hs @@ -65,4 +65,4 @@ instance Aeson.ToJSON WorkspaceEditClientCapabilities where ,"changeAnnotationSupport" Language.LSP.Protocol.Types.Common..=? arg4] instance Aeson.FromJSON WorkspaceEditClientCapabilities where - parseJSON = Aeson.withObject "WorkspaceEditClientCapabilities" $ \arg -> WorkspaceEditClientCapabilities <$> arg Aeson..:! "documentChanges" <*> arg Aeson..:! "resourceOperations" <*> arg Aeson..:! "failureHandling" <*> arg Aeson..:! "normalizesLineEndings" <*> arg Aeson..:! "changeAnnotationSupport" \ No newline at end of file + parseJSON = Aeson.withObject "WorkspaceEditClientCapabilities" $ \arg -> WorkspaceEditClientCapabilities <$> arg Aeson..:! "documentChanges" <*> arg Aeson..:! "resourceOperations" <*> arg Aeson..:! "failureHandling" <*> arg Aeson..:! "normalizesLineEndings" <*> arg Aeson..:! "changeAnnotationSupport" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceFolder.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceFolder.hs index a86d8e85f..531c06ea1 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceFolder.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceFolder.hs @@ -35,4 +35,4 @@ instance Aeson.ToJSON WorkspaceFolder where ,["name" Aeson..= arg1]] instance Aeson.FromJSON WorkspaceFolder where - parseJSON = Aeson.withObject "WorkspaceFolder" $ \arg -> WorkspaceFolder <$> arg Aeson..: "uri" <*> arg Aeson..: "name" \ No newline at end of file + parseJSON = Aeson.withObject "WorkspaceFolder" $ \arg -> WorkspaceFolder <$> arg Aeson..: "uri" <*> arg Aeson..: "name" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceFoldersChangeEvent.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceFoldersChangeEvent.hs index 7367fae46..fe817c98e 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceFoldersChangeEvent.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceFoldersChangeEvent.hs @@ -33,4 +33,4 @@ instance Aeson.ToJSON WorkspaceFoldersChangeEvent where ,["removed" Aeson..= arg1]] instance Aeson.FromJSON WorkspaceFoldersChangeEvent where - parseJSON = Aeson.withObject "WorkspaceFoldersChangeEvent" $ \arg -> WorkspaceFoldersChangeEvent <$> arg Aeson..: "added" <*> arg Aeson..: "removed" \ No newline at end of file + parseJSON = Aeson.withObject "WorkspaceFoldersChangeEvent" $ \arg -> WorkspaceFoldersChangeEvent <$> arg Aeson..: "added" <*> arg Aeson..: "removed" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceFoldersInitializeParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceFoldersInitializeParams.hs index 34e2ebc9e..097b4c5bb 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceFoldersInitializeParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceFoldersInitializeParams.hs @@ -34,4 +34,4 @@ instance Aeson.ToJSON WorkspaceFoldersInitializeParams where toJSON (WorkspaceFoldersInitializeParams arg0) = Aeson.object $ concat $ ["workspaceFolders" Language.LSP.Protocol.Types.Common..=? arg0] instance Aeson.FromJSON WorkspaceFoldersInitializeParams where - parseJSON = Aeson.withObject "WorkspaceFoldersInitializeParams" $ \arg -> WorkspaceFoldersInitializeParams <$> arg Aeson..:! "workspaceFolders" \ No newline at end of file + parseJSON = Aeson.withObject "WorkspaceFoldersInitializeParams" $ \arg -> WorkspaceFoldersInitializeParams <$> arg Aeson..:! "workspaceFolders" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceFoldersServerCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceFoldersServerCapabilities.hs index 019819921..ee9c62183 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceFoldersServerCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceFoldersServerCapabilities.hs @@ -39,4 +39,4 @@ instance Aeson.ToJSON WorkspaceFoldersServerCapabilities where ,"changeNotifications" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON WorkspaceFoldersServerCapabilities where - parseJSON = Aeson.withObject "WorkspaceFoldersServerCapabilities" $ \arg -> WorkspaceFoldersServerCapabilities <$> arg Aeson..:! "supported" <*> arg Aeson..:! "changeNotifications" \ No newline at end of file + parseJSON = Aeson.withObject "WorkspaceFoldersServerCapabilities" $ \arg -> WorkspaceFoldersServerCapabilities <$> arg Aeson..:! "supported" <*> arg Aeson..:! "changeNotifications" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceFullDocumentDiagnosticReport.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceFullDocumentDiagnosticReport.hs index cfb0976a5..34f0f29bc 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceFullDocumentDiagnosticReport.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceFullDocumentDiagnosticReport.hs @@ -56,4 +56,4 @@ instance Aeson.ToJSON WorkspaceFullDocumentDiagnosticReport where ,["version" Aeson..= arg4]] instance Aeson.FromJSON WorkspaceFullDocumentDiagnosticReport where - parseJSON = Aeson.withObject "WorkspaceFullDocumentDiagnosticReport" $ \arg -> WorkspaceFullDocumentDiagnosticReport <$> arg Aeson..: "kind" <*> arg Aeson..:! "resultId" <*> arg Aeson..: "items" <*> arg Aeson..: "uri" <*> arg Aeson..: "version" \ No newline at end of file + parseJSON = Aeson.withObject "WorkspaceFullDocumentDiagnosticReport" $ \arg -> WorkspaceFullDocumentDiagnosticReport <$> arg Aeson..: "kind" <*> arg Aeson..:! "resultId" <*> arg Aeson..: "items" <*> arg Aeson..: "uri" <*> arg Aeson..: "version" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceSymbol.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceSymbol.hs index 88bf7601e..db588230d 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceSymbol.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceSymbol.hs @@ -73,4 +73,4 @@ instance Aeson.ToJSON WorkspaceSymbol where ,"data" Language.LSP.Protocol.Types.Common..=? arg5] instance Aeson.FromJSON WorkspaceSymbol where - parseJSON = Aeson.withObject "WorkspaceSymbol" $ \arg -> WorkspaceSymbol <$> arg Aeson..: "name" <*> arg Aeson..: "kind" <*> arg Aeson..:! "tags" <*> arg Aeson..:! "containerName" <*> arg Aeson..: "location" <*> arg Aeson..:! "data" \ No newline at end of file + parseJSON = Aeson.withObject "WorkspaceSymbol" $ \arg -> WorkspaceSymbol <$> arg Aeson..: "name" <*> arg Aeson..: "kind" <*> arg Aeson..:! "tags" <*> arg Aeson..:! "containerName" <*> arg Aeson..: "location" <*> arg Aeson..:! "data" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceSymbolClientCapabilities.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceSymbolClientCapabilities.hs index 49d7cb4e6..1ca8216d6 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceSymbolClientCapabilities.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceSymbolClientCapabilities.hs @@ -53,4 +53,4 @@ instance Aeson.ToJSON WorkspaceSymbolClientCapabilities where ,"resolveSupport" Language.LSP.Protocol.Types.Common..=? arg3] instance Aeson.FromJSON WorkspaceSymbolClientCapabilities where - parseJSON = Aeson.withObject "WorkspaceSymbolClientCapabilities" $ \arg -> WorkspaceSymbolClientCapabilities <$> arg Aeson..:! "dynamicRegistration" <*> arg Aeson..:! "symbolKind" <*> arg Aeson..:! "tagSupport" <*> arg Aeson..:! "resolveSupport" \ No newline at end of file + parseJSON = Aeson.withObject "WorkspaceSymbolClientCapabilities" $ \arg -> WorkspaceSymbolClientCapabilities <$> arg Aeson..:! "dynamicRegistration" <*> arg Aeson..:! "symbolKind" <*> arg Aeson..:! "tagSupport" <*> arg Aeson..:! "resolveSupport" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceSymbolOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceSymbolOptions.hs index 46ca7d266..84ac4fa87 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceSymbolOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceSymbolOptions.hs @@ -35,4 +35,4 @@ instance Aeson.ToJSON WorkspaceSymbolOptions where ,"resolveProvider" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON WorkspaceSymbolOptions where - parseJSON = Aeson.withObject "WorkspaceSymbolOptions" $ \arg -> WorkspaceSymbolOptions <$> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "resolveProvider" \ No newline at end of file + parseJSON = Aeson.withObject "WorkspaceSymbolOptions" $ \arg -> WorkspaceSymbolOptions <$> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "resolveProvider" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceSymbolParams.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceSymbolParams.hs index 10eec5247..5396d3a87 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceSymbolParams.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceSymbolParams.hs @@ -41,4 +41,4 @@ instance Aeson.ToJSON WorkspaceSymbolParams where ,["query" Aeson..= arg2]] instance Aeson.FromJSON WorkspaceSymbolParams where - parseJSON = Aeson.withObject "WorkspaceSymbolParams" $ \arg -> WorkspaceSymbolParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" <*> arg Aeson..: "query" \ No newline at end of file + parseJSON = Aeson.withObject "WorkspaceSymbolParams" $ \arg -> WorkspaceSymbolParams <$> arg Aeson..:! "workDoneToken" <*> arg Aeson..:! "partialResultToken" <*> arg Aeson..: "query" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceSymbolRegistrationOptions.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceSymbolRegistrationOptions.hs index bbab051b1..d9ac523c6 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceSymbolRegistrationOptions.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceSymbolRegistrationOptions.hs @@ -35,4 +35,4 @@ instance Aeson.ToJSON WorkspaceSymbolRegistrationOptions where ,"resolveProvider" Language.LSP.Protocol.Types.Common..=? arg1] instance Aeson.FromJSON WorkspaceSymbolRegistrationOptions where - parseJSON = Aeson.withObject "WorkspaceSymbolRegistrationOptions" $ \arg -> WorkspaceSymbolRegistrationOptions <$> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "resolveProvider" \ No newline at end of file + parseJSON = Aeson.withObject "WorkspaceSymbolRegistrationOptions" $ \arg -> WorkspaceSymbolRegistrationOptions <$> arg Aeson..:! "workDoneProgress" <*> arg Aeson..:! "resolveProvider" diff --git a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceUnchangedDocumentDiagnosticReport.hs b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceUnchangedDocumentDiagnosticReport.hs index 8bb8e5bb9..e8eb782b5 100644 --- a/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceUnchangedDocumentDiagnosticReport.hs +++ b/lsp-types/generated/Language/LSP/Protocol/Internal/Types/WorkspaceUnchangedDocumentDiagnosticReport.hs @@ -52,4 +52,4 @@ instance Aeson.ToJSON WorkspaceUnchangedDocumentDiagnosticReport where ,["version" Aeson..= arg3]] instance Aeson.FromJSON WorkspaceUnchangedDocumentDiagnosticReport where - parseJSON = Aeson.withObject "WorkspaceUnchangedDocumentDiagnosticReport" $ \arg -> WorkspaceUnchangedDocumentDiagnosticReport <$> arg Aeson..: "kind" <*> arg Aeson..: "resultId" <*> arg Aeson..: "uri" <*> arg Aeson..: "version" \ No newline at end of file + parseJSON = Aeson.withObject "WorkspaceUnchangedDocumentDiagnosticReport" $ \arg -> WorkspaceUnchangedDocumentDiagnosticReport <$> arg Aeson..: "kind" <*> arg Aeson..: "resultId" <*> arg Aeson..: "uri" <*> arg Aeson..: "version" diff --git a/lsp-types/generator/CodeGen.hs b/lsp-types/generator/CodeGen.hs index 20b14cf4b..80d4506f8 100644 --- a/lsp-types/generator/CodeGen.hs +++ b/lsp-types/generator/CodeGen.hs @@ -106,7 +106,13 @@ genModule name pragmas mexports action = do -- TODO: replace with regex isSelfImport imp = (" " <> fullModName <> " ") `T.isInfixOf` imp || (" " <> fullModName) `T.isSuffixOf` imp importSection = hardvcat (fmap pretty $ filter (not . isSelfImport) $ toList imports) - mod = warning <> hardline <> pragmaSection <> hardline <> optionsSection <> hardline <> header <> hardline <> hardline <> importSection <> hardline <> hardline <> doc + mod = warning <> hardline + <> pragmaSection <> hardline + <> optionsSection <> hardline + <> header <> hardline <> hardline + <> importSection + <> hardline <> hardline + <> doc <> hardline printed = T.pack $ show mod modSegments = T.unpack <$> T.splitOn "." fullModName