getStructNameM :: Type -> TypeM String
getStructNameM (StructType n _) = return n
getStructNameM :: Type -> TypeM String
getStructNameM (StructType n _) = return n
getStructNameM (StructType n _) = return n