From 7cfee574bbcb97546f6b30a68cef6f9578f691f6 Mon Sep 17 00:00:00 2001 From: "Kevin M. Rosenberg" Date: Tue, 6 May 2003 15:53:47 +0000 Subject: [PATCH] r4847: Auto commit for Debian build --- io-clim.lisp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/io-clim.lisp b/io-clim.lisp index d50f3a8..7516869 100644 --- a/io-clim.lisp +++ b/io-clim.lisp @@ -8,7 +8,7 @@ ;;;; Programer: Kevin M. Rosenberg ;;;; Date Started: 1 Nov 2001 ;;;; -;;;; $Id: io-clim.lisp,v 1.11 2003/05/06 15:51:20 kevin Exp $ +;;;; $Id: io-clim.lisp,v 1.12 2003/05/06 15:53:47 kevin Exp $ ;;;; ;;;; This file is Copyright (c) 2001-2002 by Kevin M. Rosenberg ;;;; @@ -348,7 +348,7 @@ (list-to-delimited-string legal-moves #\space))))) (when (null (player game)) (cond - ((zerop (final-result games)) + ((zerop (final-result game)) (format stream "It's a draw!")) ((plusp (final-result game)) (format stream "Black wins by ~d!" (final-result game))) -- 2.34.1