path: root/testsuite/tests/driver/T20200loop/Base.hs

module Base where

data QName = QName
data Definition = D

udef :: a
udef = udef

getConstInfo :: Monad m => QName -> m Definition
getConstInfo = udef