switch to GHC2024
This commit is contained in:
parent
5031058bde
commit
d06f749b8c
5 changed files with 8 additions and 24 deletions
|
@ -1,4 +1,4 @@
|
||||||
{-# LANGUAGE TemplateHaskell #-}
|
{-# LANGUAGE PatternSynonyms, TemplateHaskell #-}
|
||||||
module BuilderQQ
|
module BuilderQQ
|
||||||
(b,
|
(b,
|
||||||
Builder, toStrictText, toLazyText, fromText, fromString, fromChar,
|
Builder, toStrictText, toLazyText, fromText, fromString, fromChar,
|
||||||
|
|
|
@ -1,4 +1,4 @@
|
||||||
{-# LANGUAGE CPP, ImplicitParams, TypeApplications #-}
|
{-# LANGUAGE CPP, ImplicitParams #-}
|
||||||
module Main (main) where
|
module Main (main) where
|
||||||
|
|
||||||
import Control.Monad
|
import Control.Monad
|
||||||
|
|
|
@ -1,5 +1,4 @@
|
||||||
{-# OPTIONS_GHC -Wno-orphans #-}
|
{-# OPTIONS_GHC -Wno-orphans #-}
|
||||||
{-# LANGUAGE MultiParamTypeClasses, ScopedTypeVariables, TypeApplications #-}
|
|
||||||
module Records (HasField (..)) where
|
module Records (HasField (..)) where
|
||||||
|
|
||||||
import GHC.Records
|
import GHC.Records
|
||||||
|
|
|
@ -250,9 +250,10 @@ makeButtonBar title images =
|
||||||
| [(_, imgs)] <- cats ->
|
| [(_, imgs)] <- cats ->
|
||||||
makeButtonBar title (Uncat imgs)
|
makeButtonBar title (Uncat imgs)
|
||||||
| otherwise ->
|
| otherwise ->
|
||||||
makeNav "cat" $ map (uncurry makeCat) cats
|
makeNav "cat" $ map (uncurry makeCat) cats
|
||||||
where
|
where
|
||||||
makeNav (cls :: Text) inner = [b|@0
|
makeNav :: CanBuild b => Text -> b -> Builder
|
||||||
|
makeNav cls inner = [b|@0
|
||||||
<nav id=alts class=$cls aria-label="alternate versions">
|
<nav id=alts class=$cls aria-label="alternate versions">
|
||||||
$2.inner
|
$2.inner
|
||||||
$2.skipAll
|
$2.skipAll
|
||||||
|
|
|
@ -26,39 +26,23 @@ executable make-pages
|
||||||
RSS,
|
RSS,
|
||||||
ListTags,
|
ListTags,
|
||||||
Options
|
Options
|
||||||
default-language: Haskell2010
|
default-language: GHC2024
|
||||||
default-extensions:
|
default-extensions:
|
||||||
BlockArguments,
|
BlockArguments,
|
||||||
ConstraintKinds,
|
|
||||||
DataKinds,
|
|
||||||
DeriveAnyClass,
|
DeriveAnyClass,
|
||||||
DeriveTraversable,
|
|
||||||
DerivingStrategies,
|
|
||||||
DerivingVia,
|
DerivingVia,
|
||||||
DuplicateRecordFields,
|
DuplicateRecordFields,
|
||||||
FlexibleContexts,
|
|
||||||
FlexibleInstances,
|
|
||||||
GeneralizedNewtypeDeriving,
|
|
||||||
LambdaCase,
|
|
||||||
NamedFieldPuns,
|
|
||||||
OverloadedLabels,
|
OverloadedLabels,
|
||||||
OverloadedLists,
|
OverloadedLists,
|
||||||
OverloadedStrings,
|
OverloadedStrings,
|
||||||
PatternSynonyms,
|
|
||||||
QuasiQuotes,
|
QuasiQuotes,
|
||||||
RankNTypes,
|
|
||||||
ScopedTypeVariables,
|
|
||||||
StandaloneDeriving,
|
|
||||||
TupleSections,
|
|
||||||
TypeSynonymInstances,
|
TypeSynonymInstances,
|
||||||
ViewPatterns
|
ViewPatterns
|
||||||
other-extensions:
|
other-extensions:
|
||||||
|
PatternSynonyms,
|
||||||
CPP,
|
CPP,
|
||||||
ImplicitParams,
|
ImplicitParams,
|
||||||
MultiParamTypeClasses,
|
TemplateHaskell
|
||||||
ScopedTypeVariables,
|
|
||||||
TemplateHaskell,
|
|
||||||
TypeApplications
|
|
||||||
build-depends:
|
build-depends:
|
||||||
base >= 4.16.4 && < 4.21,
|
base >= 4.16.4 && < 4.21,
|
||||||
bytestring >= 0.11.3.1 && < 0.14,
|
bytestring >= 0.11.3.1 && < 0.14,
|
||||||
|
|
Loading…
Reference in a new issue