Merge pull request #90 from mlang/Discard

Avoid Discard constraint
purescript-contrib · Feb 18, 2017 · eddf851 · eddf851
2 parents 781edf1 + 67ca4fc
commit eddf851
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/Control/Monad/Aff.purs b/src/Control/Monad/Aff.purs
@@ -121,7 +121,7 @@ later' n aff = runFn3 _setTimeout nonCanceler n aff
 finally :: forall e a b. Aff e a -> Aff e b -> Aff e a
 finally aff1 aff2 = do
   x <- attempt aff1
-  aff2
+  _ <- aff2
   either throwError pure x
 
 -- | Forks the specified asynchronous computation so subsequent computations