Switch from template-haskell to template-haskell-lift

lib/Data/Time/Calendar/CalendarDiffDays.hs

@@ -5,7 +5,7 @@ module Data.Time.Calendar.CalendarDiffDays where
 import Control.DeepSeq
 import Data.Data
 import GHC.Generics
-import Language.Haskell.TH.Syntax qualified as TH
+import Language.Haskell.TH.Lift qualified as TH
 
 data CalendarDiffDays = CalendarDiffDays
     { cdMonths :: Integer

lib/Data/Time/Calendar/Days.hs

@@ -7,7 +7,7 @@ import Data.Data
 import Data.Ix
 import Data.Time.Calendar.Private
 import GHC.Generics
-import Language.Haskell.TH.Syntax qualified as TH
+import Language.Haskell.TH.Lift qualified as TH
 
 -- | The Modified Julian Day is a standard count of days, with zero being the day 1858-11-17.
 newtype Day = ModifiedJulianDay

lib/Data/Time/Calendar/Month.hs

@@ -20,7 +20,7 @@ import Data.Time.Calendar.Gregorian
 import Data.Time.Calendar.Private
 import Data.Time.Calendar.Types
 import GHC.Generics
-import Language.Haskell.TH.Syntax qualified as TH
+import Language.Haskell.TH.Lift qualified as TH
 import Text.ParserCombinators.ReadP
 import Text.Read
 

lib/Data/Time/Calendar/Quarter.hs

@@ -23,7 +23,7 @@ import Data.Time.Calendar.Month
 import Data.Time.Calendar.Private
 import Data.Time.Calendar.Types
 import GHC.Generics
-import Language.Haskell.TH.Syntax qualified as TH
+import Language.Haskell.TH.Lift qualified as TH
 import Text.ParserCombinators.ReadP
 import Text.Read
 

lib/Data/Time/Calendar/Week.hs

@@ -8,7 +8,7 @@ import Data.Fixed
 import Data.Ix
 import Data.Time.Calendar.Days
 import GHC.Generics
-import Language.Haskell.TH.Syntax qualified as TH
+import Language.Haskell.TH.Lift qualified as TH
 
 data DayOfWeek
     = Monday

lib/Data/Time/Calendar/WeekDate.hs

@@ -23,7 +23,7 @@ import Data.Time.Calendar.Days
 import Data.Time.Calendar.OrdinalDate
 import Data.Time.Calendar.Private
 import Data.Time.Calendar.Week
-import Language.Haskell.TH.Syntax qualified as TH
+import Language.Haskell.TH.Lift qualified as TH
 
 data FirstWeekType
     = -- | first week is the first whole week of the year

lib/Data/Time/Clock/Internal/AbsoluteTime.hs

@@ -7,7 +7,7 @@ import Control.DeepSeq
 import Data.Data
 import Data.Time.Calendar.Days
 import Data.Time.Clock.Internal.DiffTime
-import Language.Haskell.TH.Syntax qualified as TH
+import Language.Haskell.TH.Lift qualified as TH
 
 -- | AbsoluteTime is TAI, time as measured by a clock.
 newtype AbsoluteTime

lib/Data/Time/Clock/Internal/DiffTime.hs

@@ -9,7 +9,7 @@ import Data.Fixed
 #ifdef __GLASGOW_HASKELL__
 import GHC.Read
 #endif
-import Language.Haskell.TH.Syntax qualified as TH
+import Language.Haskell.TH.Lift qualified as TH
 import Text.ParserCombinators.ReadP
 import Text.Read
 

lib/Data/Time/Clock/Internal/NominalDiffTime.hs

@@ -10,7 +10,7 @@ import Data.Fixed
 import GHC.Read
 #endif
 import Data.Time.Clock.Internal.DiffTime
-import Language.Haskell.TH.Syntax qualified as TH
+import Language.Haskell.TH.Lift qualified as TH
 import Text.ParserCombinators.ReadP
 import Text.ParserCombinators.ReadPrec
 

lib/Data/Time/Clock/Internal/SystemTime.hs

@@ -23,7 +23,7 @@ import Data.Int (Int64)
 import Data.Time.Clock.Internal.DiffTime
 import Data.Word
 import GHC.Generics
-import Language.Haskell.TH.Syntax qualified as TH
+import Language.Haskell.TH.Lift qualified as TH
 
 #ifdef mingw32_HOST_OS
 import qualified System.Win32.Time as Win32

lib/Data/Time/Clock/Internal/UTCTime.hs

@@ -7,7 +7,7 @@ import Data.Data
 import Data.Time.Calendar.Days
 import Data.Time.Clock.Internal.DiffTime
 import GHC.Generics
-import Language.Haskell.TH.Syntax qualified as TH
+import Language.Haskell.TH.Lift qualified as TH
 
 -- | This is the simplest representation of UTC.
 -- It consists of the day number, and a time offset from midnight.

lib/Data/Time/Clock/Internal/UniversalTime.hs

@@ -5,7 +5,7 @@ module Data.Time.Clock.Internal.UniversalTime where
 import Control.DeepSeq
 import Data.Data
 import GHC.Generics
-import Language.Haskell.TH.Syntax qualified as TH
+import Language.Haskell.TH.Lift qualified as TH
 
 -- | The Modified Julian Date is the day with the fraction of the day, measured from UT midnight.
 -- It's used to represent UT1, which is time as measured by the earth's rotation, adjusted for various wobbles.

time.cabal

@@ -55,7 +55,7 @@ library
         base >= 4.19 && < 5,
         deepseq >= 1.1,
     if impl(ghc)
-        build-depends: template-haskell >= 2.17,
+        build-depends: template-haskell-lift >= 0.1 && <0.2,
     if os(windows)
         build-depends: Win32
     exposed-modules:
@@ -175,7 +175,7 @@ test-suite test-main
         tasty,
         tasty-hunit,
         tasty-quickcheck,
-        template-haskell
+        template-haskell-lift
     main-is: Main.hs
     other-modules:
         Test.Types