mirror of
https://github.com/digital-asset/daml.git
synced 2024-11-10 10:46:11 +03:00
Make daml-ghc test easier to debug by removing parallelism (#899)
I often end up in situations where I need to to look at the GHC Core or the DAML-LF before type checking. In the current parallel setting they ususally don't get written to disk before the first error pops up. By running the compiler stages one after another, we make sure that the outputs of successful stages can be written to disk before starting the next stage.
This commit is contained in:
parent
aacb94d798
commit
f155dbebee
@ -299,20 +299,15 @@ mainProj TestArguments{..} service outdir log file = do
|
||||
let lfPrettyPrint = timed log "LF pretty-printing" . liftIO . writeFile (outdir </> proj <.> "pdalf") . renderPretty
|
||||
|
||||
Compile.setFilesOfInterest service (Set.singleton file)
|
||||
pkg <- Compile.runAction service $ lfTypeCheck log file
|
||||
void $ Compile.runActions service
|
||||
[do
|
||||
Compile.runAction service $ do
|
||||
cores <- ghcCompile log file
|
||||
corePrettyPrint cores
|
||||
,do
|
||||
lf <- lfConvert log file
|
||||
lfPrettyPrint lf
|
||||
,do
|
||||
lf <- lfTypeCheck log file
|
||||
lfSave lf
|
||||
lfRunScenarios log file
|
||||
]
|
||||
pure pkg
|
||||
pure lf
|
||||
|
||||
unjust :: Action (Maybe b) -> Action b
|
||||
unjust act = do
|
||||
|
Loading…
Reference in New Issue
Block a user