Problem with vb6 Grammar

[BernieSnoek]

I am using the excellent Atlr4 vb6 Grammar by Wolffgang Ulrich, unfortunatly I have found an issue with the 'doLoopStmt'.

I have a very simple input

Do
Loop While 456

When I try to parse this I get
line 2:0 no viable alternative at input 'Do\nLoop While'

---

The section relating to this is
doLoopStmt:
DO NEWLINE+
(block NEWLINE+)
LOOP (WHILE | UNTIL) WS valueStmt
| DO NEWLINE+
(block NEWLINE+)?
LOOP
| DO WS (WHILE | UNTIL) WS valueStmt NEWLINE+
(block NEWLINE+)?
LOOP
;

The other forms of the doLoopStmt dont have any issues,

Any help would be appreciated

Bernie Snoek