1
0
mirror of https://github.com/KarolS/millfork.git synced 2025-03-23 03:29:29 +00:00

6502: Fix stack overflow

This commit is contained in:
Karol Stasiak 2019-08-03 20:32:45 +02:00
parent 48220f739d
commit 515da587d8

@ -1106,7 +1106,7 @@ object VariableToRegisterOptimization extends AssemblyOptimization[AssemblyLine]
case (AssemblyLine(TZA, _, _, _, s), _) :: xs if aCandidate.isDefined =>
tailcall(inlineVars(xCandidate, yCandidate, zCandidate, aCandidate, features, xs)).map(AssemblyLine.immediate(CPZ, 0).pos(s) :: _)
case (x, _) :: xs => inlineVars(xCandidate, yCandidate, zCandidate, aCandidate, features, xs).map(x :: _)
case (x, _) :: xs => tailcall(inlineVars(xCandidate, yCandidate, zCandidate, aCandidate, features, xs)).map(x :: _)
case Nil => done(Nil)
}