@@ -59,9 +59,9 @@ impureUnliftEff f = impureEff $ \es -> do
5959 tid0 <- myThreadId
6060 f $ \(Eff m) -> do
6161 tid <- myThreadId
62− -- If the lifting function is called from a different thread, we need to
63− -- clone the environment. Otherwise multiple threads will attempt to modify
64− -- it in different ways and things will break horribly.
62+ -- If the unlifting function is called from another thread, we need to clone
63+ -- the environment. Otherwise multiple threads will attempt to modify it in
64+ -- different ways and things will break horribly.
6565 if tid0 == tid
6666 then m es
6767 else m =<< cloneEnv es