Akron | 6742b96 | 2021-11-09 01:17:20 +0100 | [diff] [blame] | 1 | define XMLentitiesDec ["#" Digit Digit+ ]; |
2 | define XMLentitiesHex ["#" ["x"|"X"] HexLetter HexLetter+ ]; | ||||
Akron | c840636 | 2021-11-09 20:17:50 +0100 | [diff] [blame] | 3 | define XMLentitiesStr [[[AsciiLetter .o. Caseinsensitive].l | Digit | "_" | "-" ] ]; |
Akron | 6742b96 | 2021-11-09 01:17:20 +0100 | [diff] [blame] | 4 | |
Akron | c840636 | 2021-11-09 20:17:50 +0100 | [diff] [blame] | 5 | read regex ["&" [XMLentitiesDec|XMLentitiesHex|XMLentitiesStr XMLentitiesStr+] ";"]; |