From d3bd3c6f07e0c9a2a7a1488e43b47439a5f8ac54 Mon Sep 17 00:00:00 2001 From: Mario Lang Date: Wed, 4 Jun 2014 22:43:13 +0200 Subject: Sync from ELPA. --- chess-crafty.el | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) (limited to 'chess-crafty.el') diff --git a/chess-crafty.el b/chess-crafty.el index 11245b6..ea78090 100644 --- a/chess-crafty.el +++ b/chess-crafty.el @@ -76,7 +76,6 @@ ;; We can translate this information to EPD opcodes (let ((depth (read (match-string 1))) (centipawn (read (match-string 2))) - (nodes (match-string 4)) (pos (chess-engine-position nil))) (chess-pos-set-epd pos 'acd depth) (chess-pos-set-epd pos 'ce centipawn) @@ -164,10 +163,10 @@ (chess-engine-send nil "hard\n") (chess-engine-send nil "easy\n"))) ((eq (car args) 'search-depth) - (assert (and (integerp (cadr args)) (>= (cadr args) 0))) + (cl-assert (and (integerp (cadr args)) (>= (cadr args) 0))) (chess-engine-send nil (format "sd %d\n" (cadr args)))) ((eq (car args) 'search-time) - (assert (and (integerp (cadr args)) (> (cadr args) 0))) + (cl-assert (and (integerp (cadr args)) (> (cadr args) 0))) (chess-engine-send nil (format "st %d\n" (cadr args)))))) (t -- cgit v1.2.3