appendTypeSuffix :: String -> CType -> DebugOr String
appendTypeSuffix x t = mangleCType t >>= (\y -> return $ x ++ "." ++ y)
appendTypeSuffix :: String -> CType -> DebugOr String
appendTypeSuffix x t = mangleCType t >>= (\y -> return $ x ++ "." ++ y)
appendTypeSuffix x t = mangleCType t >>= (\y -> return $ x ++ "." ++ y)