git.iko.soy/elk
on 63243ca help sign in
elk/compiler/Build/Utils.hs
21 lines 637 B history raw
1{-# OPTIONS_GHC -W #-}
2module Build.Utils where
4import System.FilePath ((</>), replaceExtension)
5import qualified Build.Flags as Flag
7buildPath :: Flag.Flags -> FilePath -> String -> FilePath
8buildPath flags filePath ext =
9 Flag.build_dir flags </> replaceExtension filePath ext
11cachePath :: Flag.Flags -> FilePath -> String -> FilePath
12cachePath flags filePath ext =
13 Flag.cache_dir flags </> replaceExtension filePath ext
15elmo :: Flag.Flags -> FilePath -> FilePath
16elmo flags filePath =
17 cachePath flags filePath "elmo"
19elmi :: Flag.Flags -> FilePath -> FilePath
20elmi flags filePath =
21 cachePath flags filePath "elmi"