Skip to content

Commit

Permalink
add comment
Browse files Browse the repository at this point in the history
  • Loading branch information
soulomoon committed Jun 8, 2024
1 parent e800cac commit 86d7fb9
Showing 1 changed file with 1 addition and 0 deletions.
1 change: 1 addition & 0 deletions ghcide/src/Development/IDE/Core/WorkerThread.hs
Original file line number Diff line number Diff line change
Expand Up @@ -23,6 +23,7 @@ import Control.Monad.Cont (ContT (ContT))
-- * `blockRunInThread` : accepts a `TQueue` and an action to run in separate thread and waits for the result.


-- | withWorkerQueue creates a new TQueue and runs the workerAction in a separate thread.
withWorkerQueue :: (t -> IO a) -> ContT () IO (TQueue t)
withWorkerQueue workerAction = ContT $ \mainAction -> do
q <- newTQueueIO
Expand Down

0 comments on commit 86d7fb9

Please sign in to comment.