diff options
| author | Eduardo Julian | 2022-12-02 19:33:00 -0400 |
|---|---|---|
| committer | Eduardo Julian | 2022-12-02 19:33:00 -0400 |
| commit | 94e5802f594a73245fce0fbd885103b8bf210d57 (patch) | |
| tree | 65e5799c0be40f5f015b39bfa6c87c9c27fd9424 /stdlib/source/test/lux/world/file.lux | |
| parent | b491dfff00219d5206075ea65468e00ab657075d (diff) | |
Added some simple time-series handling machinery.
Diffstat (limited to 'stdlib/source/test/lux/world/file.lux')
| -rw-r--r-- | stdlib/source/test/lux/world/file.lux | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/stdlib/source/test/lux/world/file.lux b/stdlib/source/test/lux/world/file.lux index d2f3cde55..b7ffb5f6c 100644 --- a/stdlib/source/test/lux/world/file.lux +++ b/stdlib/source/test/lux/world/file.lux @@ -193,7 +193,7 @@ {.#Some {.#Right children}} (|> children (monad.only ! (..file? disk)) - (at ! each (|>> {try.#Success}))) + (of ! each (|>> {try.#Success}))) _ (in {try.#Failure ""})))) @@ -204,7 +204,7 @@ {.#Some {.#Right children}} (|> children (monad.only ! (..directory? disk)) - (at ! each (|>> {try.#Success}))) + (of ! each (|>> {try.#Success}))) _ (in {try.#Failure ""})))) @@ -257,7 +257,7 @@ (in (do async.monad [.let [fs (/.mock /)] - ? (at fs delete file)] + ? (of fs delete file)] (unit.coverage [/.cannot_delete] (when ? {try.#Failure error} @@ -267,7 +267,7 @@ false)))) (in (do async.monad [.let [fs (/.mock /)] - ? (at fs read file)] + ? (of fs read file)] (unit.coverage [/.cannot_find_file] (when ? {try.#Failure error} @@ -277,8 +277,8 @@ false)))) (in (do async.monad [.let [fs (/.mock /)] - ?/0 (at fs directory_files file) - ?/1 (at fs sub_directories file)] + ?/0 (of fs directory_files file) + ?/1 (of fs sub_directories file)] (unit.coverage [/.cannot_find_directory] (when [?/0 ?/1] [{try.#Failure error/0} {try.#Failure error/1}] |