getModuleName :: FCode Module
getModuleName = do { info <- getInfoDown; return (cgd_mod info) }
getModuleName :: FCode Module
getModuleName = do { info <- getInfoDown; return (cgd_mod info) }
getModuleName = do { info <- getInfoDown; return (cgd_mod info) }