blob: cc77d2b478c1ec4094381fc3569ba4608a9b0cd9 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
module GHC.Unit.State where
import GHC.Prelude
import GHC.Data.FastString
import {-# SOURCE #-} GHC.Unit.Types (IndefUnitId, UnitId)
data UnitState
data UnitDatabase unit
emptyUnitState :: UnitState
mkIndefUnitId :: UnitState -> FastString -> IndefUnitId
displayUnitId :: UnitState -> UnitId -> Maybe String
updateIndefUnitId :: UnitState -> IndefUnitId -> IndefUnitId
|
