Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Menu
Open sidebar
Glasgow Haskell Compiler
GHC
Commits
5f8abc4b
Commit
5f8abc4b
authored
Aug 02, 2015
by
Andrey Mokhov
Browse files
Clean up rules.
parent
c677b049
Changes
3
Hide whitespace changes
Inline
Side-by-side
src/Rules/Config.hs
View file @
5f8abc4b
...
...
@@ -7,10 +7,10 @@ configRules :: Rules ()
configRules
=
do
configPath
-/-
"system.config"
%>
\
out
->
do
need
[
configPath
-/-
"system.config.in"
,
"configure"
]
put
Coloured
White
"Running configure..."
put
Build
"Running configure..."
cmd
"bash configure"
-- TODO: get rid of 'bash'
"configure"
%>
\
out
->
do
copyFile'
(
configPath
-/-
"configure.ac"
)
"configure.ac"
put
Coloured
White
$
"Running autoconf..."
put
Build
"Running autoconf..."
cmd
"bash autoconf"
-- TODO: get rid of 'bash'
src/Rules/Dependencies.hs
View file @
5f8abc4b
...
...
@@ -26,7 +26,9 @@ buildPackageDependencies _ target =
(
buildPath
-/-
"c.deps"
)
%>
\
file
->
do
srcs
<-
pkgDataList
$
CSrcs
path
deps
<-
forM
srcs
$
\
src
->
readFile'
$
buildPath
-/-
src
<.>
"deps"
let
depFiles
=
[
buildPath
-/-
src
<.>
"deps"
|
src
<-
srcs
]
need
depFiles
-- increase parallelism by needing all at once
deps
<-
mapM
readFile'
depFiles
writeFileChanged
file
(
concat
deps
)
(
buildPath
-/-
"haskell.deps"
)
%>
\
file
->
do
...
...
src/Util.hs
View file @
5f8abc4b
...
...
@@ -64,7 +64,6 @@ putOracle = putColoured Blue
putBuild
::
String
->
Action
()
putBuild
=
putColoured
White
-- A more colourful version of error
redError
::
String
->
Action
a
redError
msg
=
do
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment