blob: 023ddcb71b0b740b148ea84d69153993dcfe7269 (plain)

ofs	hex dump	ascii
0000	3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 31 39 39 31 2d 32 30 30 39 20 55 6e 69 63 6f	;;.Copyright.(C).1991-2009.Unico
0020	64 65 2c 20 49 6e 63 2e 0a 3b 3b 20 54 68 69 73 20 66 69 6c 65 20 77 61 73 20 67 65 6e 65 72 61	de,.Inc..;;.This.file.was.genera
0040	74 65 64 20 66 72 6f 6d 20 74 68 65 20 55 6e 69 63 6f 64 65 20 64 61 74 61 20 66 69 6c 65 20 61	ted.from.the.Unicode.data.file.a
0060	74 0a 3b 3b 20 68 74 74 70 3a 2f 2f 77 77 77 2e 75 6e 69 63 6f 64 65 2e 6f 72 67 2f 50 75 62 6c	t.;;.http://www.unicode.org/Publ
0080	69 63 2f 55 4e 49 44 41 54 41 2f 55 6e 69 63 6f 64 65 44 61 74 61 2e 74 78 74 2e 0a 3b 3b 20 53	ic/UNIDATA/UnicodeData.txt..;;.S
00a0	65 65 20 6c 69 73 70 2f 69 6e 74 65 72 6e 61 74 69 6f 6e 61 6c 2f 52 45 41 44 4d 45 20 66 6f 72	ee.lisp/international/README.for
00c0	20 74 68 65 20 63 6f 70 79 72 69 67 68 74 20 61 6e 64 20 70 65 72 6d 69 73 73 69 6f 6e 20 6e 6f	.the.copyright.and.permission.no
00e0	74 69 63 65 2e 0a 28 64 65 66 69 6e 65 2d 63 68 61 72 2d 63 6f 64 65 2d 70 72 6f 70 65 72 74 79	tice..(define-char-code-property
0100	20 27 64 69 67 69 74 2d 76 61 6c 75 65 20 23 5e 5b 6e 69 6c 20 6e 69 6c 20 63 68 61 72 2d 63 6f	.'digit-value.#^[nil.nil.char-co
0120	64 65 2d 70 72 6f 70 65 72 74 79 2d 74 61 62 6c 65 20 22 00 c2 b0 01 02 03 04 05 06 07 08 09 0a	de-property-table.".............
0140	22 20 23 5e 5e 5b 31 20 30 20 23 5e 5e 5b 32 20 30 20 22 00 c2 b0 01 02 03 04 05 06 07 08 09 0a	".#^^[1.0.#^^[2.0.".............
0160	22 20 22 00 c2 b2 03 04 00 c2 85 02 22 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20	".".........".t.t.t.t.t.t.t.t.t.
0180	74 20 22 00 c3 a0 01 02 03 04 05 06 07 08 09 0a 22 20 22 00 c3 b0 01 02 03 04 05 06 07 08 09 0a	t.".............".".............
01a0	22 20 74 20 22 00 c3 80 01 02 03 04 05 06 07 08 09 0a 22 20 74 20 74 20 22 00 c3 a6 01 02 03 04	".t.".............".t.t.".......
01c0	05 06 07 08 09 0a 22 20 22 00 c3 a6 01 02 03 04 05 06 07 08 09 0a 22 20 22 00 c3 a6 01 02 03 04	......".".............".".......
01e0	05 06 07 08 09 0a 22 20 22 00 c3 a6 01 02 03 04 05 06 07 08 09 0a 22 20 22 00 c3 a6 01 02 03 04	......".".............".".......
0200	05 06 07 08 09 0a 22 20 22 00 c3 a6 01 02 03 04 05 06 07 08 09 0a 22 20 22 00 c3 a6 01 02 03 04	......".".............".".......
0220	05 06 07 08 09 0a 22 20 22 00 c3 a6 01 02 03 04 05 06 07 08 09 0a 22 20 22 00 c3 a6 01 02 03 04	......".".............".".......
0240	05 06 07 08 09 0a 22 20 74 20 22 00 c3 90 01 02 03 04 05 06 07 08 09 0a 22 20 22 00 c3 90 01 02	......".t.".............".".....
0260	03 04 05 06 07 08 09 0a 22 20 22 00 c2 a0 01 02 03 04 05 06 07 08 09 0a 22 20 74 5d 20 23 5e 5e	........".".............".t].#^^
0280	5b 32 20 34 30 39 36 20 22 00 c3 80 01 02 03 04 05 06 07 08 09 0a 22 20 22 00 c2 90 01 02 03 04	[2.4096.".............".".......
02a0	05 06 07 08 09 0a 22 20 74 20 74 20 74 20 74 20 22 00 c3 a9 02 03 04 05 06 07 08 09 0a 22 20 74	......".t.t.t.t."............".t
02c0	20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 22 00 c3 a0 01 02 03 04 05 06 07 08 09 0a 22 20 22	.t.t.t.t.t.t.t."............."."
02e0	00 c2 90 01 02 03 04 05 06 07 08 09 0a 22 20 74 20 22 00 c3 86 01 02 03 04 05 06 07 08 09 0a 22	.............".t."............."
0300	20 22 00 c3 90 01 02 03 04 05 06 07 08 09 0a 02 22 20 74 20 22 01 02 03 04 05 06 07 08 09 0a 00	."..............".t."...........
0320	c2 86 01 02 03 04 05 06 07 08 09 0a 22 20 22 00 c3 90 01 02 03 04 05 06 07 08 09 0a 22 20 22 00	............".".............".".
0340	c2 b0 01 02 03 04 05 06 07 08 09 0a 22 20 22 00 c3 80 01 02 03 04 05 06 07 08 09 0a 00 c2 86 01	............".".................
0360	02 03 04 05 06 07 08 09 0a 22 20 74 20 74 20 74 20 74 20 74 20 74 20 74 5d 20 23 5e 5e 5b 32 20	.........".t.t.t.t.t.t.t].#^^[2.
0380	38 31 39 32 20 22 00 c3 b0 01 00 c2 83 05 06 07 08 09 0a 22 20 22 01 02 03 04 05 06 07 08 09 0a	8192."............."."..........
03a0	22 20 74 20 74 20 74 20 74 20 74 20 74 20 22 00 c3 a0 02 03 04 05 06 07 08 09 0a 00 c2 8b 02 03	".t.t.t.t.t.t.".................
03c0	04 05 06 07 08 09 0a 22 20 22 00 c2 88 02 03 04 05 06 07 08 09 0a 00 c3 99 01 00 c2 8a 02 03 04	......."."......................
03e0	05 06 07 08 09 0a 00 01 22 20 74 20 74 20 74 20 74 20 22 00 c3 b6 02 03 04 05 06 07 08 09 0a 22	........".t.t.t.t."............"
0400	20 22 02 03 04 05 06 07 08 09 0a 00 02 03 04 05 06 07 08 09 0a 22 20 74 20 74 20 74 20 74 20 74	."...................".t.t.t.t.t
0420	20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 5d 20 74 20 74 20 74 20 74 20	.t.t.t.t.t.t.t.t.t.t.t].t.t.t.t.
0440	74 20 74 20 74 20 23 5e 5e 5b 32 20 34 30 39 36 30 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20	t.t.t.#^^[2.40960.t.t.t.t.t.t.t.
0460	74 20 74 20 74 20 74 20 74 20 22 00 c2 a0 01 02 03 04 05 06 07 08 09 0a 22 20 74 20 74 20 74 20	t.t.t.t.t.".............".t.t.t.
0480	74 20 22 00 c3 90 01 02 03 04 05 06 07 08 09 0a 22 20 22 01 02 03 04 05 06 07 08 09 0a 22 20 22	t.".............".".........."."
04a0	00 c3 90 01 02 03 04 05 06 07 08 09 0a 22 20 22 00 c3 90 01 02 03 04 05 06 07 08 09 0a 22 20 74	.............".".............".t
04c0	20 74 20 22 00 c3 b0 01 02 03 04 05 06 07 08 09 0a 22 20 74 20 74 20 74 20 74 20 74 20 74 20 74	.t.".............".t.t.t.t.t.t.t
04e0	20 74 5d 20 74 20 74 20 74 20 74 20 23 5e 5e 5b 32 20 36 31 34 34 30 20 74 20 74 20 74 20 74 20	.t].t.t.t.t.#^^[2.61440.t.t.t.t.
0500	74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20	t.t.t.t.t.t.t.t.t.t.t.t.t.t.t.t.
0520	74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 22 00 c2 90 01 02 03 04 05 06 07 08	t.t.t.t.t.t.t.t.t.t."...........
0540	09 0a 22 20 74 5d 5d 20 23 5e 5e 5b 31 20 36 35 35 33 36 20 23 5e 5e 5b 32 20 36 35 35 33 36 20	..".t]].#^^[1.65536.#^^[2.65536.
0560	74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 22 00 c2 a0 01 02 03 04 05 06 07 08 09 0a	t.t.t.t.t.t.t.t.t.".............
0580	22 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 22 00 c3 80 02 03 04 05 22 20	".t.t.t.t.t.t.t.t.t.t.".......".
05a0	74 20 74 20 74 20 74 20 74 20 74 20 74 20 22 00 c3 a0 02 03 04 05 06 07 08 09 0a 22 20 74 20 74	t.t.t.t.t.t.t."............".t.t
05c0	20 74 5d 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 23 5e 5e 5b	.t].t.t.t.t.t.t.t.t.t.t.t.t.#^^[
05e0	32 20 31 31 38 37 38 34 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74	2.118784.t.t.t.t.t.t.t.t.t.t.t.t
0600	20 74 20 74 20 74 20 22 00 c3 8e 01 02 03 04 05 06 07 08 09 0a 01 02 03 04 05 06 07 08 09 0a 01	.t.t.t."........................
0620	02 03 04 05 06 07 08 09 0a 01 02 03 04 05 06 07 08 09 0a 01 02 03 04 05 06 07 08 09 0a 22 20 74	.............................".t
0640	20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 5d 20	.t.t.t.t.t.t.t.t.t.t.t.t.t.t.t].
0660	74 20 23 5e 5e 5b 32 20 31 32 36 39 37 36 20 74 20 74 20 22 01 01 02 03 04 05 06 07 08 09 0a 22	t.#^^[2.126976.t.t."..........."
0680	20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74	.t.t.t.t.t.t.t.t.t.t.t.t.t.t.t.t
06a0	20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 5d 5d 20 74 20 74	.t.t.t.t.t.t.t.t.t.t.t.t.t]].t.t
06c0	20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74	.t.t.t.t.t.t.t.t.t.t.t.t.t.t.t.t
06e0	20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74	.t.t.t.t.t.t.t.t.t.t.t.t.t.t.t.t
0700	20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74	.t.t.t.t.t.t.t.t.t.t.t.t.t.t.t.t
0720	20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 74 20 64 69 67 69 74 2d 76	.t.t.t.t.t.t.t.t.t.t.t.t.digit-v
0740	61 6c 75 65 20 23 5b 28 63 68 61 72 20 76 61 6c 20 74 61 62 6c 65 29 20 22 5c 33 30 36 08 5c 33	alue.#[(char.val.table)."\306.\3
0760	30 37 5c 22 19 0a 5c 32 35 30 5c 32 30 33 0e 00 0a 5c 32 30 32 5c 32 33 36 00 0a 3b 5c 32 30 35	07\"..\250\203...\202\236..;\205
0780	5c 32 33 36 00 5c 33 31 30 5c 32 31 31 0b 5c 33 31 31 5c 22 5c 33 31 32 5c 22 0a 5c 32 31 31 47	\236.\310\211.\311\"\312\".\211G
07a0	5c 33 31 33 5c 33 31 34 5c 32 31 31 1c 1d 1e 0f 1e 10 1e 11 1e 12 0e 0f 0e 10 57 5c 32 30 33 5c	\313\314\211..............W\203\
07c0	32 33 33 00 0e 11 0e 0f 48 12 0e 0f 54 5c 32 31 31 16 0f 0e 10 57 5c 32 30 33 4c 00 0e 11 0e 0f	233.....H...T\211....W\203L.....
07e0	48 5c 32 30 32 4d 00 5c 33 31 35 14 0a 5c 33 31 33 56 5c 32 30 35 58 00 09 0a 53 48 12 0c 5c 33	H\202M.\315..\313V\205X...SH..\3
0800	31 36 57 5c 32 30 33 63 00 5c 33 31 35 5c 32 30 32 6b 00 0c 5c 33 31 36 5a 0e 0f 54 16 0f 5c 32	16W\203c.\315\202k..\316Z..T..\2
0820	31 31 14 5c 33 31 33 1e 13 1e 14 0e 13 0e 14 57 5c 32 30 33 5c 32 32 37 00 08 0e 12 0a 49 5c 32	11.\313........W\203\227.....I\2
0840	31 30 0e 12 0b 55 5c 32 30 33 5c 32 31 31 00 0a 15 0e 12 54 16 12 0e 13 54 5c 32 31 31 16 13 5c	10...U\203\211.....T....T\211..\
0860	32 30 32 74 00 2a 5c 32 30 32 2a 00 0d 2e 06 29 5c 32 30 37 22 20 5b 74 61 62 6c 65 20 76 61 6c	202t.*\202*....)\207".[table.val
0880	2d 74 61 62 6c 65 20 76 61 6c 20 63 68 61 72 20 63 6f 75 6e 74 20 74 68 69 73 2d 76 61 6c 20 63	-table.val.char.count.this-val.c
08a0	68 61 72 2d 74 61 62 6c 65 2d 65 78 74 72 61 2d 73 6c 6f 74 20 34 20 6c 73 68 20 2d 37 20 37 20	har-table-extra-slot.4.lsh.-7.7.
08c0	30 20 6e 69 6c 20 31 20 31 32 38 20 69 64 78 20 6c 65 6e 20 73 74 72 20 66 69 72 73 74 2d 63 68	0.nil.1.128.idx.len.str.first-ch
08e0	61 72 20 69 20 2d 2d 64 6f 74 69 6d 65 73 2d 6c 69 6d 69 74 2d 2d 5d 20 37 5d 20 23 5b 28 63 68	ar.i.--dotimes-limit--].7].#[(ch
0900	61 72 20 76 61 6c 20 74 61 62 6c 65 29 20 22 08 5c 32 35 30 5c 32 30 34 0e 00 08 5c 32 30 33 0e	ar.val.table).".\250\204...\203.
0920	00 5c 33 30 34 5c 33 30 35 08 5c 22 5c 32 31 30 09 0a 48 5c 32 31 31 1b 08 3d 3f 5c 32 30 35 2b	.\304\305.\"\210..H\211..=?\205+
0940	00 0b 3b 5c 32 30 33 27 00 5c 33 30 36 09 5c 33 30 37 5c 22 0a 0b 09 23 5c 32 31 30 09 0a 08 49	..;\203'.\306.\307\"...#\210...I
0960	29 5c 32 30 37 22 20 5b 76 61 6c 20 74 61 62 6c 65 20 63 68 61 72 20 63 75 72 72 65 6e 74 2d 76	)\207".[val.table.char.current-v
0980	61 6c 20 65 72 72 6f 72 20 22 4e 6f 74 20 61 6e 20 69 6e 74 65 67 65 72 20 6e 6f 72 20 6e 69 6c	al.error."Not.an.integer.nor.nil
09a0	3a 20 25 53 22 20 63 68 61 72 2d 74 61 62 6c 65 2d 65 78 74 72 61 2d 73 6c 6f 74 20 31 5d 20 35	:.%S".char-table-extra-slot.1].5
09c0	5d 20 6e 69 6c 20 5b 30 20 31 20 32 20 33 20 34 20 35 20 36 20 37 20 38 20 39 5d 5d 20 22 55 6e	].nil.[0.1.2.3.4.5.6.7.8.9]]."Un
09e0	69 63 6f 64 65 20 6e 75 6d 65 72 69 63 20 76 61 6c 75 65 20 28 64 69 67 69 74 29 2e 0a 50 72 6f	icode.numeric.value.(digit)..Pro
0a00	70 65 72 74 79 20 76 61 6c 75 65 20 69 73 20 61 6e 20 69 6e 74 65 67 65 72 2e 22 29 0a 3b 3b 20	perty.value.is.an.integer.").;;.
0a20	4c 6f 63 61 6c 20 56 61 72 69 61 62 6c 65 73 3a 0a 3b 3b 20 63 6f 64 69 6e 67 3a 20 75 74 66 2d	Local.Variables:.;;.coding:.utf-
0a40	38 0a 3b 3b 20 6e 6f 2d 62 79 74 65 2d 63 6f 6d 70 69 6c 65 3a 20 74 0a 3b 3b 20 45 6e 64 3a 0a	8.;;.no-byte-compile:.t.;;.End:.
0a60	0a 3b 3b 20 75 6e 69 2d 64 69 67 69 74 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a	.;;.uni-digit.el.ends.here.