[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] 01/04: [gnugo int] Use ‘ignor e’ to avoid byte-compiler warnings.
From: |
Thien-Thi Nguyen |
Subject: |
[elpa] 01/04: [gnugo int] Use ‘ignor e’ to avoid byte-compiler warnings. |
Date: |
Sat, 12 Apr 2014 10:27:40 +0000 |
ttn pushed a commit to branch master
in repository elpa.
commit 309a68cde5b8b2c48d563cc41f39cb1b623c1469
Author: Thien-Thi Nguyen <address@hidden>
Date: Sat Apr 12 11:27:34 2014 +0200
[gnugo int] Use ‘ignore’ to avoid byte-compiler warnings.
* packages/gnugo/gnugo.el (gnugo-frolic-prune-branch)
(:gnugo-gtp-command-spec final_score): ...here.
---
packages/gnugo/gnugo.el | 8 +++++---
1 files changed, 5 insertions(+), 3 deletions(-)
diff --git a/packages/gnugo/gnugo.el b/packages/gnugo/gnugo.el
index c2d228b..900fcb2 100644
--- a/packages/gnugo/gnugo.el
+++ b/packages/gnugo/gnugo.el
@@ -1073,9 +1073,9 @@ This fails if the monkey is on the current branch
(user-error "Cannot prune with monkey on branch"))
(when (= 1 width)
(user-error "Cannot prune last remaining branch"))
- (let* ((new (append ends nil))
- ;; Gratuitous ‘pop’ rv assignment avoids byte-compiler warning.
- (bye (pop (nthcdr a new))))
+ (let ((new (append ends nil)))
+ ;; Explicit ignorance avoids byte-compiler warning.
+ (ignore (pop (nthcdr a new)))
(gnugo--set-tree-ends tree new))
(when (< a bidx)
(aset monkey 1 (decf bidx)))
@@ -2465,6 +2465,8 @@ starting a new one. See `gnugo-board-mode' documentation
for more info."
(t (message "(no such command: %s)" sel)))))
(deffull final_score
+ ;; Explicit ignorance avoids byte-compiler warning.
+ (ignore sel)
(gnugo-display-final-score))
(defgtp '(boardsize