From 36021097e17ab1cfa971564cb70128d704e88f2d Mon Sep 17 00:00:00 2001 From: Ben Sima Date: Mon, 19 Oct 2020 17:04:16 -0400 Subject: Remove $ from Alpha --- Control/Concurrent/Go.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Control/Concurrent') diff --git a/Control/Concurrent/Go.hs b/Control/Concurrent/Go.hs index 08a1d65..69d35b8 100644 --- a/Control/Concurrent/Go.hs +++ b/Control/Concurrent/Go.hs @@ -50,7 +50,7 @@ fork = Concurrent.forkIO chan :: Int -> IO (Channel a) chan n = do (i, o) <- Chan.newChan n - return $ Channel i o n + return <| Channel i o n -- | A channel for broadcasting to multiple consumers. See 'mult'. type Mult a = Chan.OutChan a -- cgit v1.2.3