Skip to content

Commit 5a5f2f8

Browse files
hyperfektnmattia
hyperfekt
authored andcommitted
allow compiling Snack binary with >= GHC 8.6
This removes the need for projects employing Snack without a binary cache to use two different compilers.
1 parent 68994e0 commit 5a5f2f8

File tree

1 file changed

+7
-2
lines changed

1 file changed

+7
-2
lines changed

bin/Snack.hs

+7-2
Original file line numberDiff line numberDiff line change
@@ -1,5 +1,5 @@
1+
{-# LANGUAGE CPP #-}
12
{-# LANGUAGE DerivingStrategies #-}
2-
{-# LANGUAGE MonadFailDesugaring #-}
33
{-# LANGUAGE ScopedTypeVariables #-}
44
{-# LANGUAGE GeneralizedNewtypeDeriving #-}
55
{-# LANGUAGE LambdaCase #-}
@@ -9,6 +9,9 @@
99
{-# LANGUAGE TemplateHaskell #-}
1010
{-# LANGUAGE DataKinds #-}
1111
{-# LANGUAGE TypeFamilies #-}
12+
#if __GLASGOW_HASKELL__ < 806
13+
{-# LANGUAGE MonadFailDesugaring #-}
14+
#endif
1215

1316
module Main (main) where
1417

@@ -19,7 +22,6 @@ import Data.Aeson (FromJSON, (.:))
1922
import Data.FileEmbed (embedStringFile)
2023
import Data.List (intercalate)
2124
import Data.Maybe (mapMaybe)
22-
import Data.Semigroup ((<>))
2325
import Data.String.Interpolate
2426
import Shelly (Sh)
2527
import System.Directory (doesFileExist, doesPathExist, canonicalizePath)
@@ -32,6 +34,9 @@ import qualified Data.Map as Map
3234
import qualified Data.Text as T
3335
import qualified Options.Applicative as Opts
3436
import qualified Shelly as S
37+
#if !MIN_VERSION_base(4,11,0)
38+
import Data.Semigroup ((<>))
39+
#endif
3540

3641
main :: IO ()
3742
main = do

0 commit comments

Comments
 (0)