@@ -379,11 +379,6 @@ binop region func@(Var.Canonical home op) e1 e2 =
379379 es <- mapM expression (collectRightAssoc [] e1)
380380 return $ foldr (<|) e2' es
381381
382− (Var.Module ["List"], "++") ->
383− do e1' <- expression e1
384− e2' <- expression e2
385− return $ _List "append" `call` [e1', e2']
386−
387382 (Var.BuiltIn, "::") ->
388383 expression (A region (Data "::" [e1,e2]))
389384