diff --git a/impl/ZOWIE.hs/src/Language/ZOWIE/State.hs b/impl/ZOWIE.hs/src/Language/ZOWIE/State.hs index a350433..3cd66db 100644 --- a/impl/ZOWIE.hs/src/Language/ZOWIE/State.hs +++ b/impl/ZOWIE.hs/src/Language/ZOWIE/State.hs @@ -50,4 +50,4 @@ commitAndRepeat :: State -> State commitAndRepeat state@State{ saved=(Just previous) } = - state{ pc=((pc previous) - 1) } + state{ saved=(saved previous), pc=((pc previous) - 1) }