mirror of
https://github.com/anoma/juvix.git
synced 2024-12-14 08:27:03 +03:00
12 lines
339 B
Haskell
12 lines
339 B
Haskell
|
module Commands.Dev.Asm where
|
||
|
|
|
||
|
|
import Commands.Base
|
||
|
|
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] r => AsmCommand -> Sem r ()
|
||
|
|
runCommand = \case
|
||
|
|
Run opts -> Run.runCommand opts
|
||
|
|
Validate opts -> Validate.runCommand opts
|