Make the build process look nicer
This commit is contained in:
parent
11f5f5263c
commit
a40cd3cc06
2 changed files with 4 additions and 3 deletions
6
Setup.hs
6
Setup.hs
|
@ -130,13 +130,13 @@ compileLibraries lbi = do
|
|||
arg = Just [("Elm_datadir", rtd_c)]
|
||||
handle <- runProcess elm_c args Nothing arg Nothing Nothing Nothing
|
||||
exitCode <- waitForProcess handle
|
||||
rawSystem doc_c [file]
|
||||
return ( out_c </> replaceExtension file "elmo"
|
||||
, out_c </> replaceExtension file "elmi")
|
||||
|
||||
setCurrentDirectory "libraries"
|
||||
files <- getFiles ".elm" "."
|
||||
files <- unzip `fmap` mapM make files
|
||||
paths <- getFiles ".elm" "."
|
||||
files <- unzip `fmap` mapM make paths
|
||||
mapM_ (\path -> rawSystem doc_c [path]) paths
|
||||
setCurrentDirectory ".."
|
||||
return files
|
||||
|
||||
|
|
|
@ -1,4 +1,5 @@
|
|||
module Prelude where
|
||||
{-| Everything that is automatically imported -}
|
||||
|
||||
import Basics (String)
|
||||
import Maybe (Maybe)
|
||||
|
|
Loading…
Reference in a new issue