flatFunc :: Maybe FlatFunction,
funcEntity :: Maybe Entity,
funcArch :: Maybe AST.ArchBody
flatFunc :: Maybe FlatFunction,
funcEntity :: Maybe Entity,
funcArch :: Maybe AST.ArchBody
data VHDLSession = VHDLSession {
coreMod :: HscTypes.CoreModule, -- The current module
data VHDLSession = VHDLSession {
coreMod :: HscTypes.CoreModule, -- The current module