top-0.2: src/Repo/Types.hs

module Repo.Types (Repo(..)) where

import           ZM

-- |A repository of absolute types
data Repo = Repo { get   :: AbsRef -> IO (Maybe AbsADT)
                 , put   :: AbsADT -> IO ()
                 , close :: IO () }