bin: check: fix weird hashbang error (#1072)
Hashbangs and CPP on mac don't mix well. https://gitlab.haskell.org/ghc/ghc/issues/6132 [ci skip]
This commit is contained in:
		
							parent
							
								
									45bb513eb8
								
							
						
					
					
						commit
						a5cae2a859
					
				| @ -1,5 +1,6 @@ | |||||||
| #!/usr/bin/env stack | #!/usr/bin/env stack | ||||||
| {- stack runghc --verbosity info | {- stack runghc --verbosity info | ||||||
|  |   --package base-compat | ||||||
|   --package filepath |   --package filepath | ||||||
|   --package hledger-lib |   --package hledger-lib | ||||||
|   --package optparse-applicative |   --package optparse-applicative | ||||||
| @ -76,7 +77,8 @@ hledger-check "(assets:overdraft  < £2000) ==> (*assets:checking  == £0)" | |||||||
| "If I have taken money from my overdraft, then I must have no money in | "If I have taken money from my overdraft, then I must have no money in | ||||||
| my checking account (including subaccounts)." | my checking account (including subaccounts)." | ||||||
| -} | -} | ||||||
| {-# LANGUAGE CPP #-} | 
 | ||||||
|  | {-# LANGUAGE PackageImports #-} | ||||||
| 
 | 
 | ||||||
| module Main where | module Main where | ||||||
| 
 | 
 | ||||||
| @ -90,9 +92,6 @@ import Data.Functor.Identity (Identity(..)) | |||||||
| import Data.List (foldl', groupBy, intercalate, nub, sortOn) | import Data.List (foldl', groupBy, intercalate, nub, sortOn) | ||||||
| import Data.List.NonEmpty (NonEmpty(..), nonEmpty, toList) | import Data.List.NonEmpty (NonEmpty(..), nonEmpty, toList) | ||||||
| import Data.Maybe (fromMaybe, mapMaybe) | import Data.Maybe (fromMaybe, mapMaybe) | ||||||
| #if !(MIN_VERSION_base(4,11,0)) |  | ||||||
| import Data.Monoid ((<>)) |  | ||||||
| #endif |  | ||||||
| import Data.Time.Calendar (toGregorian) | import Data.Time.Calendar (toGregorian) | ||||||
| import Data.Time.Calendar.OrdinalDate (mondayStartWeek, sundayStartWeek, toOrdinalDate) | import Data.Time.Calendar.OrdinalDate (mondayStartWeek, sundayStartWeek, toOrdinalDate) | ||||||
| import Data.Text (isPrefixOf, pack, unpack) | import Data.Text (isPrefixOf, pack, unpack) | ||||||
| @ -101,6 +100,7 @@ import qualified Hledger.Query as H | |||||||
| import qualified Hledger.Read as H | import qualified Hledger.Read as H | ||||||
| import qualified Hledger.Utils.Parse as H | import qualified Hledger.Utils.Parse as H | ||||||
| import Options.Applicative | import Options.Applicative | ||||||
|  | import "base-compat" Prelude.Compat ((<>)) | ||||||
| import System.Exit (exitFailure) | import System.Exit (exitFailure) | ||||||
| import System.FilePath (FilePath) | import System.FilePath (FilePath) | ||||||
| import qualified Text.Megaparsec as P | import qualified Text.Megaparsec as P | ||||||
|  | |||||||
		Loading…
	
		Reference in New Issue
	
	Block a user