Searched refs:FirstTrue (Results 1 – 7 of 7) sorted by relevance
| /dports/devel/stack/stack-2.7.3/src/Stack/ |
| H A D | Prelude.hs | 17 , FirstTrue (..)
178 newtype FirstTrue = FirstTrue { getFirstTrue :: Maybe Bool } type
180 instance Semigroup FirstTrue where
181 FirstTrue (Just x) <> _ = FirstTrue (Just x) function
182 FirstTrue Nothing <> x = x function
183 instance Monoid FirstTrue where
184 mempty = FirstTrue Nothing
188 fromFirstTrue :: FirstTrue -> Bool
192 defaultFirstTrue :: (a -> FirstTrue) -> Bool
|
| H A D | Script.hs | 82 { configMonoidInstallGHC = FirstTrue $ Just True
|
| /dports/devel/stack/stack-2.7.3/src/Stack/Types/Config/ |
| H A D | Build.hs | 193 , buildMonoidLibStrip :: !FirstTrue
194 , buildMonoidExeStrip :: !FirstTrue
200 , buildMonoidHaddockHyperlinkSource :: !FirstTrue
215 , buildMonoidInterleavedOutput :: !FirstTrue
226 buildMonoidLibStrip <- FirstTrue <$> o ..:? buildMonoidLibStripArgName
227 buildMonoidExeStrip <-FirstTrue <$> o ..:? buildMonoidExeStripArgName
233 … buildMonoidHaddockHyperlinkSource <- FirstTrue <$> o ..:? buildMonoidHaddockHyperlinkSourceArgName
248 buildMonoidInterleavedOutput <- FirstTrue <$> o ..:? buildMonoidInterleavedOutputName
369 { toMonoidRerunTests :: !FirstTrue
378 (\o -> do toMonoidRerunTests <- FirstTrue <$> o ..:? toMonoidRerunTestsArgName
|
| /dports/devel/stack/stack-2.7.3/src/Options/Applicative/Builder/ |
| H A D | Extra.hs | 79 firstBoolFlagsTrue :: String -> String -> Mod FlagFields FirstTrue -> Parser FirstTrue
81 enableDisableFlags mempty (FirstTrue (Just True)) (FirstTrue (Just False))
184 optionalFirstTrue :: Alternative f => f Bool -> f FirstTrue
185 optionalFirstTrue = fmap FirstTrue . optional
|
| /dports/devel/stack/stack-2.7.3/src/Stack/Config/ |
| H A D | Build.hs | 21 FirstTrue (if noStripping then Just False else Nothing))
24 FirstTrue (if noStripping then Just False else Nothing))
|
| /dports/devel/stack/stack-2.7.3/src/Stack/Types/ |
| H A D | Config.hs | 582 , globalMonoidTimeInLog :: !FirstTrue -- ^ Whether to include timings in logs.
769 , configMonoidHideTHLoading :: !FirstTrue
779 ,configMonoidInstallGHC :: !FirstTrue
837 ,configMonoidModifyCodePage :: !FirstTrue
860 , configMonoidHideSourcePaths :: !FirstTrue
862 , configMonoidRecommendUpgrade :: !FirstTrue
894 configMonoidHideTHLoading <- FirstTrue <$> obj ..:? configMonoidHideTHLoadingName
908 configMonoidInstallGHC <- FirstTrue <$> obj ..:? configMonoidInstallGHCName
966 configMonoidModifyCodePage <- FirstTrue <$> obj ..:? configMonoidModifyCodePageName
986 configMonoidHideSourcePaths <- FirstTrue <$> obj ..:? configMonoidHideSourcePathsName
[all …]
|
| H A D | Docker.hs | 80 ,dockerMonoidAutoPull :: !FirstTrue
121 dockerMonoidAutoPull <- FirstTrue <$> o ..:? dockerAutoPullArgName
|