2022-08-03 14:20:40 +03:00
|
|
|
module Commands.Dev
|
|
|
|
( module Commands.Dev,
|
2022-09-14 17:16:15 +03:00
|
|
|
module Commands.Dev.Options,
|
2022-07-12 20:08:03 +03:00
|
|
|
)
|
|
|
|
where
|
|
|
|
|
2022-09-14 17:16:15 +03:00
|
|
|
import Commands.Base
|
2022-09-29 18:44:55 +03:00
|
|
|
import Commands.Dev.Asm qualified as Asm
|
2022-09-14 17:16:15 +03:00
|
|
|
import Commands.Dev.Core qualified as Core
|
|
|
|
import Commands.Dev.DisplayRoot qualified as DisplayRoot
|
2023-02-22 17:27:40 +03:00
|
|
|
import Commands.Dev.Geb qualified as Geb
|
2022-09-14 17:16:15 +03:00
|
|
|
import Commands.Dev.Highlight qualified as Highlight
|
|
|
|
import Commands.Dev.Internal qualified as Internal
|
2023-11-07 21:11:02 +03:00
|
|
|
import Commands.Dev.MigrateJuvixYaml qualified as MigrateJuvixYaml
|
2022-09-14 17:16:15 +03:00
|
|
|
import Commands.Dev.Options
|
|
|
|
import Commands.Dev.Parse qualified as Parse
|
2022-11-03 11:38:09 +03:00
|
|
|
import Commands.Dev.Runtime qualified as Runtime
|
2022-09-14 17:16:15 +03:00
|
|
|
import Commands.Dev.Scope qualified as Scope
|
|
|
|
import Commands.Dev.Termination qualified as Termination
|
2023-03-31 01:57:44 +03:00
|
|
|
import Commands.Repl qualified as Repl
|
2022-09-14 17:16:15 +03:00
|
|
|
|
2023-12-06 20:24:59 +03:00
|
|
|
runCommand :: (Members '[Embed IO, App, TaggedLock] r) => DevCommand -> Sem r ()
|
2022-09-14 17:16:15 +03:00
|
|
|
runCommand = \case
|
|
|
|
Highlight opts -> Highlight.runCommand opts
|
|
|
|
Parse opts -> Parse.runCommand opts
|
|
|
|
Scope opts -> Scope.runCommand opts
|
|
|
|
Internal opts -> Internal.runCommand opts
|
|
|
|
Termination opts -> Termination.runCommand opts
|
|
|
|
Core opts -> Core.runCommand opts
|
2023-02-22 17:27:40 +03:00
|
|
|
Geb opts -> Geb.runCommand opts
|
2022-09-29 18:44:55 +03:00
|
|
|
Asm opts -> Asm.runCommand opts
|
2022-11-03 11:38:09 +03:00
|
|
|
Runtime opts -> Runtime.runCommand opts
|
2022-12-20 15:05:40 +03:00
|
|
|
DisplayRoot opts -> DisplayRoot.runCommand opts
|
2023-03-31 01:57:44 +03:00
|
|
|
JuvixDevRepl opts -> Repl.runCommand opts
|
2023-11-07 21:11:02 +03:00
|
|
|
MigrateJuvixYaml opts -> runFilesIO $ MigrateJuvixYaml.runCommand opts
|