From 302dcbe529e9a71b8fc1f0bb2a398af6642ff1e8 Mon Sep 17 00:00:00 2001
From: Mario Lang <mlang@delysid.org>
Date: Thu, 5 Feb 2004 22:08:45 +0000
Subject: (chess-fen-regexp): New constant.

---
 chess-fen.el | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'chess-fen.el')

diff --git a/chess-fen.el b/chess-fen.el
index f7cb84b..8117afb 100644
--- a/chess-fen.el
+++ b/chess-fen.el
@@ -37,6 +37,9 @@
 ;; relate to the game, not the position.
 ;;
 
+(defconst chess-fen-regexp
+  "^\\([bnrqkpBNRQKP1-8]*/?\\)+ [bw] \\(-\\|[KQkq]+\\) \\(-\\|[1-8]\\)")
+
 (defun chess-fen-to-pos (fen)
   "Convert a FEN-like notation string to a chess position."
   (assert (stringp fen))
-- 
cgit v1.2.3