;; Copyright (C) 1991-2009, 2010 Unicode, Inc. ;; This file was generated from the Unicode data file at ;; http://www.unicode.org/Public/UNIDATA/UnicodeData.txt. ;; See lisp/international/README for the copyright and permission notice. (define-char-code-property 'digit-value #^[nil nil char-code-property-table "° " #^^[1 0 #^^[2 0 "° " "²…" t t t t t t t t t t "à " "ð " t "À " t t "æ " "æ " "æ " "æ " "æ " "æ " "æ " "æ " "æ " t "Ð " "Ð " "  " t] #^^[2 4096 "À " " " t t t t "é " t t t t t t t t "à " " " t "Æ " "Ð " t " † " "Ð " "° " "À † " t t t t t t t] #^^[2 8192 "ðƒ " " " t t t t t t "à ‹ " "ˆ ÙŠ " t t t t "ö " "  " t t t t t t t t t t t t t t t t] t t t t t t t #^^[2 40960 t t t t t t t t t t t t "  " t t t t "Ð " " " "Ð " "Ð " t t "ð " t t t t t t t t] t t t t #^^[2 61440 t t t t t t t t t t t t t t t t t t t t t t t t t t t t t t " " t]] #^^[1 65536 #^^[2 65536 t t t t t t t t t "  " t t t t t t t t t t "À" t t t t t t t "à " t t t] #^^[2 69632 "Ò ‹ " t t t t t t t t t t t t t t t t t t t t t t t t t t t t t t t] t t t t t t t t t t t #^^[2 118784 t t t t t t t t t t t t t t t "Î     " t t t t t t t t t t t t t t t t] t #^^[2 126976 t t " " t t t t t t t t t t t t t t t t t t t t t t t t t t t t t]] t t t t t t t t t t t t t t t t t t t t t t t t t t t t t t t t t t t t t t t t t t t t t t t t t t t t t t t t t t t t t t digit-value #[(char val table) "\306\307\" \250\203 \202\236 ;\205\236\310\211 \311\"\312\" \211G\313\314\211W\203\233HT\211W\203LH\202M\315 \313V\205X SH \316W\203c\315\202k \316ZT\211\313W\203\227 I\210 U\203\211 TT\211\202t*\202* .)\207" [table val-table val char count this-val char-table-extra-slot 4 lsh -7 7 0 nil 1 128 idx len str first-char i --dotimes-limit--] 7] #[(char val table) "\250\204\203\304\305\"\210 H\211=?\205+ ;\203'\306 \307\" #\210 I)\207" [val table char current-val error "Not an integer nor nil: %S" char-table-extra-slot 1] 5] nil [0 1 2 3 4 5 6 7 8 9]] "Unicode numeric value (digit). Property value is an integer.") ;; Local Variables: ;; coding: utf-8 ;; no-byte-compile: t ;; End: ;; uni-digit.el ends here