From 62c13bcfa1933274be856ac5840a933bbaca5f27 Mon Sep 17 00:00:00 2001 From: John Wiegley Date: Mon, 22 Apr 2002 19:23:45 +0000 Subject: Bug fixes and reducing the TODO list. --- chess-ply.el | 7 +++++++ 1 file changed, 7 insertions(+) (limited to 'chess-ply.el') diff --git a/chess-ply.el b/chess-ply.el index 1bfbfcf..750e8b2 100644 --- a/chess-ply.el +++ b/chess-ply.el @@ -44,6 +44,7 @@ ;;; Code: (require 'chess-pos) +(require 'chess-algebraic) (defgroup chess-ply nil "Routines for manipulating chess plies." @@ -98,6 +99,12 @@ (apply 'chess-pos-move (chess-pos-copy (chess-ply-pos ply)) (chess-ply-changes ply))) +(defsubst chess-ply-to-string (ply &optional long) + (chess-ply-to-algebraic ply long)) + +(defsubst chess-ply-from-string (position move) + (chess-algebraic-to-ply position move)) + (defconst chess-piece-name-table '(("queen" . ?q) ("rook" . ?r) -- cgit v1.2.3