No longer need dash before string keys for case/condp

exercism · Nov 1, 2024 · 1557df5 · 1557df5
1 parent 7f4582e
commit 1557df5
Show file tree

Hide file tree

Showing 3 changed files with 21 additions and 21 deletions.
diff --git a/exercises/practice/bank-account/.meta/bank-account.ys b/exercises/practice/bank-account/.meta/bank-account.ys
@@ -9,18 +9,18 @@ defn bank-account(operations):
   reduce _ closed operations:
     fn(bal op):
       case op.operation:
-        -'open':
+        'open':
           if closed?(bal): 0, die('account already open')
-        -'close':
+        'close':
           if closed?(bal): die('account not open'), closed
-        -'balance':
+        'balance':
           if closed?(bal): die('account not open'), bal
-        -'deposit':
+        'deposit':
           cond:
             closed?(bal): die('account not open')
             op.amount <= 0: die('amount must be greater than 0')
             else: bal + op.amount
-        -'withdraw':
+        'withdraw':
           cond:
             closed?(bal): die('account not open')
             op.amount <= 0: die('amount must be greater than 0')

diff --git a/exercises/practice/circular-buffer/.meta/circular-buffer.ys b/exercises/practice/circular-buffer/.meta/circular-buffer.ys
@@ -9,10 +9,10 @@ defn run(capacity operations):
                  'should_succeed' 'expected')
       args =:
         condp eq op:
-          -'clear'     : -[buffer]
-          -'read'      : -[buffer pass want]
-          -'write'     : -[buffer pass item]
-          -'overwrite' : -[buffer pass item]
+          'clear'     : -[buffer]
+          'read'      : -[buffer pass want]
+          'write'     : -[buffer pass item]
+          'overwrite' : -[buffer pass item]
       value("op-$op"): args*
   =>: -{}
 

diff --git a/exercises/practice/yacht/.meta/yacht.ys b/exercises/practice/yacht/.meta/yacht.ys
@@ -5,15 +5,15 @@ defn score(dice category):
   counts =: dice:frequencies
   counts2 =: counts:set/map-invert
   case category:
-    -'yacht': dice-set.#.eq(1).and(50).or(0)
-    -'choice': dice:sum
-    -'little straight': dice-set.eq([1 2 3 4 5]).and(30).or(0)
-    -'big straight': dice-set.eq([2 3 4 5 6]).and(30).or(0)
-    -'four of a kind': counts2(4 counts2(5 0)) * 4
-    -'full house': (counts2.2 && counts2.3).and(dice:sum).or(0)
-    -'ones'  : counts(1 0) * 1
-    -'twos'  : counts(2 0) * 2
-    -'threes': counts(3 0) * 3
-    -'fours' : counts(4 0) * 4
-    -'fives' : counts(5 0) * 5
-    -'sixes' : counts(6 0) * 6
+    'full house': (counts2.2 && counts2.3).and(dice:sum).or(0)
+    'little straight': dice-set.eq([1 2 3 4 5]).and(30).or(0)
+    'big straight'   : dice-set.eq([2 3 4 5 6]).and(30).or(0)
+    'four of a kind' : counts2(4 counts2(5 0)) * 4
+    'yacht' : dice-set.#.eq(1).and(50).or(0)
+    'choice': dice:sum
+    'ones'  : counts(1 0) * 1
+    'twos'  : counts(2 0) * 2
+    'threes': counts(3 0) * 3
+    'fours' : counts(4 0) * 4
+    'fives' : counts(5 0) * 5
+    'sixes' : counts(6 0) * 6