Allow lower-case promochar in moves of type h8=Q

Updated the parser rules. Other move formats already allowed this.

diff --git a/parser.l b/parser.l
index 348bd15..f17cd8a 100644 (file)
--- a/parser.l
+++ b/parser.l
@@ -325,7 +325,7 @@ extern void CopyBoard P((Board to, Board from));
     return (int) result;\r
 }\r
 \r
-[a-l][0-9]((=?\(?[A-Z]\)?)|=)?       {\r
+[a-l][0-9]((=?\(?[A-Za-z]\)?)|=)?       {\r
     /*\r
      * Pawn move, possibly with promotion\r
      */\r
@@ -343,7 +343,7 @@ extern void CopyBoard P((Board to, Board from));
     cl.ffIn = yytext[0] - AAA;\r
     cl.rtIn = yytext[1] - ONE;\r
     cl.ftIn = yytext[0] - AAA;\r
-    c = cl.promoCharIn = yytext[2+skip];\r
+    c = cl.promoCharIn = ToLower(yytext[2+skip]);\r
 \r
     /* [HGM] do not allow values beyond board size */\r
     if(cl.rtIn >= BOARD_HEIGHT ||\r