-- | For debugging purposes, it can be useful to lift an IO computation into an LVish @Par@ monad.
--
--   This module is imported for instances only (specifically, the `MonadIO` instance).

module Control.LVish.Unsafe() where

import Control.LVish.Internal
import Control.Monad.IO.Class
import qualified Control.LVish.SchedIdempotent as L

instance MonadIO (Par d s) where
  liftIO = WrapPar . L.liftIO