(Fconcord_object_put): Use `member' instead of `memq'.
(Fconcord_object_adjoin): New function.
(Fconcord_object_adjoinX): New function.
(syms_of_concord): Defsubred `Fconcord_object_adjoin' and
`Fconcord_object_adjoinX'.

update.

- Include "elconcord.h".
- Move EXFUNs for `Fconcord_decode_object', `Fconcord_object_put' and
  `Fconcord_object_get' to elconcord.h.
(Lisp_CONCORD_DS): Moved to elconcord.h.
(struct Lisp_CONCORD_DS): Ditto.
(XCONCORD_DS): Ditto.
(XSET_CONCORD_DS): Ditto.
(CONCORD_DS_P): Ditto.
(CHECK_CONCORD_DS): Ditto.
(CONCHECK_CONCORD_DS): Ditto.
(Lisp_CONCORD_Object): Ditto.
(struct Lisp_CONCORD_Object): Ditto.
(XCONCORD_OBJECT): Ditto.
(XSET_CONCORD_OBJECT): Ditto.
(CONCORD_OBJECT_P): Ditto.
(CHECK_CONCORD_OBJECT): Ditto.
(CONCHECK_CONCORD_OBJECT): Ditto.
(CONCORD_OBJECT_GENRE): Ditto.
(CONCORD_OBJECT_ID): Ditto.
(XCONCORD_OBJECT_ID): Ditto.
(XCONCORD_OBJECT_GENRE): Ditto.
(concord_object_equal): New function.
(LRECORD_IMPLEMENTATION of "concord_object"): Use
`concord_object_equal'.

New file.

update.

(print_concord_object): Use readable form even if `print-readably' is
nil.

update.

(print_concord_object): Don't display location of data-source when
`print-readably' is nil.

update.

Add mappings between CJK Ext B and CNS 11643 plain 7.
(U+4750): Use `->subsumptive'.
(U+4751): Use `->subsumptive' to separate representative nodes.
(U-00027C8B): Use `->subsumptive'.
(U+4752): Use `->denotational' and `->subsumptive'.
(U+4753): Use `->denotational' and `->subsumptive'.
(U-00027C97): Use `->subsumptive'.

update.

(U-00027D2A): Use `->denotational'.

Reformatted.

update.

(Fconcord_genre_ds): Use Vchise_system_db_directory as the default
location of data-source.
(complex_vars_of_concord): Use Vchise_system_db_directory to assign
genre `character' and `feature'.

(Vchise_system_db_directory): New extern when HAVE_CONCORD is defined.

update.

(C1-5E32): Use U-0002F8D4 instead of J0-3A47 as the value of
`<-original'; add `<-original@daikanwa' for J0-3A47 and
`<-original@shinjigen' for GT-18101.
(G-J0-3A47): Separate U-0002F8D4.
(U-0002F8D4): Moved to abstract glyph node; use `<-subsumptive' for
G-J0-3A47; use `->subsumptive' to integrate J0-3A47 and GT-18101.
(J0-3A47): Separate IU+2F8D4, GT-18101, GT-K09052 and S-0925.

Add some Adobe-Japan1-5 code points.
(mother of G0-3D50): Unify G-UU+53EB.
(U+5412): Use `->subsumptive' to separate representative nodes.
(U+5428): Add ideographic-structure.
(U+542A): Add ideographic-structure.
(U+545D): Use `->denotational'.
(U+5462): Use `->subsumptive' to separate representative nodes.
(U+54AA): Likewise.
(U+54B7): Likewise.
(U-00020C55): Use `->subsumptive'.
(C2-294B): Unify G-CU+54BC.
(B-AB75): Unify G-CU+54CE.
(C1-5039): Unify CU+54CE.
(G-UU+54CE): New abstract glyph; use `<-denotational' for U+54CE.
(JSP-353C): Separate G0-3025; use `->subsumptive' for G-UU+54CE.
(G0-3025): Use `->subsumptive' for G-UU+54CE.
(U+54EA): Add ideographic-structure.
(U+54FC): Use `->subsumptive' to separate representative nodes.
(U+5500): Likewise.
(U+5501): Add ideographic-structure.
(U+5505): Add ideographic-structure.
(U+5509): Add ideographic-structure.
(U+552A): Use `->subsumptive' to separate representative nodes.
(U+553C): Add ideographic-structure.
(U+5541): Use `->denotational' to separate representative nodes.
(U+5550): Add ideographic-structure.
(U+5561): Use `->subsumptive' to separate representative nodes.
(U+5566): Add ideographic-structure.
(U+558F): Add ideographic-structure.
(U+5591): Add ideographic-structure.
(U+5592): Add ideographic-structure.
(C2-3A57): Add ideographic-structure.
(U+35C5): Use `->subsumptive' to separate representative nodes.
(U+55AD): Add ideographic-structure.
(mother of JX1-2F2D): Unify G-JU+55AD and G-CU+55AD.
(G-UU+55AD): New abstract glyph.
(UU+55AD): Use `<-subsumptive' for G-UU+55AD.
(U-00020DD6): Add ideographic-structure.
(U+55B2): Add ideographic-structure.
(mother of C1-5E4F): Unify G-UU+55B2; add ideographic-structure.
(U+55BF): Add ideographic-structure; use `->subsumptive' to separate
representative nodes.
(U+55C3): Use `->subsumptive' to separate representative nodes.
(U+55C6): Add ideographic-structure.
(U+55C9): Use `->subsumptive' to separate representative nodes.
(U+55CC): Add ideographic-structure.
(U+55D2): Add ideographic-structure.
(U+55D3): Add ideographic-structure.
(U+55DB): Add ideographic-structure.
(U+55E2): Unify A-JX2-2439.
(U+55E9): Add ideographic-structure.
(JX2-243B): Modify ideographic-structure.
(U+55EC): Add ideographic-structure.
(mother of C3-4636): Unify G-JU+5605 and G-CU+5605.
(C3-4636): Unify CU+5605.
(U+5607): Add ideographic-structure.
(JX2-243E): Separate H2-DE4B and UU+5607.
(U+560D): Use `->subsumptive' to separate representative nodes.
(U+5610): Add ideographic-structure.
(mother of C1-6834): Unify G-UU+5610; add ideographic-structure.
(U+5611): Add ideographic-structure.
(U+5628): Use `->subsumptive'.
(U+562C): Use `->subsumptive' to separate representative nodes.
(U+5630): Add ideographic-structure.
(U+5640): Use `->subsumptive' to separate representative nodes.
(U+5647): Add ideographic-structure.
(mother of C2-4F63): Unify G-CU+564A.
(U+564D): Add ideographic-structure.
(U+5657): Add ideographic-structure.
(U+5660): Add ideographic-structure.
(U+566A): Add ideographic-structure.
(U+566D): Add ideographic-structure.
(U+567E): Add ideographic-structure.
(G-CU+567E): New abstract glyph to integrate M-04442 and C2-5C52.
(C2-5C52): Unify CU+567E.
(U+5684): Add ideographic-structure.
(mother of C2-5C50): Unify G-CU+5684.
(mother of JSP-3654): Unify G-UU+5684.
(U+5685): Use `->subsumptive' to separate representative nodes.
(U+5688): Use `->subsumptive'.
(U+568C): Use `->subsumptive' to separate representative nodes.
(B-EFBE): Unify o-JU+569D and A-CU+569D.
(U+569F): Use `->subsumptive' to separate representative nodes.
(U+56A6): Likewise.
(U+56A8): Use `->subsumptive'.
(U+56A9): Likewise.
(U+56B3): Add ideographic-structure.
(U+56B7): Add ideographic-structure.
(mother of C2-6B54): Unify G-JU+56BE and G-CU+56BE.
(mother of UU+56BE): Unify G-UU+56BE.
(U+56CC): Add ideographic-structure.
(U+361A): Add ideographic-structure; use `->denotational' instead of
`->subsumptive'.
(U+56CD): Use `->denotational'.
(JX2-2454): Unify JC3-95C5.

(C1-5E32): Use U-0002F8D4 instead of J0-3A47 as the value of
`<-original'; add `<-original@daikanwa' for J0-3A47 and
`<-original@shinjigen' for GT-18101.
(G-J0-3A47): Separate U-0002F8D4.
(U-0002F8D4): Moved to abstract glyph node; use `<-subsumptive' for
G-J0-3A47; use `->subsumptive' to integrate J0-3A47 and GT-18101.
(J0-3A47): Separate IU+2F8D4, GT-18101, GT-K09052 and S-0925.

(C1-5E32): Use U-0002F8D4 instead of J0-3A47 as the value of
`<-original'; add `<-original@daikanwa' for J0-3A47 and
`<-original@shinjigen' for GT-18101.
(G-J0-3A47): Separate U-0002F8D4.
(U-0002F8D4): Moved to abstract glyph node; use `<-subsumptive' for
G-J0-3A47; use `->subsumptive' to integrate J0-3A47 and GT-18101.
(J0-3A47): Separate IU+2F8D4, GT-18101, GT-K09052 and S-0925.

(U+5146): Unify G-J0-437B.
(K0-703C): Unify KU+5146.

Reformatted.

update.

Don't add `=gt-pj-1' for J90-3A47.

Add mappings between CJK Ext B and CNS 11643 plain 7.
(U+46E9): Use `->subsumptive' to separate representative nodes.
(U+46EA): Use `->denotational' and `->subsumptive' to separate
representative nodes.
(U+46EB): Use `->subsumptive' to separate representative nodes.
(U-00027A7C): Integrate M-35760.
(U+46FF): Use `->denotational' and `->subsumptive' to separate
representative nodes.
(U+8B2B): Use `->denotational' instead of `->subsumptive'.
(M-35975): Map to U-00027B0F.
(U+471E): Use `->subsumptive' to separate representative nodes.
(U+471B): Likewise.
(U-00027B62): Use `->subsumptive'.
(U+8B81): Use `->denotational'.
(U+8B90): Use `->subsumptive'.
(U+8B8F): Use `->subsumptive' to separate representative nodes.

(U+7E1A): Use `->denotational' instead of `->subsumptive'.
(U+7E1B): Use `->denotational' instead of `->subsumptive'.

(U+661D): Unify B-CEF5.
(C2-2A76): Separate B-CEF5.

Reformatted.

(U+5DF9): Unify S2-2072.

(M-02726): Map to U-0002098E.
(M-02727): Unify U-0002098A and H1-B06A.
(M-02728): Unify U-0002098F and BC-8849.
(M-02729): Unify U-00020990 and BC-855D.
(M-02730): Unify U-0002098B and H1-B06F.

Reformatted.

update.

(U+536D): Unify AJ1-19208.
(U+5379): Unify AJ1-19209.
(U+537A): Unify AJ1-17334; use `<-formed' for U+5DF9 instead of
`variant-of-shinjigen-1' for S-2072.
(U+537E): Unify AJ1-19210.

Reformatted.

(U+5367): Unify AJ1-17333.

(U+5284): Unify AJ1-17317.

Reformatted.

Reformatted.

Add some Adobe-Japan1-5 code points.
(U+5235): Add ideographic-structure.
(mother of C3-275D): Unify G-JU+523C and G-CU+523C; add
ideographic-structure.
(C3-275D): Unify C3-523C.
(U+5255): Add ideographic-structure.
(G-JU+5255): New abstract glyph to integrate M-02033 and JX2-2339.
(U+525C): Add ideographic-structure.
(U+526E): Add ideographic-structure.
(C2-336F): Unify G-CU+526E.
(U+5279): Use `->denotational' instead of `->subsumptive'.
(U+5280): Add ideographic-structure.
(mother of C2-4928): Unify G-JU+5280 and G-CU+5280.
(U+528C): Add ideographic-structure.
(U+5298): Add ideographic-structure.
(mother of JX2-2340): Unify G-JU+5298 and G-CU+5298.

Reformatted.

update.

(U+6677): Unify B-B4BE.
(C1-5F63): Separate B-B4BE.

(U+5394): Unify AJ1-19211.
(U+5399): Unify AJ1-19212.
(U+539D): Unify AJ1-16802.
(U+53A4): Unify AJ1-17335.
(U+53AA): Unify AJ1-19213.
(U+53AF): Use `->subsumptive' to separate representative nodes.
(UU+53AF): Unify AJ1-19214.
(U+53AC): Use `->denotational' instead of `->subsumptive'.
(U+53AD): Add ideographic-structure.
(U+53B4): Likewise.
(JX2-2358): Unify AJ1-17336.

update.

(U+355D): Unify AJ1-17341.
(U+355E): Unify AJ1-17342.
(JX2-235F): Unify AJ1-17343.

(U+53B7): Unify AJ1-17338.
(U+53BA): Unify AJ1-19215.

Reformatted.

update.

(U+5363): Unify AJ1-16801.
(U+5367): Unify AJ1-17333.

update.

(U+6534): Use `->subsumptive' to separate representative nodes.
(G-M-13267): Add ideographic-structure.
(M-13267): Modify ideographic-structure.

update.

(G-JU+9052): Unify G-J0-6E24.

(J0-5D47): Separate S2-3964.
(S1-3964): Unify S2-3964.

(U+6A95): Unify B-ED40.
(M-15666): Separate B-ED40.

update.

(G-CU+5043): Add ideographic-structure.

update.

(U+5277): Add ideographic-structure.
(mother of JX2-233C): Unify G-JU+5277 and G-CU+5277; add
ideographic-structure.
(G-UU+5277): New abstract glyph.
(C3-4043): Use `<-subsumptive' for G-UU+5277.

(G-CU+5043): New abstract glyph.
(C1-5876): Use `<-subsumptive' for G-CU+5043; unify CU+5043.
(mother of JSP-3228): Unify G-JU+509F; add ideographic-structure.
(mother of C4-3639): Unify G-UU+509F; add ideographic-structure.
(U+50C8): Add ideographic-structure.
(G-CU+50C8): New abstract glyph.
(C2-4160): Use `<-subsumptive' for G-CU+50C8.
(U+3488): Add ideographic-structure.
(G-CU+3488): New abstract glyph.
(C4-422F): Use `<-subsumptive' for G-CU+3488.
(G-CU+348E): New abstract glyph.
(C4-4232): Use `<-subsumptive' for G-CU+348E.
(U+5123): Add ideographic-structure.
(JSP-3259): Use `<-denotational' for U+5123 instead of `<-subsumptive'
for intermediate node.
(C4-5565): Likewise.
(G-UU+5123): New abstract glyph.
(UU+5123): Use `<-subsumptive' for G-UU+5123.
(U-0002040E): Add ideographic-structure.
(G-IU+2040E): New abstract glyph.
(C7-3676): Use `<-subsumptive' for G-IU+2040E.
(G-JU+513C): Separate representative node.
(J0-5137): Separate G-JU+513C; use `<-subsumptive' for G-JU+513C.

update.

(G-JU+9038): New abstract glyph.
(J0-306F): Use `<-subsumptive' for G-JU+9038.
(mother of J90-6E24): Unify G-JU+9052.
(G-UU+9052): New abstract glyph.
(G0-6559): Use `<-subsumptive' for G-UU+9052.

(mother of IU+27882): Unify G-IU+27882.
(G-CU+27882): New abstract glyph.
(C5-6462): Unify CU+27882; use `<-subsumptive' for G-CU+27882.

(U+7FC1): Add ideographic-structure.
(G-KU+7FC1): New abstract glyph.
(K0-683A): Use `<-subsumptive' for G-KU+7FC1.

(G-CU+7366): New abstract glyph.
(C2-5848): Use `<-subsumptive' for G-CU+7366.

(U+55E1): Add ideographic-structure.
(B-B6E4): Unify G-UU+55E1; add ideographic-structure.
(G-JU+56B4): New abstract glyph.
(J0-536E): Use `<-subsumptive' for G-JU+56B4.

(U+52DC): Add ideographic-structure.
(mother of JSP-336F): Unify G-JU+52DC; add ideographic-structure.

(G-GT-00271): Unify G-IU+200FD.

update.

(complex_vars_of_concord): New prototype.

(main_1): Call `complex_vars_of_concord' when HAVE_CONCORD is defined.

Include <chise.h> if HAVE_LIBCHISE is defined.
(Qcharacter): New variable when HAVE_LIBCHISE is defined.
(Qfeature): Ditto.
(Fconcord_object_genre): New function.
(syms_of_concord):
- Add new builtin symbols `character' and `feature' when HAVE_LIBCHISE
  is defined.
- Add Add new builtin function `concord-object-genre'.
(complex_vars_of_concord): New function; assign genres `character' and
`feature' when HAVE_LIBCHISE is defined.

update.

(mother of J0-5677): Unify G-JU+9EBC and G-CU+9EBC.
(G-UU+9EBC): New abstract glyph.
(UU+9EBC): Use `<-subsumptive' for G-UU+9EBC.
(mother of JX2-7E59): Unify G-JU+9EBD and G-CU+9EBD.
(C3-4B22): Unify CU+9EBD.
(G-UU+9EBD): New abstract glyph.
(G0-7761): Use `<-subsumptive' for G-UU+9EBD.

(G-KU+98EF): New abstract glyph.
(K0-5A79): Use `<-subsumptive' for G-KU+98EF.
(A-GT-59101): Unify A-UU+98EF.

(G-UU+8801): New abstract glyph.
(C2-6339): Use `<-subsumptive' for G-UU+8801.

(G-M-28373): New abstract glyph.
(M-28373): Use `<-subsumptive' for G-M-28373.

Reformatted.

(G-GT-21306): New abstract glyph.
(GT-21306): Use `<-subsumptive' for G-GT-21306.
(G-CU+2F8F5): New abstract glyph.
(C4-2D65): Use `<-subsumptive' for G-CU+2F8F5.
(G-M-16688): New abstract glyph.
(M-16688): Use `<-subsumptive' for G-M-16688.
(G-M-16692): New abstract glyph.
(M-16692): Use `<-subsumptive' for G-M-16692.
(G-M-16697): New abstract glyph.
(M-16697): Use `<-subsumptive' for G-M-16697.

(G-JU+6B7F): New abstract glyph.
(J0-5D47): Use `<-subsumptive' for G-JU+6B7F.

(G-M-15667): New abstract glyph.
(M-15667): Use `<-subsumptive' for G-M-15667.
(G-UU+6B0E): New abstract glyph.
(UU+6B0E): Use `<-subsumptive' for G-UU+6B0E.

(G-M-13267): New abstract glyph.
(M-13267): Use `<-subsumptive' for G-M-13267.

(G-UU+5A2F): New abstract glyph.
(UU+5A2F): Use `<-subsumptive' for G-UU+5A2F.
(G-KU+5A9B): New abstract glyph.
(K0-6A30): Use `<-subsumptive' for G-KU+5A9B.
(G-GT-08278): New abstract glyph.
(J78-553D): Use `<-subsumptive' for G-GT-08278.
(mother of J90-553D): Unify G-UU+5ABE.

(mother of C7-6443): Unify G-CU+2096C.
(C7-6443): Unify CU+2096C.
(G-IU+2096C): New abstract glyph.
(IU+2096C): Use `<-subsumptive' for G-IU+2096C.

(G-KU+517C): New abstract glyph.
(K0-4C42): Use `<-subsumptive' for G-KU+517C; unify KU+517C.

update.

(JSP-5F6F): Delete mapping for U-0002F9DB.

(JC3-99B6): Map to U+8DBC instead of U-0002F9DB.

(U-00024CAB): Integrate M-21908.
(U+3F65): Integrate M-21909.
(U-00024CAC): Integrate M-21910.
(U-00024CAE): Unify M-21912.
(U-00024CB6): Unify M-21915.
(U-00024CB5): Integrate M-21916.
(U+3F66): Integrate M-21917.
(U-00024CB7): Integrate M-21918.
(U-00024CB8): Integrate M-21919.
(U+3F67): Integrate M-21920.
(U-00024CB9): Integrate M-21921.
(U-00024CBA): Integrate M-21922.
(U-00024CBB): Unify M-21926.
(U-00024CBD): Unify M-21927.
(U-00024CC5): Unify M-21928.
(U-00024CBE): Integrate M-21931.
(U-00024CC3): Use `->denotational'.
(U+7588): Use `->subsumptive'.
(U+3F6E): Unify M-21974.
(U-00024CF6): Use `->denotational' and `->subsumptive'.
(U-00024CEC): Integrate M-21976.
(U-00024CF9): Unify M-21977.
(U-00024CFB): Integrate M-21978.
(U-00027215): Integrate M-21979.
(U+7589): Use `->denotational' to integrate U-00024D01.
(U-00024D01): Use `<-denotational' for U+7589; unify A-JU+7589; use
`->denotational'.
(G-JU+7589): New abstract glyph; use `<-denotational' for U-00024D01;
use `->subsumptive' to integrate J0-6149 and H7-BA40.
(C7-5378): Separate U-00024D01 and H7-BA40; use `<-denotational' for
U-00024D01.
(C3-5C62): Use `<-denotational' for U+7589.

update.

(U+9929): Use `->denotational' and `->subsumptive'; integrate
U-0002FA04.

(mother of JSP-5F6F): Separate U-0002F9DB; unify o-JU+8DBC and
A-CU+2F9DB.
(C3-446D): Unify U-0002F9DB.

update.

(U+983B): Unify J97-4951.
(mother of JX1-7D7B): Unify G-UU+983B, G-JU+FA6A and G-JX1-7D7B.

- Use `->denotational' and/or `->subsumptive' for some characters.
(mother of C1-4F3E): Unify G-CU+829D and G-M-30699.
(C1-4F3E): Unify CU+829D.
(U-0002F991): Unify G-UU+829D and G-CU+2F991.
(A-UU+82B1): New character.
(M-30734): Use A-UU+82B1 instead of U+82B1 as the value of
`<-denotational'.
(G0-3B28): Likewise.
(o-JU+82B1): New character.
(mother of J0-3256): Unify G-JU+82B1, G-CU+2F993 and G-GT-39726.
(C6-2928): Unify U-0002F993.
(C1-4F44): Unify CU+82B1.
(C1-4F4C): Unify JC3-61CC.
(U+44A2): Use `->denotational' instead of `->subsumptive'.
(U+82BD): Unify A-J0-326A.
(G-JU+82BD): Unify G-J0-326A.
(U+83CA): Unify A-J0-3546.
(mother of C1-6168): Unify G-CU+83CA.
(C1-6168): Unify CU+83CA.
(mother of J0-3546): Separate U-0002F9A1; unify G-UU+83CA and
G-CU+2F9A1.
(C6-443E): Unify U-0002F9A1.
(J0-685A): Unify S-6716; add `<-vulgar' for U+82BB.
(A-J0-8641): New character.
(U-00027144): Unify A-UU+8641.
(mother of C5-7940): Unify G-IU+27144.

update.

(U+8CD3): Unify J97-4950.
(B-BBAB): Separate U+FA64; unify G-UU+8CD3, G-JU+FA64 and G-JX1-7C38.
(JX1-7C38): Unify U+FA64.
(A-7C3D): Unify A-UU+8D08 and G-JU+FA65.

(U+8B01): Unify J97-315A.
(B-BFD6): Separate U+FA62; unify G-UU+8B01, G-JU+FA62 and G-JX1-7C2F.
(JX1-7C2F): Unify U+FA62.
(U+8B39): Unify J97-3660.
(mother of UU+4700): Unify G-UU+4700.
(B-C2D4): Separate U+FA63; unify G-UU+8B39, G-JU+FA63 and G-JX1-7C30.
(JX1-7C30): Unify U+FA63.

(mother of JSP-5C32): Separate U-0002F9C3; unify G-JU+8860 and
G-CU+2F9C3.
(C4-534C): Unify U-0002F9C3.