aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBen Davies <kaiepi@outlook.com>2021-05-19 08:36:44 -0300
committerBen Davies <kaiepi@outlook.com>2021-05-20 05:54:33 -0300
commitb0ce0feda870abfcd9023c13cbc220635d8294d7 (patch)
tree42e82825eeee4c1d3e84b0b1400927a7df8d6c57
parentcfd26e15665a8e7409e8acac5a40323dbbb7bdfe (diff)
downloadperlweeklychallenge-club-b0ce0feda870abfcd9023c13cbc220635d8294d7.tar.gz
perlweeklychallenge-club-b0ce0feda870abfcd9023c13cbc220635d8294d7.tar.bz2
perlweeklychallenge-club-b0ce0feda870abfcd9023c13cbc220635d8294d7.zip
Don't calculate a sum for each mapping of a binary tree node
Nit of Ben Davies' Raku solution for challenge 113.
-rw-r--r--challenge-113/ben-davies/raku/ch-2.raku3
1 files changed, 2 insertions, 1 deletions
diff --git a/challenge-113/ben-davies/raku/ch-2.raku b/challenge-113/ben-davies/raku/ch-2.raku
index c747e68ffc..c0c2a05e3c 100644
--- a/challenge-113/ben-davies/raku/ch-2.raku
+++ b/challenge-113/ben-davies/raku/ch-2.raku
@@ -38,5 +38,6 @@ unit sub MAIN() {
R => BIT(3,
L => BIT(5),
R => BIT(6)));
- say $bit.map: $bit.sum - *;
+ my Int:D $sum = $bit.sum;
+ say $bit.map: $sum - *;
}