1
1
mirror of https://github.com/anoma/juvix.git synced 2024-12-16 02:22:25 +03:00
juvix/app/Commands/Dev/Core.hs
2022-09-14 16:16:15 +02:00

14 lines
406 B
Haskell

module Commands.Dev.Core where
import Commands.Base
import Commands.Dev.Core.Eval as Eval
import Commands.Dev.Core.Options
import Commands.Dev.Core.Read as Read
import Commands.Dev.Core.Repl as Repl
runCommand :: forall r. Members '[Embed IO, App] r => CoreCommand -> Sem r ()
runCommand = \case
Repl opts -> Repl.runCommand opts
Eval opts -> Eval.runCommand opts
Read opts -> Read.runCommand opts