git @ Cat's Eye Technologies ZOWIE / c4484b2
Fix what I think is a bug, although tests still do not all pass. Chris Pressey 5 months ago
1 changed file(s) with 1 addition(s) and 1 deletion(s). Raw diff Collapse all Expand all
4949
5050 commitAndRepeat :: State -> State
5151 commitAndRepeat state@State{ saved=(Just previous) } =
52 state{ pc=((pc previous) - 1) }
52 state{ saved=(saved previous), pc=((pc previous) - 1) }