mirror of
https://github.com/anoma/juvix.git
synced 2024-10-27 02:04:29 +03:00
69594edc7b
This patch dramatically increases the efficiency of `juvix dev root`, which was unnecessarily parsing all dependencies included in the `Package.juvix` file. Other commands that do not require the `Package` will also be faster. It also refactors some functions so that the `TaggedLock` effect is run globally. I've added `singletons-base` as a dependency so we can have `++` on the type level. We've tried to define a type family ourselves but inference was not working properly.
14 lines
438 B
Haskell
14 lines
438 B
Haskell
module Commands.Dev.Asm where
|
|
|
|
import Commands.Base
|
|
import Commands.Dev.Asm.Compile as Compile
|
|
import Commands.Dev.Asm.Options
|
|
import Commands.Dev.Asm.Run as Run
|
|
import Commands.Dev.Asm.Validate as Validate
|
|
|
|
runCommand :: forall r. (Members '[Embed IO, App, TaggedLock] r) => AsmCommand -> Sem r ()
|
|
runCommand = \case
|
|
Run opts -> Run.runCommand opts
|
|
Validate opts -> Validate.runCommand opts
|
|
Compile opts -> Compile.runCommand opts
|