| define XMLentitiesDec ["#" Digit Digit+ ]; | |
| define XMLentitiesHex ["#" ["x"|"X"] HexLetter HexLetter+ ]; | |
| define XMLentitiesStr [[[AsciiLetter .o. Caseinsensitive].l | Digit | "_" | "-" ] ]; | |
| define XMLEntities ["&" [XMLentitiesDec|XMLentitiesHex|XMLentitiesStr XMLentitiesStr+] ";"]; |