aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/program/aedifex/command/deps.lux
diff options
context:
space:
mode:
authorEduardo Julian2022-07-06 16:25:43 -0400
committerEduardo Julian2022-07-06 16:25:43 -0400
commit5270f301eba5237feebc8eca14aee6b7a992a819 (patch)
treea1adb545189f4db807d712a1fcc7d20048c11222 /stdlib/source/program/aedifex/command/deps.lux
parent0c32c7f03ad1f8f0db54b623dc407713bbf8cacd (diff)
Made exception.report a function.
Diffstat (limited to 'stdlib/source/program/aedifex/command/deps.lux')
-rw-r--r--stdlib/source/program/aedifex/command/deps.lux30
1 files changed, 15 insertions, 15 deletions
diff --git a/stdlib/source/program/aedifex/command/deps.lux b/stdlib/source/program/aedifex/command/deps.lux
index f0a7b7a9e..4ffc6e641 100644
--- a/stdlib/source/program/aedifex/command/deps.lux
+++ b/stdlib/source/program/aedifex/command/deps.lux
@@ -58,20 +58,20 @@
(list#mix dictionary.lacks resolution)
(///dependency/deployment.all local))
_ (console.write_line (exception.report
- "Local successes" (|> local_successes
- (list.sorted (at ///dependency.order <))
- (exception.listing ..format))
- "Local failures" (|> local_failures
- (list.sorted (at ///dependency.order <))
- (exception.listing ..format))
- "Remote successes" (|> remote_successes
- (set.of_list ///dependency.hash)
- (set.difference (set.of_list ///dependency.hash local_successes))
- set.list
- (list.sorted (at ///dependency.order <))
- (exception.listing ..format))
- "Remote failures" (|> remote_failures
- (list.sorted (at ///dependency.order <))
- (exception.listing ..format)))
+ (list ["Local successes" (|> local_successes
+ (list.sorted (at ///dependency.order <))
+ (exception.listing ..format))]
+ ["Local failures" (|> local_failures
+ (list.sorted (at ///dependency.order <))
+ (exception.listing ..format))]
+ ["Remote successes" (|> remote_successes
+ (set.of_list ///dependency.hash)
+ (set.difference (set.of_list ///dependency.hash local_successes))
+ set.list
+ (list.sorted (at ///dependency.order <))
+ (exception.listing ..format))]
+ ["Remote failures" (|> remote_failures
+ (list.sorted (at ///dependency.order <))
+ (exception.listing ..format))]))
console)]
(in resolution))))