Try a fix

This commit is contained in:
Tissevert 2020-12-08 12:57:30 +01:00
parent cbd6800938
commit d24d76b6cf

View file

@ -1,8 +1,11 @@
{-# LANGUAGE NamedFieldPuns #-} {-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE CPP #-}
module Main where module Main where
import Control.Applicative (many, optional) import Control.Applicative (many, optional)
#if !MIN_VERSION_base(4,11,0)
import Data.Monoid ((<>)) import Data.Monoid ((<>))
#endif
import qualified Data.Text as Text (unpack) import qualified Data.Text as Text (unpack)
import Data.Version (showVersion) import Data.Version (showVersion)
import Options.Applicative ( import Options.Applicative (