summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMario Lang <mlang@delysid.org>2014-05-19 00:11:28 +0200
committerMario Lang <mlang@delysid.org>2014-05-19 00:11:28 +0200
commit013b61236d78f50422bcc80470c55efb0c1e0b4e (patch)
tree6cbc7cbc2600cac23d58acfa614f70c4b56f3177
parentf489b5a6dcb36decfebdb73924dc69b67e323484 (diff)
Convert some file headers to the standard form including license.
-rw-r--r--chess-display.el30
-rw-r--r--chess-fen.el32
-rw-r--r--chess-ply.el24
-rw-r--r--chess-pos.el30
4 files changed, 93 insertions, 23 deletions
diff --git a/chess-display.el b/chess-display.el
index 6f832da..a83d95e 100644
--- a/chess-display.el
+++ b/chess-display.el
@@ -1,7 +1,29 @@
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-;;
-;; Code shared by all chess displays
-;;
+;;; chess-display.el --- Code shared by all chess displays
+
+;; Copyright (C) 2002, 2004, 2005, 2008, 2014 Free Software Foundation, Inc.
+
+;; Author: John Wiegley <johnw@gnu.org>
+;; Maintainer: Mario Lang <mlang@delysid.org>
+;; Keywords: games
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program. If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This file contains common code for all chessboard displays.
+
+;;; Code:
(require 'chess-message)
(require 'chess-module)
diff --git a/chess-fen.el b/chess-fen.el
index 00eacd6..568e461 100644
--- a/chess-fen.el
+++ b/chess-fen.el
@@ -1,7 +1,26 @@
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-;;
-;; Convert a chess position to/from FEN notation
-;;
+;;; chess-fen.el --- Convert a chess position to/from FEN notation
+
+;; Copyright (C) 2002, 2004, 2014 Free Software Foundation, Inc.
+
+;; Author: John Wiegley <johnw@gnu.org>
+;; Maintainer: Mario Lang <mlang@delysid.org>
+;; Keywords: games
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program. If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
;; FEN notation encodes a chess position using a simple string. The
;; format is:
;;
@@ -35,9 +54,10 @@
;;
;; It may also have the current game sequence appended, but this
;; relate to the game, not the position.
-;;
-(eval-when-compile (require 'cl))
+;;; Code:
+
+(eval-when-compile (require 'cl-lib))
(defconst chess-fen-regexp
"^\\([bnrqkpBNRQKP1-8]*/?\\)+ [bw] \\(-\\|[KQkq]+\\) \\(-\\|[1-8]\\)")
diff --git a/chess-ply.el b/chess-ply.el
index a506b79..efc26b5 100644
--- a/chess-ply.el
+++ b/chess-ply.el
@@ -1,7 +1,23 @@
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-;;
-;; Routines for manipulating chess plies
-;;
+;;; chess-ply.el --- Routines for manipulating chess plies
+
+;; Copyright (C) 2002, 2004, 2008, 2014 Free Software Foundation, Inc.
+
+;; Author: John Wiegley <johnw@gnu.org>
+;; Maintainer: Mario Lang <mlang@delysid.org>
+;; Keywords: games
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program. If not, see <http://www.gnu.org/licenses/>.
;;; Commentary:
diff --git a/chess-pos.el b/chess-pos.el
index c8321d2..b6b1bde 100644
--- a/chess-pos.el
+++ b/chess-pos.el
@@ -1,7 +1,23 @@
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-;;
-;; Routines for manipulating chess positions
-;;
+;;; chess-pos.el --- Routines for manipulating chess positions
+
+;; Copyright (C) 2002, 2004, 2014 Free Software Foundation, Inc.
+
+;; Author: John Wiegley <johnw@gnu.org>
+;; Maintainer: Mario Lang <mlang@delysid.org>
+;; Keywords: games
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program. If not, see <http://www.gnu.org/licenses/>.
;;; Commentary:
@@ -51,10 +67,6 @@
;; (chess-pos-search POSITION PIECE)
;; (chess-pos-search* POSITION PIECE...)
;;
-;; You might also try the `search' event, which employs the
-;; intelligence of listening rules modules to search out your piece
-;; according to legal piece movements.
-
;; Once you have a pair of indices, you can move a piece around:
;;
;; (chess-pos-move POSITION FROM-INDEX TO-INDEX)
@@ -920,7 +932,7 @@ If NO-CASTLING is non-nil, do not consider castling moves."
;; test for knights and pawns
(dolist (p (if piece '(?P ?N) '(?p ?n)))
(mapc 'chess--add-candidate
- (chess-search-position position target p check-only)))
+ (chess-search-position position target p check-only no-castling)))
;; test whether the rook or king can move to the target by castling
(unless no-castling