diff options
| author | Eduardo Julian | 2017-02-26 19:36:21 -0400 |
|---|---|---|
| committer | Eduardo Julian | 2017-02-26 19:36:21 -0400 |
| commit | 79c10caf4c7e370dc53c4c60c57cc16ccec48773 (patch) | |
| tree | c31f2ee11eb4a0bd7dd7b308ddf2c99e8bde9a20 /stdlib | |
| parent | 8fafa00056cbd4b0a3da77258e4d258a2f25767e (diff) | |
- Added a new try-catch procedure.
Diffstat (limited to 'stdlib')
| -rw-r--r-- | stdlib/source/lux/test.lux | 5 | ||||
| -rw-r--r-- | stdlib/test/test/lux/data/char.lux | 3 |
2 files changed, 3 insertions, 5 deletions
diff --git a/stdlib/source/lux/test.lux b/stdlib/source/lux/test.lux index bab513cc4..d953b7d65 100644 --- a/stdlib/source/lux/test.lux +++ b/stdlib/source/lux/test.lux @@ -13,8 +13,7 @@ text/format [error #- fail "Error/" Monad<Error>]) [io #- run] - ["R" random] - [host #- try])) + ["R" random])) ## [Host] (def: now @@ -156,7 +155,7 @@ (def: #hidden (try-body lazy-body) (-> (IO Test) Test) - (case (host;try (io;run lazy-body)) + (case (_lux_proc ["lux" "try"] [lazy-body]) (#;Right output) output diff --git a/stdlib/test/test/lux/data/char.lux b/stdlib/test/test/lux/data/char.lux index 67332f282..88a5d86ae 100644 --- a/stdlib/test/test/lux/data/char.lux +++ b/stdlib/test/test/lux/data/char.lux @@ -6,8 +6,7 @@ [text] text/format) ["R" random] - pipe - [host #- try]) + pipe) lux/test) (test: "Char operations" |