diff options
| author | Mario Lang <mlang@delysid.org> | 2014-05-20 03:25:59 +0200 |
|---|---|---|
| committer | Mario Lang <mlang@delysid.org> | 2014-05-20 03:25:59 +0200 |
| commit | 8f0f2044b5445722aff29a0c58461a794564f13a (patch) | |
| tree | 0b2a8af14062b02a16e439125c8738cbcea67765 /chess-pos.el | |
| parent | 940fce2ade6a25bf4462330f2feea8ef5a39906f (diff) | |
Eliminate the circular dependency between chess-pos and chess-fen.
We remove functions chess-pos-to-string and chess-pos-from-string which
are really just aliases for chess-fen-to-pos and chess-pos-to-fen.
Diffstat (limited to 'chess-pos.el')
| -rw-r--r-- | chess-pos.el | 14 |
1 files changed, 0 insertions, 14 deletions
diff --git a/chess-pos.el b/chess-pos.el index b6b1bde..c205069 100644 --- a/chess-pos.el +++ b/chess-pos.el @@ -84,7 +84,6 @@ ;;; Code: (require 'chess-message) -(require 'chess-fen) (eval-when-compile (require 'cl-lib) (cl-proclaim '(optimize (speed 3) (safety 2)))) @@ -679,19 +678,6 @@ The current side-to-move is always white." [nil nil nil nil nil nil t nil nil nil nil]) (chess-pos-copy chess-starting-position))) -(defsubst chess-pos-to-string (position &optional full) - "Convert the given POSITION into a string. -The returned string can be converted back to a position using -`chess-pos-from-string'." - (cl-assert (vectorp position)) - (chess-pos-to-fen position full)) - -(defsubst chess-pos-from-string (string) - "Convert the given STRING to a chess position. -This string should have been created by `chess-pos-to-string'." - (cl-assert (stringp string)) - (chess-fen-to-pos string)) - (defconst chess-pos-piece-values '((?p . 1) (?n . 3) |
