From b24315b28140dac7cf10828394ff347c4ad3e985 Mon Sep 17 00:00:00 2001 From: John Wiegley Date: Mon, 15 Apr 2002 02:07:36 +0000 Subject: *** no comment *** --- chess-game.el | 3 +++ 1 file changed, 3 insertions(+) (limited to 'chess-game.el') diff --git a/chess-game.el b/chess-game.el index 9832372..73176b6 100644 --- a/chess-game.el +++ b/chess-game.el @@ -98,6 +98,9 @@ matches." (defsubst chess-game-data-alist (game) (nth 2 game)) +(defsubst chess-game-set-data-alist (game value) + (setcar (nthcdr 2 game) value)) + (defun chess-game-set-data (game key value) (let* ((alist (chess-game-data-alist game)) (cell (assq key alist))) -- cgit v1.2.3