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