compiler/ghci/Debugger.hs-boot

   1 module Debugger where
   2 import Breakpoints
   3 import qualified Data.Map as Map
   4 import Data.Array.Unboxed
   5
   6
   7 data BkptTable a  = BkptTable {
   8                            -- | An array of breaks, indexed by site number
   9      breakpoints :: Map.Map a (UArray Int Bool)
  10                            -- | A list of lines, each line can have zero or more sites, which are annotated with a column number
  11    , sites       :: Map.Map a [[(SiteNumber, Int)]]
  12    }