runInBoundThread :: InUnion fs IO => Eff fs a -> Eff fs a
runInBoundThread action = inj (CC.runInBoundThread (return action)) `Then` id
runInBoundThread :: InUnion fs IO => Eff fs a -> Eff fs a
runInBoundThread action = inj (CC.runInBoundThread (return action)) `Then` id
runInBoundThread action = inj (CC.runInBoundThread (return action)) `Then` id