mirror of
https://github.com/anoma/juvix.git
synced 2024-12-29 10:33:15 +03:00
97030f8cb4
- ⚠️ Depends on #2644 The `effectful` library does not support the `Embed` effect out of the box. However, it offers `IOE`, which is equivalent to `Embed IO` from polysemy. In preparation to a possible migration to `effectful`, this pr hides the general `Embed` effect from the prelude and it exports a specialized `EmbedIO` in its place.
12 lines
403 B
Haskell
12 lines
403 B
Haskell
module Commands.Dev.Internal where
|
|
|
|
import Commands.Base
|
|
import Commands.Dev.Internal.Options
|
|
import Commands.Dev.Internal.Pretty qualified as Pretty
|
|
import Commands.Dev.Internal.Typecheck qualified as Typecheck
|
|
|
|
runCommand :: (Members '[EmbedIO, App, TaggedLock] r) => InternalCommand -> Sem r ()
|
|
runCommand = \case
|
|
Pretty opts -> Pretty.runCommand opts
|
|
TypeCheck opts -> Typecheck.runCommand opts
|