on master help sign in
Fix another copy-paste error
ade0339Evan Czaplicki
compiler/Transform/Declaration.hs+1−1
@@ -60,6 +60,6 @@ combineAnnotations = go
60
60
61 Port (RecvDefinition name' expr) : rest | name == name' ->
61 Port (RecvDefinition name' expr) : rest | name == name' ->
62 do expr' <- Expr.crawl Def.combineAnnotations expr
62 do expr' <- Expr.crawl Def.combineAnnotations expr
63− (:) (Port (Send name expr' tipe)) <$> go rest
63+ (:) (Port (Recv name expr' tipe)) <$> go rest
64
64
65 _ -> Left (msg name)
65 _ -> Left (msg name)