{-# LANGUAGE NoImplicitPrelude #-}
module Stack.Types.StackYamlLoc
( StackYamlLoc (..)
) where
import Stack.Prelude
data StackYamlLoc
= SYLDefault
| SYLOverride !(Path Abs File)
| SYLNoProject ![PackageIdentifierRevision]
| SYLGlobalProject
deriving Int -> StackYamlLoc -> ShowS
[StackYamlLoc] -> ShowS
StackYamlLoc -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [StackYamlLoc] -> ShowS
$cshowList :: [StackYamlLoc] -> ShowS
show :: StackYamlLoc -> String
$cshow :: StackYamlLoc -> String
showsPrec :: Int -> StackYamlLoc -> ShowS
$cshowsPrec :: Int -> StackYamlLoc -> ShowS
Show