+(when (featurep 'utf-2000)
+ (make-coding-system
+ 'big5-er 'big5 "Coding-system of BIG5 with entity-reference."
+ '(mnemonic "Big5r"
+ charset-g0 ascii
+ charset-g1 chinese-big5
+ use-entity-reference t))
+
+ (make-coding-system
+ 'big5-eten 'big5 "Coding-system of BIG5-ETEN."
+ '(mnemonic "Big5E"
+ charset-g0 ascii
+ charset-g1 chinese-big5-eten))
+ (make-coding-system
+ 'big5-eten-er 'big5 "Coding-system of BIG5-ETEN with entity-reference."
+ '(mnemonic "Big5Er"
+ charset-g0 ascii
+ charset-g1 chinese-big5-eten
+ use-entity-reference t))
+
+ (make-coding-system
+ 'big5-cdp 'big5 "Coding-system of BIG5 with CDP-extension."
+ '(mnemonic "Big5C"
+ charset-g0 ascii
+ charset-g1 chinese-big5-cdp))
+ )
+