Update D&D character (#169)

* roll a 6-sided die, not 5

* return type for get-hitpoints method

* "TODO-izing" the stub. Do we want to remove more?

* sync tests

* Add comment for students. Reformat indentation for "with" methods.

exercises/practice/dnd-character/.meta/example.arr

@@ -14,12 +14,12 @@ data Character:
       character(strength, dexterity, constitution, intelligence, wisdom, charisma)
     end
   | character(strength, dexterity, constitution, intelligence, wisdom, charisma) with:
-    method get-hitpoints(self):
+    method get-hitpoints(self) -> NumInteger:
       10 + self.modifier(self.constitution)
     end
 sharing:
   method ability(self) -> NumInteger:
-    roll-dice = lam(_): num-random(5) + 1 end
+    roll-dice = lam(_): num-random(6) + 1 end
     rolls = map(roll-dice, repeat(4, 0))
     rolls.sort().drop(1).foldl(lam(elt, acc): elt + acc end, 0)
   end,

exercises/practice/dnd-character/.meta/tests.toml

@@ -65,4 +65,9 @@ description = "random character is valid"
 
 [2ca77b9b-c099-46c3-a02c-0d0f68ffa0fe]
 description = "each ability is only calculated once"
-include = "false"
+include = false
+
+[dca2b2ec-f729-4551-84b9-078876bb4808]
+description = "each ability is only calculated once"
+reimplements = "2ca77b9b-c099-46c3-a02c-0d0f68ffa0fe"
+include = false

exercises/practice/dnd-character/dnd-character.arr

@@ -2,30 +2,26 @@ use context essentials2020 # Don't delete this line when using Pyret on Exercism
 
 provide-types *
 
+#|
+   Replace the ... with your code to pass the tests. Good luck!
+|#
+
 data Character:
-  | blank-character() with:
-    method randomize-stats(self) -> Character:
-      abilities = self.ability()
-      strength = self.ability()
-      dexterity = self.ability()
-      constitution = self.ability()
-      intelligence = self.ability()
-      wisdom = self.ability()
-      charisma = self.ability()
-      character(strength, dexterity, constitution, intelligence, wisdom, charisma)
-    end
-  | character(strength, dexterity, constitution, intelligence, wisdom, charisma) with:
-    method get-hitpoints(self):
-      10 + self.modifier(self.constitution)
-    end
+  | blank-character()
+    with:
+      method randomize-stats(self) -> Character:
+        ...
+      end
+  | character(strength, dexterity, constitution, intelligence, wisdom, charisma)
+    with:
+      method get-hitpoints(self) -> NumInteger:
+        ...
+      end
 sharing:
   method ability(self) -> NumInteger:
-    roll-dice = lam(_): num-random(5) + 1 end
-    rolls = map(roll-dice, repeat(4, 0))
-    rolls.sort().drop(1).foldl(lam(elt, acc): elt + acc end, 0)
+    ...
   end,
   method modifier(self, value :: NumInteger) -> NumInteger:
-    modified = (value - 10) / 2
-    num-floor(modified)
+    ...
   end
-end
+end