aboutsummaryrefslogtreecommitdiff
path: root/Database
diff options
context:
space:
mode:
authorGravatar Benjamin Barenblat <bbarenblat@gmail.com>2022-01-19 13:42:04 -0500
committerGravatar Benjamin Barenblat <bbarenblat@gmail.com>2022-01-19 13:42:56 -0500
commit7b9f3501a40155ac05ea5b4fcda21e7f06d477ee (patch)
tree76caaaa2db7b085f94db07236841dc904ec39540 /Database
parenta9b9e5d0d72c2348580dbac5533b89a45abd8938 (diff)
Support more language extensions for persistent
Recent persistent requires more language extensions to generate entities. Turn them on where appropriate.
Diffstat (limited to 'Database')
-rw-r--r--Database/Export.hs4
-rw-r--r--Database/Fsck.hs4
-rw-r--r--Database/Keys/SQL.hs5
3 files changed, 10 insertions, 3 deletions
diff --git a/Database/Export.hs b/Database/Export.hs
index a41048993..bc4e268b2 100644
--- a/Database/Export.hs
+++ b/Database/Export.hs
@@ -1,6 +1,7 @@
{- Sqlite database used for exports to special remotes.
-
- Copyright 2017 Joey Hess <id@joeyh.name>
+ - Copyright 2022 Benjamin Barenblat <bbarenblat@gmail.com>
-:
- Licensed under the GNU GPL version 3 or higher.
-}
@@ -8,7 +9,8 @@
{-# LANGUAGE QuasiQuotes, TypeFamilies, TemplateHaskell #-}
{-# LANGUAGE OverloadedStrings, GADTs, FlexibleContexts #-}
{-# LANGUAGE MultiParamTypeClasses, GeneralizedNewtypeDeriving #-}
-{-# LANGUAGE RankNTypes #-}
+{-# LANGUAGE RankNTypes, DerivingStrategies, StandaloneDeriving #-}
+{-# LANGUAGE UndecidableInstances, DataKinds, FlexibleInstances #-}
{-# LANGUAGE CPP #-}
module Database.Export (
diff --git a/Database/Fsck.hs b/Database/Fsck.hs
index 1ce513dcf..f2fe1acf6 100644
--- a/Database/Fsck.hs
+++ b/Database/Fsck.hs
@@ -1,6 +1,7 @@
{- Sqlite database used for incremental fsck.
-
- Copyright 2015 Joey Hess <id@joeyh.name>
+ - Copyright 2022 Benjamin Barenblat <bbarenblat@gmail.com>
-:
- Licensed under the GNU GPL version 3 or higher.
-}
@@ -8,7 +9,8 @@
{-# LANGUAGE QuasiQuotes, TypeFamilies, TemplateHaskell #-}
{-# LANGUAGE OverloadedStrings, GADTs, FlexibleContexts #-}
{-# LANGUAGE MultiParamTypeClasses, GeneralizedNewtypeDeriving #-}
-{-# LANGUAGE RankNTypes #-}
+{-# LANGUAGE RankNTypes, DerivingStrategies, StandaloneDeriving #-}
+{-# LANGUAGE UndecidableInstances, DataKinds, FlexibleInstances #-}
module Database.Fsck (
FsckHandle,
diff --git a/Database/Keys/SQL.hs b/Database/Keys/SQL.hs
index 77c1e4429..23a555554 100644
--- a/Database/Keys/SQL.hs
+++ b/Database/Keys/SQL.hs
@@ -1,6 +1,7 @@
{- Sqlite database of information about Keys
-
- Copyright 2015-2016 Joey Hess <id@joeyh.name>
+ - Copyright 2022 Benjamin Barenblat <bbarenblat@gmail.com>
-
- Licensed under the GNU GPL version 3 or higher.
-}
@@ -8,7 +9,9 @@
{-# LANGUAGE QuasiQuotes, TypeFamilies, TemplateHaskell #-}
{-# LANGUAGE OverloadedStrings, GADTs, FlexibleContexts #-}
{-# LANGUAGE MultiParamTypeClasses, GeneralizedNewtypeDeriving #-}
-{-# LANGUAGE RankNTypes, ScopedTypeVariables #-}
+{-# LANGUAGE RankNTypes, ScopedTypeVariables, DerivingStrategies #-}
+{-# LANGUAGE StandaloneDeriving, UndecidableInstances, DataKinds #-}
+{-# LANGUAGE FlexibleInstances #-}
module Database.Keys.SQL where