2
0

chvalid.inc 5.0 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231
  1. (*
  2. * Summary: Unicode character range checking
  3. * Description: this module exports interfaces for the character
  4. * range validation APIs
  5. *
  6. * This file is automatically generated from the cvs source
  7. * definition files using the genChRanges.py Python script
  8. *
  9. * Generation date: Mon Mar 27 11:09:48 2006
  10. * Sources: chvalid.def
  11. * Author: William Brack <[email protected]>
  12. *)
  13. {$IFDEF POINTER}
  14. xmlChSRangePtr = ^xmlChSRange;
  15. xmlChLRangePtr = ^xmlChLRange;
  16. xmlChRangeGroupPtr = ^xmlChRangeGroup;
  17. {$ENDIF}
  18. {$IFDEF TYPE}
  19. (*
  20. * Define our typedefs and structures
  21. *
  22. *)
  23. xmlChSRange = record
  24. low : cushort;
  25. high : cushort;
  26. end;
  27. xmlChLRange = record
  28. low : cuint;
  29. high : cuint;
  30. end;
  31. xmlChRangeGroup = record
  32. nbShortRange : cint;
  33. nbLongRange : cint;
  34. shortRange : xmlChSRangePtr;
  35. longRange : xmlChLRangePtr;
  36. end;
  37. {$ENDIF}
  38. {$IFDEF FUNCTION}
  39. (**
  40. * Range checking routine
  41. *)
  42. function xmlCharInRange(val: cint; group: xmlChRangeGroupPtr): cbool; EXTDECL; external xml2lib;
  43. (**
  44. * xmlIsBaseChar_ch:
  45. * @c: char to validate
  46. *
  47. * Automatically generated by genChRanges.py
  48. *)
  49. function xmlIsBaseChar_ch(c: cint): cbool;
  50. (**
  51. * xmlIsBaseCharQ:
  52. * @c: char to validate
  53. *
  54. * Automatically generated by genChRanges.py
  55. *)
  56. function xmlIsBaseCharQ(c: cint): cbool;
  57. {$IFNDEF NO_EXTERNAL_VARS}
  58. var
  59. xmlIsBaseCharGroup: xmlChRangeGroup; cvar; external;
  60. __xmlIsBaseCharGroup: xmlChRangeGroupPtr = @xmlIsBaseCharGroup;
  61. {$ELSE}
  62. var
  63. __xmlIsBaseCharGroup: xmlChRangeGroupPtr;
  64. {$ENDIF}
  65. (**
  66. * xmlIsBlank_ch:
  67. * @c: char to validate
  68. *
  69. * Automatically generated by genChRanges.py
  70. *)
  71. function xmlIsBlank_ch(c: cint): cbool;
  72. (**
  73. * xmlIsBlankQ:
  74. * @c: char to validate
  75. *
  76. * Automatically generated by genChRanges.py
  77. *)
  78. function xmlIsBlankQ(c: cint): cbool;
  79. (**
  80. * xmlIsChar_ch:
  81. * @c: char to validate
  82. *
  83. * Automatically generated by genChRanges.py
  84. *)
  85. function xmlIsChar_ch(c: cint): cbool;
  86. (**
  87. * xmlIsCharQ:
  88. * @c: char to validate
  89. *
  90. * Automatically generated by genChRanges.py
  91. *)
  92. function xmlIsCharQ(c: cint): cbool;
  93. {$IFNDEF NO_EXTERNAL_VARS}
  94. var
  95. xmlIsCharGroup: xmlChRangeGroup; cvar; external;
  96. __xmlIsCharGroup: xmlChRangeGroupPtr = @xmlIsCharGroup;
  97. {$ELSE}
  98. var
  99. __xmlIsCharGroup: xmlChRangeGroupPtr;
  100. {$ENDIF}
  101. (**
  102. * xmlIsCombiningQ:
  103. * @c: char to validate
  104. *
  105. * Automatically generated by genChRanges.py
  106. *)
  107. function xmlIsCombiningQ(c: cint): cbool;
  108. {$IFNDEF NO_EXTERNAL_VARS}
  109. var
  110. xmlIsCombiningGroup: xmlChRangeGroup; cvar; external;
  111. __xmlIsCombiningGroup: xmlChRangeGroupPtr = @xmlIsCombiningGroup;
  112. {$ELSE}
  113. var
  114. __xmlIsCombiningGroup: xmlChRangeGroupPtr;
  115. {$ENDIF}
  116. (**
  117. * xmlIsDigit_ch:
  118. * @c: char to validate
  119. *
  120. * Automatically generated by genChRanges.py
  121. *)
  122. function xmlIsDigit_ch(c: cint): cbool;
  123. (**
  124. * xmlIsDigitQ:
  125. * @c: char to validate
  126. *
  127. * Automatically generated by genChRanges.py
  128. *)
  129. function xmlIsDigitQ(c: cint): cbool;
  130. {$IFNDEF NO_EXTERNAL_VARS}
  131. var
  132. xmlIsDigitGroup: xmlChRangeGroup; cvar; external;
  133. __xmlIsDigitGroup: xmlChRangeGroupPtr = @xmlIsDigitGroup;
  134. {$ELSE}
  135. var
  136. __xmlIsDigitGroup: xmlChRangeGroupPtr;
  137. {$ENDIF}
  138. (**
  139. * xmlIsExtender_ch:
  140. * @c: char to validate
  141. *
  142. * Automatically generated by genChRanges.py
  143. *)
  144. function xmlIsExtender_ch(c: cint): cbool;
  145. (**
  146. * xmlIsExtenderQ:
  147. * @c: char to validate
  148. *
  149. * Automatically generated by genChRanges.py
  150. *)
  151. function xmlIsExtenderQ(c: cint): cbool;
  152. {$IFNDEF NO_EXTERNAL_VARS}
  153. var
  154. xmlIsExtenderGroup: xmlChRangeGroup; cvar; external;
  155. __xmlIsExtenderGroup: xmlChRangeGroupPtr = @xmlIsExtenderGroup;
  156. {$ELSE}
  157. var
  158. __xmlIsExtenderGroup: xmlChRangeGroupPtr;
  159. {$ENDIF}
  160. (**
  161. * xmlIsIdeographicQ:
  162. * @c: char to validate
  163. *
  164. * Automatically generated by genChRanges.py
  165. *)
  166. function xmlIsIdeographicQ(c: cint): cbool;
  167. type
  168. pchar_tab = ^char_tab;
  169. char_tab = array[0..255] of cbool;
  170. {$IFNDEF NO_EXTERNAL_VARS}
  171. var
  172. xmlIsIdeographicGroup: xmlChRangeGroup; cvar; external;
  173. __xmlIsIdeographicGroup: xmlChRangeGroupPtr = @xmlIsIdeographicGroup;
  174. xmlIsPubidChar_tab: char_tab; cvar; external;
  175. __xmlIsPubidChar_tab: pchar_tab = @xmlIsPubidChar_tab;
  176. {$ELSE}
  177. var
  178. __xmlIsIdeographicGroup: xmlChRangeGroupPtr;
  179. __xmlIsPubidChar_tab: pchar_tab;
  180. {$ENDIF}
  181. (**
  182. * xmlIsPubidChar_ch:
  183. * @c: char to validate
  184. *
  185. * Automatically generated by genChRanges.py
  186. *)
  187. function xmlIsPubidChar_ch(c: cint): cbool;
  188. (**
  189. * xmlIsPubidCharQ:
  190. * @c: char to validate
  191. *
  192. * Automatically generated by genChRanges.py
  193. *)
  194. function xmlIsPubidCharQ(c: cint): cbool;
  195. function xmlIsBaseChar(ch: cuint): cbool; EXTDECL; external xml2lib;
  196. function xmlIsBlank(ch: cuint): cbool; EXTDECL; external xml2lib;
  197. function xmlIsChar(ch: cuint): cbool; EXTDECL; external xml2lib;
  198. function xmlIsCombining(ch: cuint): cbool; EXTDECL; external xml2lib;
  199. function xmlIsDigit(ch: cuint): cbool; EXTDECL; external xml2lib;
  200. function xmlIsExtender(ch: cuint): cbool; EXTDECL; external xml2lib;
  201. function xmlIsIdeographic(ch: cuint): cbool; EXTDECL; external xml2lib;
  202. function xmlIsPubidChar(ch: cuint): cbool; EXTDECL; external xml2lib;
  203. {$ENDIF}