arens (HsDo sc _ _)
       | isListCompExpr sc            = False
hsExprNeeds
hsExprNeedsParens (HsDo sc _ _)
       | isListCompExpr sc            = False
hsExprNeedsParens (HsDo sc _ _)
       | isListCompExpr sc            = False