Sven Tennie pushed to branch wip/supersven/hadrian-cross-stage3 at Glasgow Haskell Compiler / GHC
Commits:
-
b2d34f97
by Sven Tennie at 2026-10-11T00:05:25+02:00
1 changed file:
Changes:
| ... | ... | @@ -287,7 +287,9 @@ generateRules = do |
| 287 | 287 | isCrossStage <- if compilerStage < Stage3
|
| 288 | 288 | then expr (crossStage compilerStage)
|
| 289 | 289 | else pure False
|
| 290 | - let libraryStage = if isCrossStage then succStage compilerStage else compilerStage
|
|
| 290 | + let libraryStage = case compilerStage of
|
|
| 291 | + Stage0 {} -> Stage1
|
|
| 292 | + _ -> if isCrossStage then succStage compilerStage else compilerStage
|
|
| 291 | 293 | tgt <- expr (targetStage libraryStage)
|
| 292 | 294 | pure $ show tgt { tgtLocallyExecutable = not isCrossStage }
|
| 293 | 295 |