explicit imports for Matching
This commit is contained in:
parent
43d78398bb
commit
04dc5aed10
@ -5,7 +5,17 @@ Currently used only by hledger-web.
|
|||||||
|
|
||||||
-}
|
-}
|
||||||
|
|
||||||
module Hledger.Data.Query
|
module Hledger.Data.Query (
|
||||||
|
Matcher(..),
|
||||||
|
matcherIsNull,
|
||||||
|
matcherIsStartDateOnly,
|
||||||
|
matcherStartDate,
|
||||||
|
matchesTransaction,
|
||||||
|
matchesPosting,
|
||||||
|
inAccount,
|
||||||
|
inAccountMatcher,
|
||||||
|
tests_Hledger_Data_Query
|
||||||
|
)
|
||||||
where
|
where
|
||||||
import Data.Either
|
import Data.Either
|
||||||
import Data.List
|
import Data.List
|
||||||
@ -176,9 +186,9 @@ parseBool s = s `elem` truestrings
|
|||||||
truestrings :: [String]
|
truestrings :: [String]
|
||||||
truestrings = ["1","t","true"]
|
truestrings = ["1","t","true"]
|
||||||
|
|
||||||
-- | Convert a match expression to its inverse.
|
-- -- | Convert a match expression to its inverse.
|
||||||
negateMatcher :: Matcher -> Matcher
|
-- negateMatcher :: Matcher -> Matcher
|
||||||
negateMatcher = MatchNot
|
-- negateMatcher = MatchNot
|
||||||
|
|
||||||
-- | Does the match expression match this posting ?
|
-- | Does the match expression match this posting ?
|
||||||
matchesPosting :: Matcher -> Posting -> Bool
|
matchesPosting :: Matcher -> Posting -> Bool
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user