diff options
Diffstat (limited to '')
| -rw-r--r-- | stdlib/source/spec/lux/world/shell.lux | 19 |
1 files changed, 10 insertions, 9 deletions
diff --git a/stdlib/source/spec/lux/world/shell.lux b/stdlib/source/spec/lux/world/shell.lux index 69c1cc8ab..c10f77c12 100644 --- a/stdlib/source/spec/lux/world/shell.lux +++ b/stdlib/source/spec/lux/world/shell.lux @@ -8,25 +8,27 @@ [security ["!" capability]] [concurrency - ["." promise (#+ Promise)]]] + ["." promise (#+ Promise)]] + [parser + ["." environment]]] [data ["." product] ["." text ("#\." equivalence) ["%" format (#+ format)]] [number ["n" nat] - ["i" int]] - [format - ["." context]]] + ["i" int]]] [math ["." random]]] {1 - ["." /]}) + ["." / + [// + [environment (#+ Environment)]]]}) (template [<name> <command> <type> <prep>] [(def: <name> - (-> <type> [/.Environment /.Command (List /.Argument)]) - (|>> <prep> list [context.empty <command>]))] + (-> <type> [Environment /.Command (List /.Argument)]) + (|>> <prep> list [environment.empty <command>]))] [echo! "echo" Text (|>)] [sleep! "sleep" Nat %.nat] @@ -73,8 +75,7 @@ (#try.Failure error) true))))) -(with-expansions [<shell-coverage> (as-is [/.Can-Execute - /.Environment /.Command /.Argument])] +(with-expansions [<shell-coverage> (as-is [/.Can-Execute /.Command /.Argument])] (def: #export (spec shell) (-> (/.Shell Promise) Test) (<| (_.with-cover [/.Shell /.Process]) |