diff options
| author | Craig Jennings <c@cjennings.net> | 2025-10-19 18:49:00 -0500 |
|---|---|---|
| committer | Craig Jennings <c@cjennings.net> | 2025-10-19 18:49:00 -0500 |
| commit | e1d60d2110987f1060c0b37d032621c669d97d5e (patch) | |
| tree | 2ff171a86f28593da724bb754d80278e74cf8f5d /chess-engine.el | |
| parent | 865b2ab11469f3bd1bc4d7b3669cb4626c37be08 (diff) | |
fix: all: fixes to get emacs-chess working on 30.2
- added lexical-binding headers to all source files
- replaced make-variable-buffer-local with defvar-local throughout source code
- replaced deprecated cl library with cl-lib, including replacing assert with cl-assert to emacs-chess-steps.el
- added proper headers and footers to test files when missing
- populated chess images and chess sounds directory
- fixed defcustom calling directory-files without error handling.
xboard installation no longer required.
Diffstat (limited to 'chess-engine.el')
| -rw-r--r-- | chess-engine.el | 33 |
1 files changed, 11 insertions, 22 deletions
diff --git a/chess-engine.el b/chess-engine.el index 2d6068a..02a0857 100644 --- a/chess-engine.el +++ b/chess-engine.el @@ -1,4 +1,4 @@ -;;; chess-engine.el --- Obtain movements and other information from an engine +;;; chess-engine.el --- Obtain movements and other information from an engine -*- lexical-binding: t; -*- ;; Copyright (C) 2014 Free Software Foundation, Inc. @@ -25,28 +25,17 @@ "Code for reading movements and other commands from an engine." :group 'chess) -(defvar chess-engine-regexp-alist nil) -(defvar chess-engine-response-handler nil) -(defvar chess-engine-current-marker nil) -(defvar chess-engine-pending-offer nil) -(defvar chess-engine-pending-arg nil) -(defvar chess-engine-opponent-name nil) - -(make-variable-buffer-local 'chess-engine-regexp-alist) -(make-variable-buffer-local 'chess-engine-response-handler) -(make-variable-buffer-local 'chess-engine-current-marker) -(make-variable-buffer-local 'chess-engine-pending-offer) -(make-variable-buffer-local 'chess-engine-pending-arg) -(make-variable-buffer-local 'chess-engine-opponent-name) - -(defvar chess-engine-process nil) -(defvar chess-engine-last-pos nil) -(defvar chess-engine-working nil) -(defvar chess-engine-handling-event nil) +(defvar-local chess-engine-regexp-alist nil) +(defvar-local chess-engine-response-handler nil) +(defvar-local chess-engine-current-marker nil) +(defvar-local chess-engine-pending-offer nil) +(defvar-local chess-engine-pending-arg nil) +(defvar-local chess-engine-opponent-name nil) -(make-variable-buffer-local 'chess-engine-process) -(make-variable-buffer-local 'chess-engine-last-pos) -(make-variable-buffer-local 'chess-engine-working) +(defvar-local chess-engine-process nil) +(defvar-local chess-engine-last-pos nil) +(defvar-local chess-engine-working nil) +(defvar chess-engine-handling-event nil) (defvar chess-engine-inhibit-auto-pass nil) |