Build fix: modBreaks -> modBreaks_decls modbreaks

0ed635be · Michael D. Adams · 19b0b165 · 0ed635be
Commit 0ed635be authored Aug 22, 2007 by Michael D. Adams
--- a/compiler/main/InteractiveEval.hs
+++ b/compiler/main/InteractiveEval.hs
@@ -177,7 +177,7 @@ findEnclosingDeclSpanByTick hsc_env mod tick =
         Nothing -> panic "findEnclosingDecl"
         Just hmi -> let
             modbreaks = md_modBreaks (hm_details hmi)
-          in ASSERT (inRange (bounds modBreaks) tick)
+          in ASSERT (inRange (bounds (modBreaks_decls modbreaks)) tick)
             modBreaks_decls modbreaks ! tick

 -- | Find the Module corresponding to a FilePath