mirror of
https://github.com/wasp-lang/wasp.git
synced 2024-11-27 14:55:20 +03:00
43 lines
1.4 KiB
Haskell
43 lines
1.4 KiB
Haskell
module Cli.Common
|
|
( WaspProjectDir,
|
|
DotWaspDir,
|
|
CliTemplatesDir,
|
|
dotWaspDirInWaspProjectDir,
|
|
dotWaspRootFileInWaspProjectDir,
|
|
extCodeDirInWaspProjectDir,
|
|
generatedCodeDirInDotWaspDir,
|
|
buildDirInDotWaspDir,
|
|
waspSays,
|
|
)
|
|
where
|
|
|
|
import Common (WaspProjectDir)
|
|
import ExternalCode (SourceExternalCodeDir)
|
|
import qualified Generator.Common
|
|
import StrongPath (Dir, File', Path', Rel, reldir, relfile)
|
|
import qualified Util.Terminal as Term
|
|
|
|
data DotWaspDir -- Here we put everything that wasp generates.
|
|
|
|
data CliTemplatesDir
|
|
|
|
-- TODO: SHould this be renamed to include word "root"?
|
|
dotWaspDirInWaspProjectDir :: Path' (Rel WaspProjectDir) (Dir DotWaspDir)
|
|
dotWaspDirInWaspProjectDir = [reldir|.wasp|]
|
|
|
|
-- TODO: Hm this has different name than it has in Generator.
|
|
generatedCodeDirInDotWaspDir :: Path' (Rel DotWaspDir) (Dir Generator.Common.ProjectRootDir)
|
|
generatedCodeDirInDotWaspDir = [reldir|out|]
|
|
|
|
buildDirInDotWaspDir :: Path' (Rel DotWaspDir) (Dir Generator.Common.ProjectRootDir)
|
|
buildDirInDotWaspDir = [reldir|build|]
|
|
|
|
dotWaspRootFileInWaspProjectDir :: Path' (Rel WaspProjectDir) File'
|
|
dotWaspRootFileInWaspProjectDir = [relfile|.wasproot|]
|
|
|
|
extCodeDirInWaspProjectDir :: Path' (Rel WaspProjectDir) (Dir SourceExternalCodeDir)
|
|
extCodeDirInWaspProjectDir = [reldir|ext|]
|
|
|
|
waspSays :: String -> IO ()
|
|
waspSays what = putStrLn $ Term.applyStyles [Term.Yellow] what
|