diff options
| author | Eduardo Julian | 2021-09-15 20:45:48 -0400 |
|---|---|---|
| committer | Eduardo Julian | 2021-09-15 20:45:48 -0400 |
| commit | c234d5d25331d6ed3b9455ce8c93ec4d34402f91 (patch) | |
| tree | 29148102b8881e037dfa74c3386fdde496025a07 /stdlib/source/program/compositor | |
| parent | 4f4656b278c6f9dfbdd15d5d9bc86d63c5b44333 (diff) | |
"Row" => "Sequence"
Diffstat (limited to '')
| -rw-r--r-- | stdlib/source/program/compositor.lux | 3 | ||||
| -rw-r--r-- | stdlib/source/program/compositor/export.lux | 4 | ||||
| -rw-r--r-- | stdlib/source/program/compositor/import.lux | 4 |
3 files changed, 5 insertions, 6 deletions
diff --git a/stdlib/source/program/compositor.lux b/stdlib/source/program/compositor.lux index 7499075cc..90d02c44c 100644 --- a/stdlib/source/program/compositor.lux +++ b/stdlib/source/program/compositor.lux @@ -17,8 +17,7 @@ ["[0]" text ["%" format {"+" format}]] [collection - ["[0]" dictionary {"+" Dictionary}] - ["[0]" row {"+" Row}]]] + ["[0]" dictionary {"+" Dictionary}]]] [time ["[0]" instant]] ["[0]" world "_" diff --git a/stdlib/source/program/compositor/export.lux b/stdlib/source/program/compositor/export.lux index 64cb95955..054de3741 100644 --- a/stdlib/source/program/compositor/export.lux +++ b/stdlib/source/program/compositor/export.lux @@ -12,7 +12,7 @@ ["%" format {"+" format}]] [collection ["[0]" dictionary] - ["[0]" row]] + ["[0]" sequence]] [format ["[0]" binary] ["[0]" tar]]] @@ -59,7 +59,7 @@ tar.read_by_other) ..no_ownership source_code]})))) - (# try.monad each row.of_list) + (# try.monad each sequence.of_list) (# async.monad in)))) (def: .public (export fs [sources target]) diff --git a/stdlib/source/program/compositor/import.lux b/stdlib/source/program/compositor/import.lux index 04eb93e6e..fce2c29e2 100644 --- a/stdlib/source/program/compositor/import.lux +++ b/stdlib/source/program/compositor/import.lux @@ -16,7 +16,7 @@ ["%" format {"+" format}]] [collection ["[0]" dictionary {"+" Dictionary}] - ["[0]" row]] + ["[0]" sequence]] [format ["[0]" tar]]] [tool @@ -51,7 +51,7 @@ (# ! each (let [! try.monad] (|>> (# ! each (<binary>.result tar.parser)) (# ! conjoint) - (# ! each (|>> row.list + (# ! each (|>> sequence.list (monad.mix ! (function (_ entry import) (case entry {tar.#Normal [path instant mode ownership content]} |