* Summary: Unicode character range checking | |
* Description: this module exports interfaces for the character | |
* range validation APIs | |
* | |
* Copy: See Copyright for the status of this software. | |
* | |
* Author: Patrick Monnerat <pm@datasphere.ch>, DATASPHERE S.A. | |
/if not defined(XML_CHVALID_H__) | |
/define XML_CHVALID_H__ | |
/include "libxmlrpg/xmlversion" | |
/include "libxmlrpg/xmlstring" | |
* Define our typedefs and structures | |
d xmlChSRangePtr s * based(######typedef######) | |
d xmlChSRange ds based(xmlChSRangePtr) | |
d align qualified | |
d low 5u 0 | |
d high 5u 0 | |
d xmlChLRangePtr s * based(######typedef######) | |
d xmlChLRange ds based(xmlChLRangePtr) | |
d align qualified | |
d low 10u 0 | |
d high 10u 0 | |
d xmlChRangeGroupPtr... | |
d s * based(######typedef######) | |
d xmlChRangeGroup... | |
d ds based(xmlChRangeGroupPtr) | |
d align qualified | |
d nbShortRange 10i 0 | |
d nbLongRange 10i 0 | |
d shortRange like(xmlChSRangePtr) | |
d longRange like(xmlChLRangePtr) | |
* Range checking routine | |
d xmlCharInRange pr 10i 0 extproc('xmlCharInRange') | |
d val 10u 0 value | |
d group like(xmlChRangeGroupPtr) const | |
d xmlIsBaseCharGroup... | |
d ds import('xmlIsBaseCharGroup') | |
d likeds(xmlChRangeGroup) const | |
d xmlIsCharGroup... | |
d ds import('xmlIsCharGroup') | |
d likeds(xmlChRangeGroup) const | |
d xmlIsCombiningGroup... | |
d ds import('xmlIsCombiningGroup') | |
d likeds(xmlChRangeGroup) const | |
d xmlIsDigitGroup... | |
d ds import('xmlIsDigitGroup') | |
d likeds(xmlChRangeGroup) const | |
d xmlIsExtenderGroup... | |
d ds import('xmlIsExtenderGroup') | |
d likeds(xmlChRangeGroup) const | |
d xmlIsIdeographicGroup... | |
d ds import('xmlIsIdeographicGroup') | |
d likeds(xmlChRangeGroup) const | |
d xmlIsBaseChar pr 10i 0 extproc('xmlIsBaseChar') | |
d ch 10u 0 value | |
d xmlIsBlank pr 10i 0 extproc('xmlIsBlank') | |
d ch 10u 0 value | |
d xmlIsChar pr 10i 0 extproc('xmlIsChar') | |
d ch 10u 0 value | |
d xmlIsCombining pr 10i 0 extproc('xmlIsCombining') | |
d ch 10u 0 value | |
d xmlIsDigit pr 10i 0 extproc('xmlIsDigit') | |
d ch 10u 0 value | |
d xmlIsExtender pr 10i 0 extproc('xmlIsExtender') | |
d ch 10u 0 value | |
d xmlIsIdeographic... | |
d pr 10i 0 extproc('xmlIsIdeographic') | |
d ch 10u 0 value | |
d xmlIsPubidChar pr 10i 0 extproc('xmlIsPubidChar') | |
d ch 10u 0 value | |
/endif XML_CHVALID_H__ |