X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2Fmain%2FInteractiveEval.hs;h=9187f1a4f9f090385d41a587daa7415311554cf7;hb=876a71215ce555d1830aacc51076595a835ad699;hp=bfcf5f6631eb45dc1891b2b5f5268d1dfc7c0391;hpb=70f308087c2291a3114bfedaa7ae915b1a1ac70a;p=ghc-hetmet.git diff --git a/compiler/main/InteractiveEval.hs b/compiler/main/InteractiveEval.hs index bfcf5f6..9187f1a 100644 --- a/compiler/main/InteractiveEval.hs +++ b/compiler/main/InteractiveEval.hs @@ -441,7 +441,6 @@ resume (Session ref) step handleRunStatus expr ref bindings final_ids breakMVar statusMVar status hist' - back :: Session -> IO ([Name], Int, SrcSpan) back = moveHist (+1)