diff options
Diffstat (limited to 'stdlib/source/program/aedifex/command/build.lux')
| -rw-r--r-- | stdlib/source/program/aedifex/command/build.lux | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/stdlib/source/program/aedifex/command/build.lux b/stdlib/source/program/aedifex/command/build.lux index b5df31411..6a0b6bcd0 100644 --- a/stdlib/source/program/aedifex/command/build.lux +++ b/stdlib/source/program/aedifex/command/build.lux @@ -104,10 +104,10 @@ [#Ruby ..ruby_compiler_name]) _ - (exception.throw ..no_available_compiler [])) + (exception.except ..no_available_compiler [])) _ - (exception.throw ..no_available_compiler [])))) + (exception.except ..no_available_compiler [])))) (def: (path fs home dependency) (All [!] (-> (file.System !) Path Dependency Path)) @@ -266,7 +266,7 @@ (let [target (get@ #///.target profile)] (case (get@ #///.program profile) #.None - (async\wrap (exception.throw ..no_specified_program [])) + (async\in (exception.except ..no_specified_program [])) (#.Some program_module) (do async.monad @@ -274,7 +274,7 @@ #let [home (\ program home) working_directory (\ program directory)]] (do ///action.monad - [[resolution compiler] (async\wrap (..compiler resolution (get@ #///.compiler profile))) + [[resolution compiler] (async\in (..compiler resolution (get@ #///.compiler profile))) #let [host_dependencies (..host_dependencies fs home resolution) [[command compiler_params] output] (case compiler (#JVM dependency) @@ -313,6 +313,6 @@ ..success ..failure) console)] - (wrap [exit - compiler - (format cache_directory / output)]))))))) + (in [exit + compiler + (format cache_directory / output)]))))))) |