Thanks to visit codestin.com
Credit goes to github.com

Skip to content

v0.30.0.1: drop deepseq-generics #526

New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Merged
merged 7 commits into from
Aug 27, 2025
Merged

v0.30.0.1: drop deepseq-generics #526

Show file tree
Hide file tree
Changes from 1 commit
Commits
Show all changes
7 commits
Select commit Hold shift + click to select a range
7076a46
Drop obsolete dependency on deepseq-generics
andreasabel Aug 27, 2025
355eb48
Bump dependency lower bounds to at least Stackage LTS 10.0 (GHC 8.2.2)
andreasabel Aug 27, 2025
81009cb
Remove unused dependency transformers-compat
andreasabel Aug 27, 2025
50e43d5
Remove obsolete `deriving Typeable`
andreasabel Aug 27, 2025
0c07f9e
Bump to v0.30.0.1 and CHANGELOG, bump Haskell CI to 9.14 alpha1
andreasabel Aug 27, 2025
4adbc91
Silence -Wincomplete-uni-patterns in testsuite (for Haskell CI)
andreasabel Aug 27, 2025
e42e789
Haskell CI: turn of -Werror=unused-packages; hopeless for github-samples
andreasabel Aug 27, 2025
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
Prev Previous commit
Next Next commit
Remove obsolete deriving Typeable
  • Loading branch information
@andreasabel
andreasabel committed Aug 27, 2025
commit 50e43d5e6790ee5f7630821709b94db47b43a0c4
2 changes: 1 addition & 1 deletion src/GitHub/Auth.hs
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -23,7 +23,7 @@ data Auth
| OAuth Token -- ^ OAuth token
| JWT JWTToken -- ^ JWT Token
| EnterpriseOAuth Text Token -- ^ Custom endpoint and OAuth token
deriving (Show, Data, Typeable, Eq, Ord, Generic)
deriving (Show, Data, Eq, Ord, Generic)

instance NFData Auth
instance Binary Auth
Expand Down
4 changes: 2 additions & 2 deletions src/GitHub/Data/Actions/Artifacts.hs
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -27,7 +27,7 @@ data ArtifactWorkflowRun = ArtifactWorkflowRun
, artifactWorkflowRunHeadBranch :: !Text
, artifactWorkflowRunHeadSha :: !Text
}
deriving (Show, Data, Typeable, Eq, Ord, Generic)
deriving (Show, Data, Eq, Ord, Generic)

data Artifact = Artifact
{ artifactArchiveDownloadUrl :: !URL
Expand All @@ -42,7 +42,7 @@ data Artifact = Artifact
, artifactUrl :: !URL
, artifactWorkflowRun :: !ArtifactWorkflowRun
}
deriving (Show, Data, Typeable, Eq, Ord, Generic)
deriving (Show, Data, Eq, Ord, Generic)

-------------------------------------------------------------------------------
-- JSON instances
Expand Down
6 changes: 3 additions & 3 deletions src/GitHub/Data/Actions/Cache.hs
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -27,20 +27,20 @@ data Cache = Cache
, cacheCreatedAt :: !UTCTime
, cacheSizeInBytes :: !Int
}
deriving (Show, Data, Typeable, Eq, Ord, Generic)
deriving (Show, Data, Eq, Ord, Generic)

data RepositoryCacheUsage = RepositoryCacheUsage
{ repositoryCacheUsageFullName :: !Text
, repositoryCacheUsageActiveCachesSizeInBytes :: !Int
, repositoryCacheUsageActiveCachesCount :: !Int
}
deriving (Show, Data, Typeable, Eq, Ord, Generic)
deriving (Show, Data, Eq, Ord, Generic)

data OrganizationCacheUsage = OrganizationCacheUsage
{ organizationCacheUsageTotalActiveCachesSizeInBytes :: !Int
, organizationCacheUsageTotalActiveCachesCount :: !Int
}
deriving (Show, Data, Typeable, Eq, Ord, Generic)
deriving (Show, Data, Eq, Ord, Generic)

-------------------------------------------------------------------------------
-- JSON instances
Expand Down
2 changes: 1 addition & 1 deletion src/GitHub/Data/Actions/Common.hs
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -20,7 +20,7 @@ data WithTotalCount a = WithTotalCount
, withTotalCountTotalCount :: !Int
-- ^ The total size of the answer.
}
deriving (Show, Data, Typeable, Eq, Ord, Generic)
deriving (Show, Data, Eq, Ord, Generic)

-- | Joining two pages of a paginated response.
-- The 'withTotalCountTotalCount' is assumed to be the same in both pages,
Expand Down
16 changes: 8 additions & 8 deletions src/GitHub/Data/Actions/Secrets.hs
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -33,49 +33,49 @@ data OrganizationSecret = OrganizationSecret
, organizationSecretUpdatedAt :: !UTCTime
, organizationSecretVisibility :: !Text
}
deriving (Show, Data, Typeable, Eq, Ord, Generic)
deriving (Show, Data, Eq, Ord, Generic)

data PublicKey = PublicKey
{ publicKeyId :: !Text
, publicKeyKey :: !Text
}
deriving (Show, Data, Typeable, Eq, Ord, Generic)
deriving (Show, Data, Eq, Ord, Generic)

data SetSecret = SetSecret
{ setSecretPublicKeyId :: !Text
, setSecretEncryptedValue :: !Text
, setSecretVisibility :: !Text
, setSecretSelectedRepositoryIds :: !(Maybe [Id Repo])
}
deriving (Show, Data, Typeable, Eq, Ord, Generic)
deriving (Show, Data, Eq, Ord, Generic)

data SetRepoSecret = SetRepoSecret
{ setRepoSecretPublicKeyId :: !Text
, setRepoSecretEncryptedValue :: !Text
}
deriving (Show, Data, Typeable, Eq, Ord, Generic)
deriving (Show, Data, Eq, Ord, Generic)

data SelectedRepo = SelectedRepo
{ selectedRepoRepoId :: !(Id Repo)
, selectedRepoRepoName :: !(Name Repo)
}
deriving (Show, Data, Typeable, Eq, Ord, Generic)
deriving (Show, Data, Eq, Ord, Generic)

data SetSelectedRepositories = SetSelectedRepositories
{ setSelectedRepositoriesRepositoryIds :: ![Id Repo]
}
deriving (Show, Data, Typeable, Eq, Ord, Generic)
deriving (Show, Data, Eq, Ord, Generic)

data RepoSecret = RepoSecret
{ repoSecretName :: !(Name RepoSecret)
, repoSecretCreatedAt :: !UTCTime
, repoSecretUpdatedAt :: !UTCTime
}
deriving (Show, Data, Typeable, Eq, Ord, Generic)
deriving (Show, Data, Eq, Ord, Generic)

-- TODO move somewhere else?
data Environment = Environment
deriving (Show, Data, Typeable, Eq, Ord, Generic)
deriving (Show, Data, Eq, Ord, Generic)

-------------------------------------------------------------------------------
-- JSON instances
Expand Down
6 changes: 3 additions & 3 deletions src/GitHub/Data/Actions/WorkflowJobs.hs
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -10,7 +10,7 @@ module GitHub.Data.Actions.WorkflowJobs (
import Prelude ()
import GitHub.Internal.Prelude
(Applicative ((<*>)), Data, Eq, FromJSON (parseJSON), Generic, Integer,
Ord, Show, Text, Typeable, UTCTime, Vector, withObject, ($), (.:),
Ord, Show, Text, UTCTime, Vector, withObject, ($), (.:),
(<$>))

import GitHub.Data.Id (Id)
Expand All @@ -32,7 +32,7 @@ data JobStep = JobStep
, jobStepStartedAt :: !UTCTime
, jobStepCompletedAt :: !UTCTime
}
deriving (Show, Data, Typeable, Eq, Ord, Generic)
deriving (Show, Data, Eq, Ord, Generic)

data Job = Job
{ jobId :: !(Id Job)
Expand All @@ -56,7 +56,7 @@ data Job = Job
, jobRunnerGroupId :: !Integer
, jobRunnerGroupName :: !Text
}
deriving (Show, Data, Typeable, Eq, Ord, Generic)
deriving (Show, Data, Eq, Ord, Generic)

-------------------------------------------------------------------------------
-- JSON instances
Expand Down
6 changes: 3 additions & 3 deletions src/GitHub/Data/Actions/WorkflowRuns.hs
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -41,18 +41,18 @@ data WorkflowRun = WorkflowRun
, workflowRunAttempt :: !Integer
, workflowRunStartedAt :: !UTCTime
}
deriving (Show, Data, Typeable, Eq, Ord, Generic)
deriving (Show, Data, Eq, Ord, Generic)

data RunAttempt = RunAttempt
deriving (Show, Data, Typeable, Eq, Ord, Generic)
deriving (Show, Data, Eq, Ord, Generic)

data ReviewHistory = ReviewHistory
{ reviewHistoryState :: !Text
, reviewHistoryComment :: !Text
, reviewHistoryUser :: !SimpleUser

}
deriving (Show, Data, Typeable, Eq, Ord, Generic)
deriving (Show, Data, Eq, Ord, Generic)

-------------------------------------------------------------------------------
-- JSON instances
Expand Down
2 changes: 1 addition & 1 deletion src/GitHub/Data/Actions/Workflows.hs
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -25,7 +25,7 @@ data Workflow = Workflow
, workflowHtmlUrl :: !URL
, workflowBadgeUrl :: !URL
}
deriving (Show, Data, Typeable, Eq, Ord, Generic)
deriving (Show, Data, Eq, Ord, Generic)

data CreateWorkflowDispatchEvent a = CreateWorkflowDispatchEvent
{ createWorkflowDispatchEventRef :: !Text
Expand Down
8 changes: 4 additions & 4 deletions src/GitHub/Data/Activities.hs
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -13,7 +13,7 @@ data RepoStarred = RepoStarred
{ repoStarredStarredAt :: !UTCTime
, repoStarredRepo :: !Repo
}
deriving (Show, Data, Typeable, Eq, Ord, Generic)
deriving (Show, Data, Eq, Ord, Generic)

instance NFData RepoStarred
instance Binary RepoStarred
Expand All @@ -33,7 +33,7 @@ data Subject = Subject
-- TODO: Make an ADT for this.
, subjectType :: !Text
}
deriving (Show, Data, Typeable, Eq, Ord, Generic)
deriving (Show, Data, Eq, Ord, Generic)

instance NFData Subject
instance Binary Subject
Expand Down Expand Up @@ -61,7 +61,7 @@ data NotificationReason
| StateChangeReason
| SubscribedReason
| TeamMentionReason
deriving (Show, Data, Enum, Bounded, Typeable, Eq, Ord, Generic)
deriving (Show, Data, Enum, Bounded, Eq, Ord, Generic)

instance NFData NotificationReason
instance Binary NotificationReason
Expand Down Expand Up @@ -97,7 +97,7 @@ data Notification = Notification
, notificationLastReadAt :: !(Maybe UTCTime)
, notificationUrl :: !URL
}
deriving (Show, Data, Typeable, Eq, Ord, Generic)
deriving (Show, Data, Eq, Ord, Generic)

instance NFData Notification
instance Binary Notification
Expand Down
10 changes: 5 additions & 5 deletions src/GitHub/Data/Comments.hs
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -19,7 +19,7 @@ data Comment = Comment
, commentUser :: !SimpleUser
, commentId :: !(Id Comment)
}
deriving (Show, Data, Typeable, Eq, Ord, Generic)
deriving (Show, Data, Eq, Ord, Generic)

instance NFData Comment
instance Binary Comment
Expand All @@ -41,7 +41,7 @@ instance FromJSON Comment where
data NewComment = NewComment
{ newCommentBody :: !Text
}
deriving (Show, Data, Typeable, Eq, Ord, Generic)
deriving (Show, Data, Eq, Ord, Generic)

instance NFData NewComment
instance Binary NewComment
Expand All @@ -52,7 +52,7 @@ instance ToJSON NewComment where
data EditComment = EditComment
{ editCommentBody :: !Text
}
deriving (Show, Data, Typeable, Eq, Ord, Generic)
deriving (Show, Data, Eq, Ord, Generic)

instance NFData EditComment
instance Binary EditComment
Expand All @@ -66,7 +66,7 @@ data NewPullComment = NewPullComment
, newPullCommentPosition :: !Int
, newPullCommentBody :: !Text
}
deriving (Show, Data, Typeable, Eq, Ord, Generic)
deriving (Show, Data, Eq, Ord, Generic)

instance NFData NewPullComment
instance Binary NewPullComment
Expand All @@ -82,7 +82,7 @@ instance ToJSON NewPullComment where
data PullCommentReply = PullCommentReply
{ pullCommentReplyBody :: Text
}
deriving (Show, Data, Typeable, Eq, Ord, Generic)
deriving (Show, Data, Eq, Ord, Generic)

instance NFData PullCommentReply

Expand Down
22 changes: 11 additions & 11 deletions src/GitHub/Data/Content.hs
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -18,7 +18,7 @@ import Data.Aeson (Key)
data Content
= ContentFile !ContentFileData
| ContentDirectory !(Vector ContentItem)
deriving (Show, Data, Typeable, Eq, Ord, Generic)
deriving (Show, Data, Eq, Ord, Generic)

instance NFData Content
instance Binary Content
Expand All @@ -28,7 +28,7 @@ data ContentFileData = ContentFileData {
,contentFileEncoding :: !Text
,contentFileSize :: !Int
,contentFileContent :: !Text
} deriving (Show, Data, Typeable, Eq, Ord, Generic)
} deriving (Show, Data, Eq, Ord, Generic)

instance NFData ContentFileData
instance Binary ContentFileData
Expand All @@ -37,13 +37,13 @@ instance Binary ContentFileData
data ContentItem = ContentItem {
contentItemType :: !ContentItemType
,contentItemInfo :: !ContentInfo
} deriving (Show, Data, Typeable, Eq, Ord, Generic)
} deriving (Show, Data, Eq, Ord, Generic)

instance NFData ContentItem
instance Binary ContentItem

data ContentItemType = ItemFile | ItemDir
deriving (Show, Data, Typeable, Eq, Ord, Generic)
deriving (Show, Data, Eq, Ord, Generic)

instance NFData ContentItemType
instance Binary ContentItemType
Expand All @@ -56,23 +56,23 @@ data ContentInfo = ContentInfo {
,contentUrl :: !URL
,contentGitUrl :: !URL
,contentHtmlUrl :: !URL
} deriving (Show, Data, Typeable, Eq, Ord, Generic)
} deriving (Show, Data, Eq, Ord, Generic)

instance NFData ContentInfo
instance Binary ContentInfo

data ContentResultInfo = ContentResultInfo
{ contentResultInfo :: !ContentInfo
, contentResultSize :: !Int
} deriving (Show, Data, Typeable, Eq, Ord, Generic)
} deriving (Show, Data, Eq, Ord, Generic)

instance NFData ContentResultInfo
instance Binary ContentResultInfo

data ContentResult = ContentResult
{ contentResultContent :: !ContentResultInfo
, contentResultCommit :: !GitCommit
} deriving (Show, Data, Typeable, Eq, Ord, Generic)
} deriving (Show, Data, Eq, Ord, Generic)

instance NFData ContentResult
instance Binary ContentResult
Expand All @@ -81,7 +81,7 @@ data Author = Author
{ authorName :: !Text
, authorEmail :: !Text
}
deriving (Eq, Ord, Show, Data, Typeable, Generic)
deriving (Eq, Ord, Show, Data, Generic)

instance NFData Author
instance Binary Author
Expand All @@ -94,7 +94,7 @@ data CreateFile = CreateFile
, createFileAuthor :: !(Maybe Author)
, createFileCommitter :: !(Maybe Author)
}
deriving (Eq, Ord, Show, Data, Typeable, Generic)
deriving (Eq, Ord, Show, Data, Generic)

instance NFData CreateFile
instance Binary CreateFile
Expand All @@ -108,7 +108,7 @@ data UpdateFile = UpdateFile
, updateFileAuthor :: !(Maybe Author)
, updateFileCommitter :: !(Maybe Author)
}
deriving (Eq, Ord, Show, Data, Typeable, Generic)
deriving (Eq, Ord, Show, Data, Generic)

instance NFData UpdateFile
instance Binary UpdateFile
Expand All @@ -121,7 +121,7 @@ data DeleteFile = DeleteFile
, deleteFileAuthor :: !(Maybe Author)
, deleteFileCommitter :: !(Maybe Author)
}
deriving (Eq, Ord, Show, Data, Typeable, Generic)
deriving (Eq, Ord, Show, Data, Generic)

instance NFData DeleteFile
instance Binary DeleteFile
Expand Down
Loading