From bc1b6e4f3789f4401ac5fe9bb9708459648345b0 Mon Sep 17 00:00:00 2001
From: John Wiegley <johnw@newartisans.com>
Date: Wed, 3 Apr 2002 02:11:46 +0000
Subject: More work to get engines working.

---
 chess-engine.el | 5 +++++
 1 file changed, 5 insertions(+)

(limited to 'chess-engine.el')

diff --git a/chess-engine.el b/chess-engine.el
index 3bbfb91..678f5c3 100644
--- a/chess-engine.el
+++ b/chess-engine.el
@@ -139,6 +139,11 @@
 
 (defun chess-engine-move (engine ply)
   (chess-with-current-buffer engine
+    (cond
+     (chess-engine-game
+      (chess-game-move chess-engine-game ply))
+     (chess-engine-position
+      (apply 'chess-pos-move ply)))
     (chess-engine-command engine 'move ply)))
 
 (defun chess-engine-pass (engine ply)
-- 
cgit v1.2.3