remove unused lexical variable (exercism#496)

for exercism#233

[no important files changed]

Author: keiravillekode

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

@@ -11,7 +11,7 @@
 
 (defun ability ()
   (let ((rolls '()))
-    (dotimes (i 4)
+    (dotimes (_ 4)
       (push (+ 1 (random 6)) rolls))
     (apply '+ (cdr (sort rolls '<)))))
 

exercises/practice/dnd-character/dnd-character-test.el

@@ -90,7 +90,7 @@
           (intelligence (aref dnd-char 4))
           (wisdom (aref dnd-char 5))
           (charisma (aref dnd-char 6))
-          (hitpoints (aref dnd-char 7)))
+          (_hitpoints (aref dnd-char 7)))
       (should (and (recordp dnd-char)
                    (valid-range-p strength)
                    (valid-range-p dexterity)

exercises/practice/protein-translation/.meta/example.el

@@ -25,7 +25,7 @@
     ("UAA" nil)
     ("UAG" nil)
     ("UGA" nil)
-    (otherwise (error "Invalid codon"))))
+    (_ (error "Invalid codon"))))
 
 (defun proteins (strand)
   (let* ((len (length strand))

exercises/practice/reverse-string/.meta/example.el

@@ -19,8 +19,7 @@
         (i 0)
         (len (length str)))
     (while (< i len)
-      (let ((start i)
-            (char (aref str i)))
+      (let ((start i))
         (setq i (1+ i))
         (while (and (< i len)
                     (combining-mark-p (aref str i)))