Author: hhubner
Date: 2007-10-04 18:25:38 -0400 (Thu, 04 Oct 2007)
New Revision: 2213
Added:
branches/trunk-reorg/projects/
branches/trunk-reorg/projects/scrabble/
Removed:
branches/trunk-reorg/bknr/projects/
Log:
move projects upstairs, as they are not part of the framework
Copied: branches/trunk-reorg/projects (from rev 2195, branches/trunk-reorg/bknr/projects)
Copied: branches/trunk-reorg/projects/scrabble (from rev 2212, branches/trunk-reorg/bknr/projects/scrabble)
1
0
[bknr-cvs] r2212 - in branches/trunk-reorg: bknr/datastore/src bknr/datastore/src/utils bknr/projects/scrabble bknr/projects/scrabble/src bknr/projects/scrabble/website/de thirdparty/cxml-2007-08-05/xml
by bknr＠bknr.net 04 Oct '07
by bknr＠bknr.net 04 Oct '07
04 Oct '07
Author: hhubner
Date: 2007-10-04 18:22:16 -0400 (Thu, 04 Oct 2007)
New Revision: 2212
Added:
branches/trunk-reorg/bknr/projects/scrabble/src/start-webserver.lisp
branches/trunk-reorg/bknr/projects/scrabble/website/de/charmap.xml
branches/trunk-reorg/bknr/projects/scrabble/website/de/scrabble.html
branches/trunk-reorg/bknr/projects/scrabble/website/de/scrabble.js
Removed:
branches/trunk-reorg/bknr/datastore/src/utils/base64.lisp
branches/trunk-reorg/bknr/projects/scrabble/website/de/test.html
Modified:
branches/trunk-reorg/bknr/datastore/src/bknr-utils.asd
branches/trunk-reorg/bknr/projects/scrabble/
branches/trunk-reorg/bknr/projects/scrabble/src/make-letters.lisp
branches/trunk-reorg/bknr/projects/scrabble/src/package.lisp
branches/trunk-reorg/bknr/projects/scrabble/src/scrabble.asd
branches/trunk-reorg/bknr/projects/scrabble/website/de/scrabble.css
branches/trunk-reorg/thirdparty/cxml-2007-08-05/xml/xmlns-normalizer.lisp
Log:
Serves static pages through hunchentoot
Modified: branches/trunk-reorg/bknr/datastore/src/bknr-utils.asd
===================================================================
--- branches/trunk-reorg/bknr/datastore/src/bknr-utils.asd 2007-10-04 21:34:36 UTC (rev 2211)
+++ branches/trunk-reorg/bknr/datastore/src/bknr-utils.asd 2007-10-04 22:22:16 UTC (rev 2212)
@@ -31,7 +31,6 @@
(:file "actor" :depends-on ("utils"))
(:file "reader" :depends-on ("utils"))
(:file "crypt-md5" :depends-on ("utils"))
- (:file "base64" :depends-on ("utils"))
(:file "capability" :depends-on ("utils"))
(:file "make-fdf-file" :depends-on ("utils"))
(:file "date-calc")
Deleted: branches/trunk-reorg/bknr/datastore/src/utils/base64.lisp
===================================================================
--- branches/trunk-reorg/bknr/datastore/src/utils/base64.lisp 2007-10-04 21:34:36 UTC (rev 2211)
+++ branches/trunk-reorg/bknr/datastore/src/utils/base64.lisp 2007-10-04 22:22:16 UTC (rev 2212)
@@ -1,75 +0,0 @@
-;;;; This file implements the Base64 transfer encoding algorithm as
-;;;; defined in RFC 1521 by Borensten & Freed, September 1993.
-;;;;
-;;;; Written by Juri Pakaste <juri(a)iki.fi>. It is in the public
-;;;; domain. Input is welcome.
-;;;;
-;;;; $Id$
-
-(defpackage "BASE64"
- (:use "CL")
- (:export #:base64-encode #:base64-decode))
-
-(in-package :base64)
-
-(defparameter *encode-table*
- "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/=")
-
-(defparameter *decode-table*
- (let ((da (make-array (list 256)
- :element-type 'integer
- :initial-element 0)))
- (loop for character across *encode-table*
- for index from 0 below 64
- do (setf (elt da (char-code character)) index))
- da))
-
-(defun base64-encode (string)
- (let ((result (make-array
- (list (* 4 (truncate (/ (+ 2 (length string)) 3))))
- :element-type 'base-char)))
- (do ((sidx 0 (+ sidx 3))
- (didx 0 (+ didx 4))
- (chars 2 2)
- (value nil nil))
- ((>= sidx (length string)) t)
- (setf value (ash (logand #xFF (char-code (char string sidx))) 8))
- (dotimes (n 2)
- (when (< (+ sidx n 1) (length string))
- (setf value
- (logior value
- (logand #xFF (char-code (char string (+ sidx n 1))))))
- (incf chars))
- (when (= n 0)
- (setf value (ash value 8))))
- (setf (elt result (+ didx 3))
- (elt *encode-table* (if (> chars 3) (logand value #x3F) 64)))
- (setf value (ash value -6))
- (setf (elt result (+ didx 2))
- (elt *encode-table* (if (> chars 2) (logand value #x3F) 64)))
- (setf value (ash value -6))
- (setf (elt result (+ didx 1))
- (elt *encode-table* (logand value #x3F)))
- (setf value (ash value -6))
- (setf (elt result didx)
- (elt *encode-table* (logand value #x3F))))
- result))
-
-(defun base64-decode (string)
- (let ((result (make-array (* 3 (truncate (/ (length string) 4)))
- :element-type 'base-char))
- (ridx 0))
- (loop for schar across string
- for svalue = (elt *decode-table* (char-code schar))
- with bitstore = 0
- with bitcount = 0
- do (unless (null svalue)
- (setf bitstore (logior (ash bitstore 6) svalue))
- (incf bitcount 6)
- (when (>= bitcount 8)
- (decf bitcount 8)
- (setf (elt result ridx)
- (code-char (logand (ash bitstore (- bitcount)) #xFF)))
- (incf ridx)
- (setf bitstore (logand bitstore #xFF)))))
- (subseq result 0 ridx)))
Property changes on: branches/trunk-reorg/bknr/projects/scrabble
___________________________________________________________________
Name: svn:ignore
+ fonts
Modified: branches/trunk-reorg/bknr/projects/scrabble/src/make-letters.lisp
===================================================================
--- branches/trunk-reorg/bknr/projects/scrabble/src/make-letters.lisp 2007-10-04 21:34:36 UTC (rev 2211)
+++ branches/trunk-reorg/bknr/projects/scrabble/src/make-letters.lisp 2007-10-04 22:22:16 UTC (rev 2212)
@@ -21,24 +21,38 @@
(defun make-letter-tile (char score)
(with-canvas (:width 34 :height 34)
- (let ((bold-font (get-font *bold-font*))
- (regular-font (get-font *regular-font*))
- (char-string (make-string 1 :initial-element char)))
+ (let* ((bold-font (get-font *bold-font*))
+ (regular-font (get-font *regular-font*))
+ (char-string (princ-to-string char))
+ (pathname (make-pathname :name (if (and char (> (char-code char) 127))
+ (char-name char)
+ char-string)
+ :type "png")))
(set-rgb-fill 1.0 0.98 0.8)
(rounded-rectangle 0 0 34 34 4 4)
(fill-path)
- (set-rgb-fill 0 0 0)
- (set-font bold-font 27)
- (draw-centered-string 13 7 char-string)
- (set-font regular-font 11)
- (draw-centered-string 26 3 (princ-to-string score))
- (save-png (make-pathname :name char-string :type "png")))))
+ (when char
+ (set-rgb-fill 0 0 0)
+ (set-font bold-font 27)
+ (draw-centered-string 13 7 char-string)
+ (set-font regular-font 11)
+ (draw-centered-string 26 3 (princ-to-string score)))
+ (save-png pathname)
+ pathname)))
(defun make-letter-tile-set (language)
- (dolist (entry (gethash language *tile-sets*))
- (destructuring-bind (letter score count) entry
- (declare (ignore count))
- (make-letter-tile letter score))))
+ (with-open-file (letter-map-file "charmap.xml"
+ :direction :output
+ :if-exists :supersede
+ :external-format :utf-8)
+ (cxml:with-xml-output (cxml:make-character-stream-sink letter-map-file)
+ (cxml:with-element "chars"
+ (dolist (entry (gethash language *tile-sets*))
+ (destructuring-bind (letter score count) entry
+ (declare (ignore count))
+ (cxml:with-element "char"
+ (cxml:attribute "filename" (namestring (make-letter-tile letter score)))
+ (cxml:text (princ-to-string letter)))))))))
(defun make-special-tile (name color &key text star)
(with-canvas (:width 40 :height 40)
@@ -63,10 +77,12 @@
(make-special-tile :standard (getf *special-tile-colors* :standard) :star t))
-(defun make-tile-set (language)
- (let ((*default-pathname-defaults* (merge-pathnames
- (make-pathname :directory (list :relative
- (string-downcase (symbol-name language)))))))
+(defun make-tile-set (directory language)
+ (let ((*default-pathname-defaults*
+ (merge-pathnames (merge-pathnames (make-pathname
+ :directory (list :relative (string-downcase (symbol-name language))))
+ directory))))
(ensure-directories-exist *default-pathname-defaults*)
(make-letter-tile-set language)
- (make-special-tile-set language)))
\ No newline at end of file
+ (make-special-tile-set language)))
+
Modified: branches/trunk-reorg/bknr/projects/scrabble/src/package.lisp
===================================================================
--- branches/trunk-reorg/bknr/projects/scrabble/src/package.lisp 2007-10-04 21:34:36 UTC (rev 2211)
+++ branches/trunk-reorg/bknr/projects/scrabble/src/package.lisp 2007-10-04 22:22:16 UTC (rev 2212)
@@ -8,4 +8,7 @@
(defpackage :scrabble.graphics
(:use :cl :alexandria :vecto :scrabble)
(:shadowing-import-from :vecto "ROTATE"))
+
+(defpackage :scrabble.web
+ (:use :cl :alexandria :hunchentoot :scrabble))
\ No newline at end of file
Modified: branches/trunk-reorg/bknr/projects/scrabble/src/scrabble.asd
===================================================================
--- branches/trunk-reorg/bknr/projects/scrabble/src/scrabble.asd 2007-10-04 21:34:36 UTC (rev 2211)
+++ branches/trunk-reorg/bknr/projects/scrabble/src/scrabble.asd 2007-10-04 22:22:16 UTC (rev 2212)
@@ -10,7 +10,7 @@
(defsystem :scrabble
:name "Scrabble"
:licence "BSD"
- :depends-on (:bknr-datastore :vecto :alexandria :anaphora)
+ :depends-on (:bknr-datastore :hunchentoot :cxml :vecto :alexandria :anaphora)
:serial t
:components ((:file "package")
(:file "scrabble")
Added: branches/trunk-reorg/bknr/projects/scrabble/src/start-webserver.lisp
===================================================================
--- branches/trunk-reorg/bknr/projects/scrabble/src/start-webserver.lisp 2007-10-04 21:34:36 UTC (rev 2211)
+++ branches/trunk-reorg/bknr/projects/scrabble/src/start-webserver.lisp 2007-10-04 22:22:16 UTC (rev 2212)
@@ -0,0 +1,19 @@
+
+(in-package :scrabble.web)
+
+(defparameter *website-directory*
+ (make-pathname :name nil :type nil :version nil
+ :defaults (merge-pathnames #p"../website/" *load-truename*)))
+
+(defparameter *mochikit-directory*
+ (make-pathname :name nil :type nil :version nil
+ :defaults (merge-pathnames #p"../../../../thirdparty/MochiKit/MochiKit/")))
+
+(when (and (boundp '*server*) *server)
+ (stop-server *server*))
+
+(setq *dispatch-table*
+ (list (create-folder-dispatcher-and-handler "/MochiKit/" *mochikit-directory*)
+ (create-folder-dispatcher-and-handler "/scrabble/" *website-directory*)))
+
+(setq *server* (start-server :port 4242))
\ No newline at end of file
Added: branches/trunk-reorg/bknr/projects/scrabble/website/de/charmap.xml
===================================================================
--- branches/trunk-reorg/bknr/projects/scrabble/website/de/charmap.xml 2007-10-04 21:34:36 UTC (rev 2211)
+++ branches/trunk-reorg/bknr/projects/scrabble/website/de/charmap.xml 2007-10-04 22:22:16 UTC (rev 2212)
@@ -0,0 +1,2 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<chars><char filename="A.png">A</char><char filename="B.png">B</char><char filename="C.png">C</char><char filename="D.png">D</char><char filename="E.png">E</char><char filename="F.png">F</char><char filename="G.png">G</char><char filename="H.png">H</char><char filename="I.png">I</char><char filename="J.png">J</char><char filename="K.png">K</char><char filename="L.png">L</char><char filename="M.png">M</char><char filename="N.png">N</char><char filename="O.png">O</char><char filename="P.png">P</char><char filename="Q.png">Q</char><char filename="R.png">R</char><char filename="S.png">S</char><char filename="T.png">T</char><char filename="U.png">U</char><char filename="V.png">V</char><char filename="W.png">W</char><char filename="X.png">X</char><char filename="Y.png">Y</char><char filename="Z.png">Z</char><char filename="LATIN_CAPITAL_LETTER_A_WITH_DIAERESIS.png">Ä</char><char filename="LATIN_CAPITAL_LETTER_O_WITH_DIAERESIS.png">Ö</char><char filename="LATIN_CAPITAL_LETTER_U_WITH_DIAERESIS.png">Ü</char><char filename="NIL.png">NIL</char></chars>
\ No newline at end of file
Modified: branches/trunk-reorg/bknr/projects/scrabble/website/de/scrabble.css
===================================================================
--- branches/trunk-reorg/bknr/projects/scrabble/website/de/scrabble.css 2007-10-04 21:34:36 UTC (rev 2211)
+++ branches/trunk-reorg/bknr/projects/scrabble/website/de/scrabble.css 2007-10-04 22:22:16 UTC (rev 2212)
@@ -1,3 +1,4 @@
+body { background-color: #004B36 }
#playfield { position: absolute }
#playfield div { position: absolute; width: 40px; height: 40px }
#playfield img { position: absolute; top: 3px; left: 3px }
Added: branches/trunk-reorg/bknr/projects/scrabble/website/de/scrabble.html
===================================================================
--- branches/trunk-reorg/bknr/projects/scrabble/website/de/scrabble.html 2007-10-04 21:34:36 UTC (rev 2211)
+++ branches/trunk-reorg/bknr/projects/scrabble/website/de/scrabble.html 2007-10-04 22:22:16 UTC (rev 2212)
@@ -0,0 +1,236 @@
+<html>
+ <head>
+ <link rel="stylesheet" type="text/css" href="scrabble.css" />
+ <script type="text/javascript" src="/MochiKit/MochiKit.js"> </script>
+ <script type="text/javascript" src="scrabble.js"> </script>
+ </head>
+ <body onload="init()">
+ <div id='playfield'>
+ <div id='field-0-0'/></div>
+ <div id='field-0-1'/></div>
+ <div id='field-0-2'/></div>
+ <div id='field-0-3'/></div>
+ <div id='field-0-4'/></div>
+ <div id='field-0-5'/></div>
+ <div id='field-0-6'/></div>
+ <div id='field-0-7'/></div>
+ <div id='field-0-8'/></div>
+ <div id='field-0-9'/></div>
+ <div id='field-0-10'/></div>
+ <div id='field-0-11'/></div>
+ <div id='field-0-12'/></div>
+ <div id='field-0-13'/></div>
+ <div id='field-0-14'/></div>
+ <div id='field-1-0'/></div>
+ <div id='field-1-1'/></div>
+ <div id='field-1-2'/></div>
+ <div id='field-1-3'/></div>
+ <div id='field-1-4'/></div>
+ <div id='field-1-5'/></div>
+ <div id='field-1-6'/></div>
+ <div id='field-1-7'/></div>
+ <div id='field-1-8'/></div>
+ <div id='field-1-9'/></div>
+ <div id='field-1-10'/></div>
+ <div id='field-1-11'/></div>
+ <div id='field-1-12'/></div>
+ <div id='field-1-13'/></div>
+ <div id='field-1-14'/></div>
+ <div id='field-2-0'/></div>
+ <div id='field-2-1'/></div>
+ <div id='field-2-2'/></div>
+ <div id='field-2-3'/></div>
+ <div id='field-2-4'/></div>
+ <div id='field-2-5'/></div>
+ <div id='field-2-6'/></div>
+ <div id='field-2-7'/></div>
+ <div id='field-2-8'/></div>
+ <div id='field-2-9'/></div>
+ <div id='field-2-10'/></div>
+ <div id='field-2-11'/></div>
+ <div id='field-2-12'/></div>
+ <div id='field-2-13'/></div>
+ <div id='field-2-14'/></div>
+ <div id='field-3-0'/></div>
+ <div id='field-3-1'/></div>
+ <div id='field-3-2'/></div>
+ <div id='field-3-3'/></div>
+ <div id='field-3-4'/></div>
+ <div id='field-3-5'/></div>
+ <div id='field-3-6'/></div>
+ <div id='field-3-7'/></div>
+ <div id='field-3-8'/></div>
+ <div id='field-3-9'/></div>
+ <div id='field-3-10'/></div>
+ <div id='field-3-11'/></div>
+ <div id='field-3-12'/></div>
+ <div id='field-3-13'/></div>
+ <div id='field-3-14'/></div>
+ <div id='field-4-0'/></div>
+ <div id='field-4-1'/></div>
+ <div id='field-4-2'/></div>
+ <div id='field-4-3'/></div>
+ <div id='field-4-4'/></div>
+ <div id='field-4-5'/></div>
+ <div id='field-4-6'/></div>
+ <div id='field-4-7'/></div>
+ <div id='field-4-8'/></div>
+ <div id='field-4-9'/></div>
+ <div id='field-4-10'/></div>
+ <div id='field-4-11'/></div>
+ <div id='field-4-12'/></div>
+ <div id='field-4-13'/></div>
+ <div id='field-4-14'/></div>
+ <div id='field-5-0'/></div>
+ <div id='field-5-1'/></div>
+ <div id='field-5-2'/></div>
+ <div id='field-5-3'/></div>
+ <div id='field-5-4'/></div>
+ <div id='field-5-5'/></div>
+ <div id='field-5-6'/></div>
+ <div id='field-5-7'/></div>
+ <div id='field-5-8'/></div>
+ <div id='field-5-9'/></div>
+ <div id='field-5-10'/></div>
+ <div id='field-5-11'/></div>
+ <div id='field-5-12'/></div>
+ <div id='field-5-13'/></div>
+ <div id='field-5-14'/></div>
+ <div id='field-6-0'/></div>
+ <div id='field-6-1'/></div>
+ <div id='field-6-2'/></div>
+ <div id='field-6-3'/></div>
+ <div id='field-6-4'/></div>
+ <div id='field-6-5'/></div>
+ <div id='field-6-6'/></div>
+ <div id='field-6-7'/></div>
+ <div id='field-6-8'/></div>
+ <div id='field-6-9'/></div>
+ <div id='field-6-10'/></div>
+ <div id='field-6-11'/></div>
+ <div id='field-6-12'/></div>
+ <div id='field-6-13'/></div>
+ <div id='field-6-14'/></div>
+ <div id='field-7-0'/></div>
+ <div id='field-7-1'/></div>
+ <div id='field-7-2'/></div>
+ <div id='field-7-3'/></div>
+ <div id='field-7-4'/></div>
+ <div id='field-7-5'/></div>
+ <div id='field-7-6'/></div>
+ <div id='field-7-7'/></div>
+ <div id='field-7-8'/></div>
+ <div id='field-7-9'/></div>
+ <div id='field-7-10'/></div>
+ <div id='field-7-11'/></div>
+ <div id='field-7-12'/></div>
+ <div id='field-7-13'/></div>
+ <div id='field-7-14'/></div>
+ <div id='field-8-0'/></div>
+ <div id='field-8-1'/></div>
+ <div id='field-8-2'/></div>
+ <div id='field-8-3'/></div>
+ <div id='field-8-4'/></div>
+ <div id='field-8-5'/></div>
+ <div id='field-8-6'/></div>
+ <div id='field-8-7'/></div>
+ <div id='field-8-8'/></div>
+ <div id='field-8-9'/></div>
+ <div id='field-8-10'/></div>
+ <div id='field-8-11'/></div>
+ <div id='field-8-12'/></div>
+ <div id='field-8-13'/></div>
+ <div id='field-8-14'/></div>
+ <div id='field-9-0'/></div>
+ <div id='field-9-1'/></div>
+ <div id='field-9-2'/></div>
+ <div id='field-9-3'/></div>
+ <div id='field-9-4'/></div>
+ <div id='field-9-5'/></div>
+ <div id='field-9-6'/></div>
+ <div id='field-9-7'/></div>
+ <div id='field-9-8'/></div>
+ <div id='field-9-9'/></div>
+ <div id='field-9-10'/></div>
+ <div id='field-9-11'/></div>
+ <div id='field-9-12'/></div>
+ <div id='field-9-13'/></div>
+ <div id='field-9-14'/></div>
+ <div id='field-10-0'/></div>
+ <div id='field-10-1'/></div>
+ <div id='field-10-2'/></div>
+ <div id='field-10-3'/></div>
+ <div id='field-10-4'/></div>
+ <div id='field-10-5'/></div>
+ <div id='field-10-6'/></div>
+ <div id='field-10-7'/></div>
+ <div id='field-10-8'/></div>
+ <div id='field-10-9'/></div>
+ <div id='field-10-10'/></div>
+ <div id='field-10-11'/></div>
+ <div id='field-10-12'/></div>
+ <div id='field-10-13'/></div>
+ <div id='field-10-14'/></div>
+ <div id='field-11-0'/></div>
+ <div id='field-11-1'/></div>
+ <div id='field-11-2'/></div>
+ <div id='field-11-3'/></div>
+ <div id='field-11-4'/></div>
+ <div id='field-11-5'/></div>
+ <div id='field-11-6'/></div>
+ <div id='field-11-7'/></div>
+ <div id='field-11-8'/></div>
+ <div id='field-11-9'/></div>
+ <div id='field-11-10'/></div>
+ <div id='field-11-11'/></div>
+ <div id='field-11-12'/></div>
+ <div id='field-11-13'/></div>
+ <div id='field-11-14'/></div>
+ <div id='field-12-0'/></div>
+ <div id='field-12-1'/></div>
+ <div id='field-12-2'/></div>
+ <div id='field-12-3'/></div>
+ <div id='field-12-4'/></div>
+ <div id='field-12-5'/></div>
+ <div id='field-12-6'/></div>
+ <div id='field-12-7'/></div>
+ <div id='field-12-8'/></div>
+ <div id='field-12-9'/></div>
+ <div id='field-12-10'/></div>
+ <div id='field-12-11'/></div>
+ <div id='field-12-12'/></div>
+ <div id='field-12-13'/></div>
+ <div id='field-12-14'/></div>
+ <div id='field-13-0'/></div>
+ <div id='field-13-1'/></div>
+ <div id='field-13-2'/></div>
+ <div id='field-13-3'/></div>
+ <div id='field-13-4'/></div>
+ <div id='field-13-5'/></div>
+ <div id='field-13-6'/></div>
+ <div id='field-13-7'/></div>
+ <div id='field-13-8'/></div>
+ <div id='field-13-9'/></div>
+ <div id='field-13-10'/></div>
+ <div id='field-13-11'/></div>
+ <div id='field-13-12'/></div>
+ <div id='field-13-13'/></div>
+ <div id='field-13-14'/></div>
+ <div id='field-14-0'/></div>
+ <div id='field-14-1'/></div>
+ <div id='field-14-2'/></div>
+ <div id='field-14-3'/></div>
+ <div id='field-14-4'/></div>
+ <div id='field-14-5'/></div>
+ <div id='field-14-6'/></div>
+ <div id='field-14-7'/></div>
+ <div id='field-14-8'/></div>
+ <div id='field-14-9'/></div>
+ <div id='field-14-10'/></div>
+ <div id='field-14-11'/></div>
+ <div id='field-14-12'/></div>
+ <div id='field-14-13'/></div>
+ <div id='field-14-14'/></div>
+ </div>
+ </body>
+</html>
\ No newline at end of file
Added: branches/trunk-reorg/bknr/projects/scrabble/website/de/scrabble.js
===================================================================
--- branches/trunk-reorg/bknr/projects/scrabble/website/de/scrabble.js 2007-10-04 21:34:36 UTC (rev 2211)
+++ branches/trunk-reorg/bknr/projects/scrabble/website/de/scrabble.js 2007-10-04 22:22:16 UTC (rev 2212)
@@ -0,0 +1,22 @@
+// -*- Java -*- (really Javascript)
+
+function setLetter(x, y, letter) {
+ $('field-' + x + '-' + y).innerHTML = '<img src="' + letter + '.png"/>';
+}
+
+function setWord(x, y, word, down) {
+ for (i = 0; i < word.length; i++) {
+ setLetter(x, y, word.charAt(i));
+ if (down) {
+ y++;
+ } else {
+ x++;
+ }
+ };
+}
+
+function init() {
+ setWord(6, 6, "ICH");
+ setWord(7, 7, "LIEBE");
+ setWord(8, 8, "DICH");
+}
Deleted: branches/trunk-reorg/bknr/projects/scrabble/website/de/test.html
===================================================================
--- branches/trunk-reorg/bknr/projects/scrabble/website/de/test.html 2007-10-04 21:34:36 UTC (rev 2211)
+++ branches/trunk-reorg/bknr/projects/scrabble/website/de/test.html 2007-10-04 22:22:16 UTC (rev 2212)
@@ -1,268 +0,0 @@
-<head>
- <link rel="stylesheet" type="text/css" href="scrabble.css" />
-</head>
-<body bgcolor="#004B36">
-<img src="A.png"/>
-<img src="B.png"/>
-<img src="C.png"/>
-<img src="D.png"/>
-<img src="E.png"/>
-<img src="F.png"/>
-<img src="G.png"/>
-<img src="H.png"/>
-<img src="I.png"/>
-<img src="J.png"/>
-<img src="K.png"/>
-<img src="L.png"/>
-<img src="M.png"/>
-<img src="N.png"/>
-<img src="O.png"/>
-<img src="P.png"/>
-<img src="Q.png"/>
-<img src="R.png"/>
-<img src="S.png"/>
-<img src="T.png"/>
-<img src="U.png"/>
-<img src="V.png"/>
-<img src="W.png"/>
-<img src="X.png"/>
-<img src="Y.png"/>
-<img src="Z.png"/>
-<img src="�.png"/>
-<img src="�.png"/>
-<img src="�.png"/>
-<br>
-<img src="double-letter.png"/>
-<img src="double-word.png"/>
-<img src="triple-letter.png"/>
-<img src="triple-word.png"/>
-<img src="standard.png"/>
-<br/>
-<div id='playfield'>
- <div id='field-0-0'/></div>
- <div id='field-0-1'/></div>
- <div id='field-0-2'/></div>
- <div id='field-0-3'/></div>
- <div id='field-0-4'/></div>
- <div id='field-0-5'/></div>
- <div id='field-0-6'/></div>
- <div id='field-0-7'/></div>
- <div id='field-0-8'/></div>
- <div id='field-0-9'/></div>
- <div id='field-0-10'/></div>
- <div id='field-0-11'/></div>
- <div id='field-0-12'/></div>
- <div id='field-0-13'/></div>
- <div id='field-0-14'/></div>
- <div id='field-1-0'/></div>
- <div id='field-1-1'/></div>
- <div id='field-1-2'/></div>
- <div id='field-1-3'/></div>
- <div id='field-1-4'/></div>
- <div id='field-1-5'/></div>
- <div id='field-1-6'/></div>
- <div id='field-1-7'/></div>
- <div id='field-1-8'/></div>
- <div id='field-1-9'/></div>
- <div id='field-1-10'/></div>
- <div id='field-1-11'/></div>
- <div id='field-1-12'/></div>
- <div id='field-1-13'/></div>
- <div id='field-1-14'/></div>
- <div id='field-2-0'/><img src="I.png"/></div>
- <div id='field-2-1'/><img src="C.png"/></div>
- <div id='field-2-2'/><img src="H.png"/></div>
- <div id='field-2-3'/></div>
- <div id='field-2-4'/></div>
- <div id='field-2-5'/></div>
- <div id='field-2-6'/></div>
- <div id='field-2-7'/></div>
- <div id='field-2-8'/></div>
- <div id='field-2-9'/></div>
- <div id='field-2-10'/></div>
- <div id='field-2-11'/></div>
- <div id='field-2-12'/></div>
- <div id='field-2-13'/></div>
- <div id='field-2-14'/></div>
- <div id='field-3-0'/></div>
- <div id='field-3-1'/></div>
- <div id='field-3-2'/><img src="L.png"/></div>
- <div id='field-3-3'/><img src="I.png"/></div>
- <div id='field-3-4'/><img src="E.png"/></div>
- <div id='field-3-5'/><img src="B.png"/></div>
- <div id='field-3-6'/><img src="E.png"/></div>
- <div id='field-3-7'/></div>
- <div id='field-3-8'/></div>
- <div id='field-3-9'/></div>
- <div id='field-3-10'/></div>
- <div id='field-3-11'/></div>
- <div id='field-3-12'/></div>
- <div id='field-3-13'/></div>
- <div id='field-3-14'/></div>
- <div id='field-4-0'/></div>
- <div id='field-4-1'/></div>
- <div id='field-4-2'/><img src="D.png"/></div>
- <div id='field-4-3'/><img src="I.png"/></div>
- <div id='field-4-4'/><img src="C.png"/></div>
- <div id='field-4-5'/><img src="H.png"/></div>
- <div id='field-4-6'/></div>
- <div id='field-4-7'/></div>
- <div id='field-4-8'/></div>
- <div id='field-4-9'/></div>
- <div id='field-4-10'/></div>
- <div id='field-4-11'/></div>
- <div id='field-4-12'/></div>
- <div id='field-4-13'/></div>
- <div id='field-4-14'/></div>
- <div id='field-5-0'/></div>
- <div id='field-5-1'/></div>
- <div id='field-5-2'/></div>
- <div id='field-5-3'/></div>
- <div id='field-5-4'/></div>
- <div id='field-5-5'/></div>
- <div id='field-5-6'/></div>
- <div id='field-5-7'/></div>
- <div id='field-5-8'/></div>
- <div id='field-5-9'/></div>
- <div id='field-5-10'/></div>
- <div id='field-5-11'/></div>
- <div id='field-5-12'/></div>
- <div id='field-5-13'/></div>
- <div id='field-5-14'/></div>
- <div id='field-6-0'/></div>
- <div id='field-6-1'/></div>
- <div id='field-6-2'/></div>
- <div id='field-6-3'/></div>
- <div id='field-6-4'/></div>
- <div id='field-6-5'/></div>
- <div id='field-6-6'/></div>
- <div id='field-6-7'/></div>
- <div id='field-6-8'/></div>
- <div id='field-6-9'/></div>
- <div id='field-6-10'/></div>
- <div id='field-6-11'/></div>
- <div id='field-6-12'/></div>
- <div id='field-6-13'/></div>
- <div id='field-6-14'/></div>
- <div id='field-7-0'/></div>
- <div id='field-7-1'/></div>
- <div id='field-7-2'/></div>
- <div id='field-7-3'/></div>
- <div id='field-7-4'/></div>
- <div id='field-7-5'/></div>
- <div id='field-7-6'/></div>
- <div id='field-7-7'/></div>
- <div id='field-7-8'/></div>
- <div id='field-7-9'/></div>
- <div id='field-7-10'/></div>
- <div id='field-7-11'/></div>
- <div id='field-7-12'/></div>
- <div id='field-7-13'/></div>
- <div id='field-7-14'/></div>
- <div id='field-8-0'/></div>
- <div id='field-8-1'/></div>
- <div id='field-8-2'/></div>
- <div id='field-8-3'/></div>
- <div id='field-8-4'/></div>
- <div id='field-8-5'/></div>
- <div id='field-8-6'/></div>
- <div id='field-8-7'/></div>
- <div id='field-8-8'/></div>
- <div id='field-8-9'/></div>
- <div id='field-8-10'/></div>
- <div id='field-8-11'/></div>
- <div id='field-8-12'/></div>
- <div id='field-8-13'/></div>
- <div id='field-8-14'/></div>
- <div id='field-9-0'/></div>
- <div id='field-9-1'/></div>
- <div id='field-9-2'/></div>
- <div id='field-9-3'/></div>
- <div id='field-9-4'/></div>
- <div id='field-9-5'/></div>
- <div id='field-9-6'/></div>
- <div id='field-9-7'/></div>
- <div id='field-9-8'/></div>
- <div id='field-9-9'/></div>
- <div id='field-9-10'/></div>
- <div id='field-9-11'/></div>
- <div id='field-9-12'/></div>
- <div id='field-9-13'/></div>
- <div id='field-9-14'/></div>
- <div id='field-10-0'/></div>
- <div id='field-10-1'/></div>
- <div id='field-10-2'/></div>
- <div id='field-10-3'/></div>
- <div id='field-10-4'/></div>
- <div id='field-10-5'/></div>
- <div id='field-10-6'/></div>
- <div id='field-10-7'/></div>
- <div id='field-10-8'/></div>
- <div id='field-10-9'/></div>
- <div id='field-10-10'/></div>
- <div id='field-10-11'/></div>
- <div id='field-10-12'/></div>
- <div id='field-10-13'/></div>
- <div id='field-10-14'/></div>
- <div id='field-11-0'/></div>
- <div id='field-11-1'/></div>
- <div id='field-11-2'/></div>
- <div id='field-11-3'/></div>
- <div id='field-11-4'/></div>
- <div id='field-11-5'/></div>
- <div id='field-11-6'/></div>
- <div id='field-11-7'/></div>
- <div id='field-11-8'/></div>
- <div id='field-11-9'/></div>
- <div id='field-11-10'/></div>
- <div id='field-11-11'/></div>
- <div id='field-11-12'/></div>
- <div id='field-11-13'/></div>
- <div id='field-11-14'/></div>
- <div id='field-12-0'/></div>
- <div id='field-12-1'/></div>
- <div id='field-12-2'/></div>
- <div id='field-12-3'/></div>
- <div id='field-12-4'/></div>
- <div id='field-12-5'/></div>
- <div id='field-12-6'/></div>
- <div id='field-12-7'/></div>
- <div id='field-12-8'/></div>
- <div id='field-12-9'/></div>
- <div id='field-12-10'/></div>
- <div id='field-12-11'/></div>
- <div id='field-12-12'/></div>
- <div id='field-12-13'/></div>
- <div id='field-12-14'/></div>
- <div id='field-13-0'/></div>
- <div id='field-13-1'/></div>
- <div id='field-13-2'/></div>
- <div id='field-13-3'/></div>
- <div id='field-13-4'/></div>
- <div id='field-13-5'/></div>
- <div id='field-13-6'/></div>
- <div id='field-13-7'/></div>
- <div id='field-13-8'/></div>
- <div id='field-13-9'/></div>
- <div id='field-13-10'/></div>
- <div id='field-13-11'/></div>
- <div id='field-13-12'/></div>
- <div id='field-13-13'/></div>
- <div id='field-13-14'/></div>
- <div id='field-14-0'/></div>
- <div id='field-14-1'/></div>
- <div id='field-14-2'/></div>
- <div id='field-14-3'/></div>
- <div id='field-14-4'/></div>
- <div id='field-14-5'/></div>
- <div id='field-14-6'/></div>
- <div id='field-14-7'/></div>
- <div id='field-14-8'/></div>
- <div id='field-14-9'/></div>
- <div id='field-14-10'/></div>
- <div id='field-14-11'/></div>
- <div id='field-14-12'/></div>
- <div id='field-14-13'/></div>
- <div id='field-14-14'/></div>
-</div>
-</body>
\ No newline at end of file
Modified: branches/trunk-reorg/thirdparty/cxml-2007-08-05/xml/xmlns-normalizer.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/cxml-2007-08-05/xml/xmlns-normalizer.lisp 2007-10-04 21:34:36 UTC (rev 2211)
+++ branches/trunk-reorg/thirdparty/cxml-2007-08-05/xml/xmlns-normalizer.lisp 2007-10-04 22:22:16 UTC (rev 2212)
@@ -131,6 +131,5 @@
(sax:start-element (proxy-chained-handler handler) uri lname qname attrs))
(defmethod sax:end-element ((handler namespace-normalizer) uri lname qname)
- (declare (ignore qname))
(pop (xmlns-stack handler))
(sax:end-element (proxy-chained-handler handler) (or uri #"") lname qname))
1
0
[bknr-cvs] r2211 - in branches/trunk-reorg/bknr/projects: . scrabble scrabble/src scrabble/website scrabble/website/de
by bknr＠bknr.net 04 Oct '07
by bknr＠bknr.net 04 Oct '07
04 Oct '07
Author: hhubner
Date: 2007-10-04 17:34:36 -0400 (Thu, 04 Oct 2007)
New Revision: 2211
Added:
branches/trunk-reorg/bknr/projects/scrabble/
branches/trunk-reorg/bknr/projects/scrabble/scrabble_05.jpg
branches/trunk-reorg/bknr/projects/scrabble/src/
branches/trunk-reorg/bknr/projects/scrabble/src/load.lisp
branches/trunk-reorg/bknr/projects/scrabble/src/make-html.lisp
branches/trunk-reorg/bknr/projects/scrabble/src/make-letters.lisp
branches/trunk-reorg/bknr/projects/scrabble/src/package.lisp
branches/trunk-reorg/bknr/projects/scrabble/src/scrabble-test.lisp
branches/trunk-reorg/bknr/projects/scrabble/src/scrabble.asd
branches/trunk-reorg/bknr/projects/scrabble/src/scrabble.lisp
branches/trunk-reorg/bknr/projects/scrabble/src/setup-registry.lisp
branches/trunk-reorg/bknr/projects/scrabble/website/
branches/trunk-reorg/bknr/projects/scrabble/website/de/
branches/trunk-reorg/bknr/projects/scrabble/website/de/A.png
branches/trunk-reorg/bknr/projects/scrabble/website/de/B.png
branches/trunk-reorg/bknr/projects/scrabble/website/de/C.png
branches/trunk-reorg/bknr/projects/scrabble/website/de/D.png
branches/trunk-reorg/bknr/projects/scrabble/website/de/E.png
branches/trunk-reorg/bknr/projects/scrabble/website/de/F.png
branches/trunk-reorg/bknr/projects/scrabble/website/de/G.png
branches/trunk-reorg/bknr/projects/scrabble/website/de/H.png
branches/trunk-reorg/bknr/projects/scrabble/website/de/I.png
branches/trunk-reorg/bknr/projects/scrabble/website/de/J.png
branches/trunk-reorg/bknr/projects/scrabble/website/de/K.png
branches/trunk-reorg/bknr/projects/scrabble/website/de/L.png
branches/trunk-reorg/bknr/projects/scrabble/website/de/LATIN_CAPITAL_LETTER_A_WITH_DIAERESIS.png
branches/trunk-reorg/bknr/projects/scrabble/website/de/LATIN_CAPITAL_LETTER_O_WITH_DIAERESIS.png
branches/trunk-reorg/bknr/projects/scrabble/website/de/LATIN_CAPITAL_LETTER_U_WITH_DIAERESIS.png
branches/trunk-reorg/bknr/projects/scrabble/website/de/M.png
branches/trunk-reorg/bknr/projects/scrabble/website/de/N.png
branches/trunk-reorg/bknr/projects/scrabble/website/de/NIL.png
branches/trunk-reorg/bknr/projects/scrabble/website/de/O.png
branches/trunk-reorg/bknr/projects/scrabble/website/de/P.png
branches/trunk-reorg/bknr/projects/scrabble/website/de/Q.png
branches/trunk-reorg/bknr/projects/scrabble/website/de/R.png
branches/trunk-reorg/bknr/projects/scrabble/website/de/S.png
branches/trunk-reorg/bknr/projects/scrabble/website/de/T.png
branches/trunk-reorg/bknr/projects/scrabble/website/de/U.png
branches/trunk-reorg/bknr/projects/scrabble/website/de/V.png
branches/trunk-reorg/bknr/projects/scrabble/website/de/W.png
branches/trunk-reorg/bknr/projects/scrabble/website/de/X.png
branches/trunk-reorg/bknr/projects/scrabble/website/de/Y.png
branches/trunk-reorg/bknr/projects/scrabble/website/de/Z.png
branches/trunk-reorg/bknr/projects/scrabble/website/de/double-letter.png
branches/trunk-reorg/bknr/projects/scrabble/website/de/double-word.png
branches/trunk-reorg/bknr/projects/scrabble/website/de/scrabble.css
branches/trunk-reorg/bknr/projects/scrabble/website/de/standard.png
branches/trunk-reorg/bknr/projects/scrabble/website/de/test.html
branches/trunk-reorg/bknr/projects/scrabble/website/de/triple-letter.png
branches/trunk-reorg/bknr/projects/scrabble/website/de/triple-word.png
Log:
Add Scrabble project
Added: branches/trunk-reorg/bknr/projects/scrabble/scrabble_05.jpg
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/bknr/projects/scrabble/scrabble_05.jpg
___________________________________________________________________
Name: svn:executable
+ *
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/bknr/projects/scrabble/src/load.lisp
===================================================================
--- branches/trunk-reorg/bknr/projects/scrabble/src/load.lisp 2007-10-04 21:08:36 UTC (rev 2210)
+++ branches/trunk-reorg/bknr/projects/scrabble/src/load.lisp 2007-10-04 21:34:36 UTC (rev 2211)
@@ -0,0 +1,5 @@
+(in-package :cl-user)
+
+(load (merge-pathnames #p"../thirdparty/asdf.lisp" *load-truename*))
+
+(load (merge-pathnames #p"setup-registry.lisp" *load-truename*))
\ No newline at end of file
Added: branches/trunk-reorg/bknr/projects/scrabble/src/make-html.lisp
===================================================================
--- branches/trunk-reorg/bknr/projects/scrabble/src/make-html.lisp 2007-10-04 21:08:36 UTC (rev 2210)
+++ branches/trunk-reorg/bknr/projects/scrabble/src/make-html.lisp 2007-10-04 21:34:36 UTC (rev 2211)
@@ -0,0 +1,16 @@
+
+(in-package :scrabble)
+
+(defun make-playfield-html ()
+ (format t "<div id='playfield'>~%")
+ (dotimes (x 15)
+ (dotimes (y 15)
+ (format t " <div id='field-~A-~A'/><img src='A.png'/></div>~%"
+ x y)))
+ (format t "</div>~%"))
+
+(defun make-playfield-css ()
+ (dotimes (x 15)
+ (dotimes (y 15)
+ (format t "#playfield #field-~A-~A { background-image: url(~(~A.png~)); left: ~A; top: ~A }~%"
+ x y (field-type x y) (* 44 x) (* 44 y)))))
\ No newline at end of file
Added: branches/trunk-reorg/bknr/projects/scrabble/src/make-letters.lisp
===================================================================
--- branches/trunk-reorg/bknr/projects/scrabble/src/make-letters.lisp 2007-10-04 21:08:36 UTC (rev 2210)
+++ branches/trunk-reorg/bknr/projects/scrabble/src/make-letters.lisp 2007-10-04 21:34:36 UTC (rev 2211)
@@ -0,0 +1,72 @@
+
+(in-package :scrabble.graphics)
+
+(defparameter *special-tile-texts* (make-hash-table))
+
+(setf (gethash :de *special-tile-texts*)
+ '(:double-letter "DOPPELTER\nBUCHSTABEN\nWERT"
+ :double-word "DOPPELTER\nWORT\nWERT"
+ :triple-letter "DREIFACHER\nBUCHSTABEN\nWERT"
+ :triple-word "DREIFACHER\nWORT\nWERT"))
+
+(defparameter *special-tile-colors*
+ '(:double-letter (0.53 0.8 0.94)
+ :double-word (0.97 0.67 0.6)
+ :triple-letter (0.0 0.62 0.87)
+ :triple-word (0.93 0.11 0.18)
+ :standard (0.0 0.59 0.57)))
+
+(defparameter *bold-font* #.(merge-pathnames #p"../fonts/DIN/DINMd___.ttf" *default-pathname-defaults*))
+(defparameter *regular-font* #.(merge-pathnames #p"../fonts/DIN/DINRg___.ttf" *default-pathname-defaults*))
+
+(defun make-letter-tile (char score)
+ (with-canvas (:width 34 :height 34)
+ (let ((bold-font (get-font *bold-font*))
+ (regular-font (get-font *regular-font*))
+ (char-string (make-string 1 :initial-element char)))
+ (set-rgb-fill 1.0 0.98 0.8)
+ (rounded-rectangle 0 0 34 34 4 4)
+ (fill-path)
+ (set-rgb-fill 0 0 0)
+ (set-font bold-font 27)
+ (draw-centered-string 13 7 char-string)
+ (set-font regular-font 11)
+ (draw-centered-string 26 3 (princ-to-string score))
+ (save-png (make-pathname :name char-string :type "png")))))
+
+(defun make-letter-tile-set (language)
+ (dolist (entry (gethash language *tile-sets*))
+ (destructuring-bind (letter score count) entry
+ (declare (ignore count))
+ (make-letter-tile letter score))))
+
+(defun make-special-tile (name color &key text star)
+ (with-canvas (:width 40 :height 40)
+ (let ((regular-font (get-font *regular-font*)))
+ (apply #'set-rgb-fill color)
+ (rounded-rectangle 0 0 40 40 5 5)
+ (fill-path)
+ (set-rgb-fill 0 0 0)
+ (cond
+ (text
+ (set-font regular-font 6)
+ (draw-centered-string 26 3 text))
+ (star
+ ))
+ (save-png (make-pathname :name (string-downcase (symbol-name name)) :type "png")))))
+
+(defun make-special-tile-set (language)
+ (dolist (tile-name '(:double-letter :double-word :triple-letter :triple-word))
+ (make-special-tile tile-name
+ (getf *special-tile-colors* tile-name)
+ :text (getf (gethash language *special-tile-texts*) tile-name)))
+ (make-special-tile :standard (getf *special-tile-colors* :standard) :star t))
+
+
+(defun make-tile-set (language)
+ (let ((*default-pathname-defaults* (merge-pathnames
+ (make-pathname :directory (list :relative
+ (string-downcase (symbol-name language)))))))
+ (ensure-directories-exist *default-pathname-defaults*)
+ (make-letter-tile-set language)
+ (make-special-tile-set language)))
\ No newline at end of file
Added: branches/trunk-reorg/bknr/projects/scrabble/src/package.lisp
===================================================================
--- branches/trunk-reorg/bknr/projects/scrabble/src/package.lisp 2007-10-04 21:08:36 UTC (rev 2210)
+++ branches/trunk-reorg/bknr/projects/scrabble/src/package.lisp 2007-10-04 21:34:36 UTC (rev 2211)
@@ -0,0 +1,11 @@
+
+(defpackage :scrabble
+ (:use :cl :alexandria :anaphora)
+ (:export "*BOARD-SCORING*"
+ "*TILE-SETS*"
+ "FIELD-TYPE"))
+
+(defpackage :scrabble.graphics
+ (:use :cl :alexandria :vecto :scrabble)
+ (:shadowing-import-from :vecto "ROTATE"))
+
\ No newline at end of file
Added: branches/trunk-reorg/bknr/projects/scrabble/src/scrabble-test.lisp
===================================================================
--- branches/trunk-reorg/bknr/projects/scrabble/src/scrabble-test.lisp 2007-10-04 21:08:36 UTC (rev 2210)
+++ branches/trunk-reorg/bknr/projects/scrabble/src/scrabble-test.lisp 2007-10-04 21:34:36 UTC (rev 2211)
@@ -0,0 +1,23 @@
+
+(defun test-adjacent ()
+ (let ((board (make-array '(15 15) :initial-element nil)))
+ (check-adjacent board 7 7)
+ (handler-case
+ (check-adjacent board 0 0)
+ (not-touching-other-tile (e)
+ (declare (ignore e))))
+ (setf (aref board 7 7) t)
+ (handler-case
+ (check-adjacent board 7 7)
+ (tile-placed-on-occupied-field (e)
+ (declare (ignore e))))
+ (check-adjacent board 6 7)
+ (check-adjacent board 7 6)
+ (check-adjacent board 8 7)
+ (check-adjacent board 7 8)
+ (setf (aref board 0 0) t)
+ (check-adjacent board 0 1)
+ (check-adjacent board 1 0)
+ (setf (aref board 14 14) t)
+ (check-adjacent board 14 13)
+ (check-adjacent board 13 14)))
Added: branches/trunk-reorg/bknr/projects/scrabble/src/scrabble.asd
===================================================================
--- branches/trunk-reorg/bknr/projects/scrabble/src/scrabble.asd 2007-10-04 21:08:36 UTC (rev 2210)
+++ branches/trunk-reorg/bknr/projects/scrabble/src/scrabble.asd 2007-10-04 21:34:36 UTC (rev 2211)
@@ -0,0 +1,18 @@
+;;;; -*- lisp -*-
+
+(in-package :cl-user)
+
+(defpackage :scrabble.system
+ (:use :cl :asdf))
+
+(in-package :scrabble.system)
+
+(defsystem :scrabble
+ :name "Scrabble"
+ :licence "BSD"
+ :depends-on (:bknr-datastore :vecto :alexandria :anaphora)
+ :serial t
+ :components ((:file "package")
+ (:file "scrabble")
+ (:file "make-html")
+ (:file "make-letters")))
Added: branches/trunk-reorg/bknr/projects/scrabble/src/scrabble.lisp
===================================================================
--- branches/trunk-reorg/bknr/projects/scrabble/src/scrabble.lisp 2007-10-04 21:08:36 UTC (rev 2210)
+++ branches/trunk-reorg/bknr/projects/scrabble/src/scrabble.lisp 2007-10-04 21:34:36 UTC (rev 2211)
@@ -0,0 +1,293 @@
+(in-package :scrabble)
+
+(defparameter *board-scoring*
+ #2A((:triple-word nil nil :double-letter nil nil nil :triple-word nil nil nil :double-letter nil nil :triple-word)
+ (nil :double-word nil nil nil :triple-letter nil nil nil :triple-letter nil nil nil :double-word nil)
+ (nil nil :double-word nil nil nil :double-letter nil :double-letter nil nil nil :double-word nil nil)
+ (:double-letter nil nil :double-word nil nil nil :double-letter nil nil nil :double-word nil nil :double-letter)
+ (nil nil nil nil :double-word nil nil nil nil nil :double-word nil nil nil nil)
+ (nil :triple-letter nil nil nil :triple-letter nil nil nil :triple-letter nil nil nil :triple-letter nil)
+ (nil nil :double-letter nil nil nil :double-letter nil :double-letter nil nil nil :double-letter nil nil)
+ (:triple-word nil nil :double-letter nil nil nil :triple-word nil nil nil :double-letter nil nil :triple-word)
+ (nil nil :double-letter nil nil nil :double-letter nil :double-letter nil nil nil :double-letter nil nil)
+ (nil :triple-letter nil nil nil :triple-letter nil nil nil :triple-letter nil nil nil :triple-letter nil)
+ (nil nil nil nil :double-word nil nil nil nil nil :double-word nil nil nil nil)
+ (:double-letter nil nil :double-word nil nil nil :double-letter nil nil nil :double-word nil nil :double-letter)
+ (nil nil :double-word nil nil nil :double-letter nil :double-letter nil nil nil :double-word nil nil)
+ (nil :double-word nil nil nil :triple-letter nil nil nil :triple-letter nil nil nil :double-word nil)
+ (:triple-word nil nil :double-letter nil nil nil :triple-word nil nil nil :double-letter nil nil :triple-word)))
+
+(defun field-type (x y)
+ (or (aref *board-scoring* x y)
+ :standard))
+
+(defparameter *tile-sets* (make-hash-table))
+
+(setf (gethash :de *tile-sets*)
+ '((#\A 1 5)
+ (#\B 3 2)
+ (#\C 4 2)
+ (#\D 1 4)
+ (#\E 1 15)
+ (#\F 4 2)
+ (#\G 2 3)
+ (#\H 2 4)
+ (#\I 1 6)
+ (#\J 6 1)
+ (#\K 4 2)
+ (#\L 2 3)
+ (#\M 3 4)
+ (#\N 1 9)
+ (#\O 2 3)
+ (#\P 4 1)
+ (#\Q 10 1)
+ (#\R 1 6)
+ (#\S 1 7)
+ (#\T 1 6)
+ (#\U 1 6)
+ (#\V 6 1)
+ (#\W 3 1)
+ (#\X 8 1)
+ (#\Y 10 1)
+ (#\Z 3 1)
+ #-cmu (#\LATIN_CAPITAL_LETTER_A_WITH_DIAERESIS 6 1)
+ #-cmu (#\LATIN_CAPITAL_LETTER_O_WITH_DIAERESIS 8 1)
+ #-cmu (#\LATIN_CAPITAL_LETTER_U_WITH_DIAERESIS 6 1)
+ (nil 0 2)))
+
+(define-condition invalid-move (simple-error)
+ ()
+ (:report (lambda (c stream)
+ (format stream "Invalid move: ~A" (type-of c)))))
+
+(defun seq (from to)
+ (loop for i from from upto to
+ collect i))
+
+(defun positions-between (start-position end-position)
+ (if (= (first start-position)
+ (first end-position))
+ (mapcar (lambda (y) (list (first start-position) y))
+ (seq (second start-position) (second end-position)))
+ (mapcar (lambda (x) (list x (second start-position)))
+ (seq (first start-position) (first end-position)))))
+
+(defclass tile-placement ()
+ ((x :reader x-of :initarg :x)
+ (y :reader y-of :initarg :y)
+ (tile :reader tile-of :initarg :tile))
+ (:documentation "Represents placement of a letter tile on the board"))
+
+(defun make-tile-placement (x y tile)
+ (make-instance 'tile-placement :x x :y y :tile tile))
+
+(defun make-tile-placements (list-of-moves)
+ (mapcar (curry #'apply 'make-tile-placement) list-of-moves))
+
+(defmethod equal-position ((tile-placement-1 tile-placement) (tile-placement-2 tile-placement))
+ (and (= (x-of tile-placement-1) (x-of tile-placement-2))
+ (= (y-of tile-placement-1) (y-of tile-placement-2))))
+
+(defmethod position-equal ((position list) (tile-placement tile-placement))
+ "Return non-nil if the given POSITION is at the position of PLACED-TILE"
+ (and (= (first position) (x-of tile-placement))
+ (= (second position) (y-of tile-placement))))
+
+(defmethod position-< ((a tile-placement) (b tile-placement))
+ "Compare positions of placements, for sorting"
+ (or (< (x-of a) (x-of b))
+ (< (y-of a) (y-of b))))
+
+(defclass board ()
+ ((placed-tiles :accessor placed-tiles-of :initform (make-array '(15 15) :initial-element nil))))
+
+(defmethod print-object ((board board) stream)
+ (print-unreadable-object (board stream :type t :identity t)
+ (terpri stream)
+ (dotimes (x 15)
+ (dotimes (y 15)
+ (format stream "~C " (aif (at-xy board x y) (char-of it) #\.)))
+ (terpri stream))))
+
+(defmethod at-xy ((board board) x y)
+ (aref (placed-tiles-of board) x y))
+
+(defmethod at-placement ((board board) tile-placement)
+ (at-xy board (x-of tile-placement) (y-of tile-placement)))
+
+(defmethod put-letter ((board board) tile x y)
+ (setf (aref (placed-tiles-of board) x y) tile))
+
+(defclass tile ()
+ ((char :reader char-of :initarg :char)
+ (value :reader value-of :initarg :value)))
+
+(defmethod print-object ((tile tile) stream)
+ (print-unreadable-object (tile stream :type t :identity nil)
+ (with-slots (char value) tile
+ (format stream "~A (~A)" char value))))
+
+(defun make-tile (char value)
+ (make-instance 'tile :char char :value value))
+
+(defclass tile-bag ()
+ ((tiles :initarg :tiles :accessor tiles-of)))
+
+(defmethod remaining-tile-count ((tile-bag tile-bag))
+ (fill-pointer (tiles-of tile-bag)))
+
+(defmethod print-object ((tile-bag tile-bag) stream)
+ (print-unreadable-object (tile-bag stream :type t :identity t)
+ (format stream "~A letters remaining" (remaining-tile-count tile-bag))))
+
+(defun make-tile-bag (language)
+ (let ((tiles (make-array 102 :adjustable t :fill-pointer 0)))
+ (mapcar (lambda (entry)
+ (destructuring-bind (char value count) entry
+ (dotimes (i count)
+ (vector-push-extend (make-tile char value) tiles))))
+ (or (gethash language *tile-sets*)
+ (error "language ~A not defined" language)))
+ (dotimes (i (fill-pointer tiles))
+ (let ((tmp (aref tiles i))
+ (random-index (random (fill-pointer tiles))))
+ (setf (aref tiles i) (aref tiles random-index))
+ (setf (aref tiles random-index) tmp)))
+ (make-instance 'tile-bag :tiles tiles)))
+
+(define-condition no-tiles-remaining (simple-error)
+ ())
+
+(defmethod draw-tile ((tile-bag tile-bag))
+ (unless (plusp (remaining-tile-count tile-bag))
+ (error 'no-tiles-remaining))
+ (with-slots (tiles) tile-bag
+ (prog1
+ (aref tiles (1- (fill-pointer tiles)))
+ (decf (fill-pointer tiles)))))
+
+(defmethod placed-tile-adjacent ((board board) (tile-placement tile-placement))
+ "Check whether the given TILE-PLACEMENT on the board is adjacent to
+another tile or if it is the start position."
+ (with-accessors ((x x-of) (y y-of))
+ tile-placement
+ (or (and (eql x 7)
+ (eql y 7))
+ (and (plusp x)
+ (at-xy board (1- x) y))
+ (and (plusp y)
+ (at-xy board x (1- y)))
+ (and (< x 14)
+ (at-xy board (1+ x) y))
+ (and (< y 14)
+ (at-xy board x (1+ y))))))
+
+(defun placed-or-being-placed (board placed-tiles position)
+ (or (at-xy board (first position) (second position))
+ (awhen (find position placed-tiles :test #'position-equal)
+ (values (tile-of it) t))))
+
+(define-condition not-touching-other-tile (invalid-move) ())
+(define-condition not-in-a-row (invalid-move) ())
+(define-condition placed-on-occupied-field (invalid-move) ())
+(define-condition no-tile-placed (invalid-move) ())
+(define-condition multiple-letters-placed-on-one-field (invalid-move) ())
+(define-condition placement-with-holes (invalid-move) ())
+
+(defun check-move-legality (board placed-tiles)
+ "Verify that placing the PLACED-TILES on BOARD is a legal Scrabble
+move. If the move is not valid, a specific INVALID-MOVE condition is
+signalled. Otherwise, t is returned."
+ (unless placed-tiles
+ (error 'no-tile-placed))
+
+ (unless (or (apply #'= (mapcar #'x-of placed-tiles))
+ (apply #'= (mapcar #'y-of placed-tiles)))
+ (error 'not-in-a-row))
+
+ (when (some (curry #'at-placement board) placed-tiles)
+ (error 'tile-placed-on-occupied-field))
+
+ (unless (equal placed-tiles
+ (remove-duplicates placed-tiles :test #'equal-position))
+ (error 'multiple-letters-placed-on-one-field))
+
+ (let* ((placed-tiles (sort (copy-list placed-tiles) #'position-<))
+ (start-of-placement (first placed-tiles))
+ (end-of-placement (first (last placed-tiles))))
+ (unless (every (curry 'placed-or-being-placed board placed-tiles)
+ (positions-between (list (x-of start-of-placement) (y-of start-of-placement))
+ (list (x-of end-of-placement) (y-of end-of-placement))))
+ (error 'placement-with-holes)))
+
+ (unless (or (find '(7 7) placed-tiles :test #'position-equal)
+ (some (curry #'placed-tile-adjacent board) placed-tiles))
+ (error 'not-touching-other-tile))
+
+ t)
+
+(defun words-formed% (board placed-tiles verticalp)
+ "Scan for words that would be formed by placing PLACED-TILES on
+BOARD. VERTICALP determines the scan order, if nil, the board is
+scanned horizontally, else vertically. This is called by WORDS-FORMED
+below, see there for a description of the return value format."
+ (let (words)
+ (dotimes (x 15)
+ (when (find x placed-tiles :key (if verticalp #'y-of #'x-of) :test #'=)
+ (let (word is-new-word)
+ (dotimes (y 15)
+ (multiple-value-bind (placed-tile being-placed) (placed-or-being-placed board placed-tiles (if verticalp (list y x) (list x y)))
+ (when (and word (null placed-tile))
+ (when (and (cdr word) is-new-word)
+ (push (nreverse word) words))
+ (setf word nil is-new-word nil))
+ (when placed-tile
+ (push (list placed-tile (and being-placed (field-type x y))) word)
+ (when being-placed
+ (setf is-new-word t)))))
+ (when (and (cdr word) is-new-word)
+ (push (nreverse word) words)))))
+ (nreverse words)))
+
+(defun words-formed (board placed-tiles)
+ "Return list of all words formed by placing the tiles in
+PLACED-TILES on the BOARD. Returns each word as a list, with each
+letter of the word represented by a list (TILE FIELD-TYPE). TILE is
+the tile for the letter, FIELD-TYPE is either the field type of the
+field that the letter has been placed on, or NIL if the tile was
+already on the board."
+ (append (words-formed% board placed-tiles nil)
+ (words-formed% board placed-tiles t)))
+
+(defun word-score (word-result)
+ "Process one word result from WORDS-FORMED and calculate the score
+for the word."
+ (let ((factor 1)
+ (value 0))
+ (dolist (entry word-result)
+ (destructuring-bind (tile field-type) entry
+ (incf value (value-of tile))
+ (case field-type
+ ((:double-letter) (incf value (value-of tile)))
+ ((:triple-letter) (incf value (* 2 (value-of tile))))
+ ((:double-word) (setf factor (* factor 2)))
+ ((:triple-word) (setf factor (* factor 3))))))
+ (* value factor)))
+
+(defun word-text (word-result)
+ "Convert the letter in a word result returned by WORDS-FORMED to a
+string."
+ (coerce (mapcar (compose #'char-of #'car) word-result) 'string))
+
+(defun make-move (board placed-tiles)
+ "Actually perform a move. BOARD contains the already placed tiles,
+PLACED-TILES contains the letters for the move to make. BOARD is
+modified to include the tiles placed. Returns the two values that
+CALCULATE-SCORE returns for the move."
+ (check-move-legality board placed-tiles)
+ (prog1
+ (mapcar (lambda (word-result)
+ (list (word-text word-result) (word-score word-result)))
+ (words-formed board placed-tiles))
+ (dolist (placed-tile placed-tiles)
+ (put-letter board (tile-of placed-tile) (x-of placed-tile) (y-of placed-tile)))))
Added: branches/trunk-reorg/bknr/projects/scrabble/src/setup-registry.lisp
===================================================================
--- branches/trunk-reorg/bknr/projects/scrabble/src/setup-registry.lisp 2007-10-04 21:08:36 UTC (rev 2210)
+++ branches/trunk-reorg/bknr/projects/scrabble/src/setup-registry.lisp 2007-10-04 21:34:36 UTC (rev 2211)
@@ -0,0 +1,14 @@
+(in-package :cl-user)
+
+(defun setup-registry (directory-path)
+ (format t "; adding components under ~A to asdf registry~%" directory-path)
+ (mapc #'(lambda (asd-pathname)
+ (pushnew (make-pathname :name nil
+ :type nil
+ :version nil
+ :defaults asd-pathname)
+ asdf:*central-registry*
+ :test #'equal))
+ (directory (merge-pathnames #p"**/*.asd" directory-path))))
+
+(setup-registry (merge-pathnames #p"../thirdparty/" *load-truename*))
\ No newline at end of file
Added: branches/trunk-reorg/bknr/projects/scrabble/website/de/A.png
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/bknr/projects/scrabble/website/de/A.png
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/bknr/projects/scrabble/website/de/B.png
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/bknr/projects/scrabble/website/de/B.png
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/bknr/projects/scrabble/website/de/C.png
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/bknr/projects/scrabble/website/de/C.png
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/bknr/projects/scrabble/website/de/D.png
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/bknr/projects/scrabble/website/de/D.png
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/bknr/projects/scrabble/website/de/E.png
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/bknr/projects/scrabble/website/de/E.png
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/bknr/projects/scrabble/website/de/F.png
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/bknr/projects/scrabble/website/de/F.png
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/bknr/projects/scrabble/website/de/G.png
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/bknr/projects/scrabble/website/de/G.png
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/bknr/projects/scrabble/website/de/H.png
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/bknr/projects/scrabble/website/de/H.png
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/bknr/projects/scrabble/website/de/I.png
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/bknr/projects/scrabble/website/de/I.png
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/bknr/projects/scrabble/website/de/J.png
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/bknr/projects/scrabble/website/de/J.png
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/bknr/projects/scrabble/website/de/K.png
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/bknr/projects/scrabble/website/de/K.png
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/bknr/projects/scrabble/website/de/L.png
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/bknr/projects/scrabble/website/de/L.png
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/bknr/projects/scrabble/website/de/LATIN_CAPITAL_LETTER_A_WITH_DIAERESIS.png
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/bknr/projects/scrabble/website/de/LATIN_CAPITAL_LETTER_A_WITH_DIAERESIS.png
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/bknr/projects/scrabble/website/de/LATIN_CAPITAL_LETTER_O_WITH_DIAERESIS.png
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/bknr/projects/scrabble/website/de/LATIN_CAPITAL_LETTER_O_WITH_DIAERESIS.png
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/bknr/projects/scrabble/website/de/LATIN_CAPITAL_LETTER_U_WITH_DIAERESIS.png
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/bknr/projects/scrabble/website/de/LATIN_CAPITAL_LETTER_U_WITH_DIAERESIS.png
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/bknr/projects/scrabble/website/de/M.png
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/bknr/projects/scrabble/website/de/M.png
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/bknr/projects/scrabble/website/de/N.png
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/bknr/projects/scrabble/website/de/N.png
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/bknr/projects/scrabble/website/de/NIL.png
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/bknr/projects/scrabble/website/de/NIL.png
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/bknr/projects/scrabble/website/de/O.png
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/bknr/projects/scrabble/website/de/O.png
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/bknr/projects/scrabble/website/de/P.png
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/bknr/projects/scrabble/website/de/P.png
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/bknr/projects/scrabble/website/de/Q.png
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/bknr/projects/scrabble/website/de/Q.png
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/bknr/projects/scrabble/website/de/R.png
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/bknr/projects/scrabble/website/de/R.png
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/bknr/projects/scrabble/website/de/S.png
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/bknr/projects/scrabble/website/de/S.png
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/bknr/projects/scrabble/website/de/T.png
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/bknr/projects/scrabble/website/de/T.png
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/bknr/projects/scrabble/website/de/U.png
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/bknr/projects/scrabble/website/de/U.png
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/bknr/projects/scrabble/website/de/V.png
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/bknr/projects/scrabble/website/de/V.png
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/bknr/projects/scrabble/website/de/W.png
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/bknr/projects/scrabble/website/de/W.png
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/bknr/projects/scrabble/website/de/X.png
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/bknr/projects/scrabble/website/de/X.png
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/bknr/projects/scrabble/website/de/Y.png
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/bknr/projects/scrabble/website/de/Y.png
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/bknr/projects/scrabble/website/de/Z.png
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/bknr/projects/scrabble/website/de/Z.png
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/bknr/projects/scrabble/website/de/double-letter.png
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/bknr/projects/scrabble/website/de/double-letter.png
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/bknr/projects/scrabble/website/de/double-word.png
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/bknr/projects/scrabble/website/de/double-word.png
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/bknr/projects/scrabble/website/de/scrabble.css
===================================================================
--- branches/trunk-reorg/bknr/projects/scrabble/website/de/scrabble.css 2007-10-04 21:08:36 UTC (rev 2210)
+++ branches/trunk-reorg/bknr/projects/scrabble/website/de/scrabble.css 2007-10-04 21:34:36 UTC (rev 2211)
@@ -0,0 +1,228 @@
+#playfield { position: absolute }
+#playfield div { position: absolute; width: 40px; height: 40px }
+#playfield img { position: absolute; top: 3px; left: 3px }
+#playfield #field-0-0 { background-image: url(triple-word.png); left: 0; top: 0 }
+#playfield #field-0-1 { background-image: url(standard.png); left: 0; top: 44 }
+#playfield #field-0-2 { background-image: url(standard.png); left: 0; top: 88 }
+#playfield #field-0-3 { background-image: url(double-letter.png); left: 0; top: 132 }
+#playfield #field-0-4 { background-image: url(standard.png); left: 0; top: 176 }
+#playfield #field-0-5 { background-image: url(standard.png); left: 0; top: 220 }
+#playfield #field-0-6 { background-image: url(standard.png); left: 0; top: 264 }
+#playfield #field-0-7 { background-image: url(triple-word.png); left: 0; top: 308 }
+#playfield #field-0-8 { background-image: url(standard.png); left: 0; top: 352 }
+#playfield #field-0-9 { background-image: url(standard.png); left: 0; top: 396 }
+#playfield #field-0-10 { background-image: url(standard.png); left: 0; top: 440 }
+#playfield #field-0-11 { background-image: url(double-letter.png); left: 0; top: 484 }
+#playfield #field-0-12 { background-image: url(standard.png); left: 0; top: 528 }
+#playfield #field-0-13 { background-image: url(standard.png); left: 0; top: 572 }
+#playfield #field-0-14 { background-image: url(triple-word.png); left: 0; top: 616 }
+#playfield #field-1-0 { background-image: url(standard.png); left: 44; top: 0 }
+#playfield #field-1-1 { background-image: url(double-word.png); left: 44; top: 44 }
+#playfield #field-1-2 { background-image: url(standard.png); left: 44; top: 88 }
+#playfield #field-1-3 { background-image: url(standard.png); left: 44; top: 132 }
+#playfield #field-1-4 { background-image: url(standard.png); left: 44; top: 176 }
+#playfield #field-1-5 { background-image: url(triple-letter.png); left: 44; top: 220 }
+#playfield #field-1-6 { background-image: url(standard.png); left: 44; top: 264 }
+#playfield #field-1-7 { background-image: url(standard.png); left: 44; top: 308 }
+#playfield #field-1-8 { background-image: url(standard.png); left: 44; top: 352 }
+#playfield #field-1-9 { background-image: url(triple-letter.png); left: 44; top: 396 }
+#playfield #field-1-10 { background-image: url(standard.png); left: 44; top: 440 }
+#playfield #field-1-11 { background-image: url(standard.png); left: 44; top: 484 }
+#playfield #field-1-12 { background-image: url(standard.png); left: 44; top: 528 }
+#playfield #field-1-13 { background-image: url(double-word.png); left: 44; top: 572 }
+#playfield #field-1-14 { background-image: url(standard.png); left: 44; top: 616 }
+#playfield #field-2-0 { background-image: url(standard.png); left: 88; top: 0 }
+#playfield #field-2-1 { background-image: url(standard.png); left: 88; top: 44 }
+#playfield #field-2-2 { background-image: url(double-word.png); left: 88; top: 88 }
+#playfield #field-2-3 { background-image: url(standard.png); left: 88; top: 132 }
+#playfield #field-2-4 { background-image: url(standard.png); left: 88; top: 176 }
+#playfield #field-2-5 { background-image: url(standard.png); left: 88; top: 220 }
+#playfield #field-2-6 { background-image: url(double-letter.png); left: 88; top: 264 }
+#playfield #field-2-7 { background-image: url(standard.png); left: 88; top: 308 }
+#playfield #field-2-8 { background-image: url(double-letter.png); left: 88; top: 352 }
+#playfield #field-2-9 { background-image: url(standard.png); left: 88; top: 396 }
+#playfield #field-2-10 { background-image: url(standard.png); left: 88; top: 440 }
+#playfield #field-2-11 { background-image: url(standard.png); left: 88; top: 484 }
+#playfield #field-2-12 { background-image: url(double-word.png); left: 88; top: 528 }
+#playfield #field-2-13 { background-image: url(standard.png); left: 88; top: 572 }
+#playfield #field-2-14 { background-image: url(standard.png); left: 88; top: 616 }
+#playfield #field-3-0 { background-image: url(double-letter.png); left: 132; top: 0 }
+#playfield #field-3-1 { background-image: url(standard.png); left: 132; top: 44 }
+#playfield #field-3-2 { background-image: url(standard.png); left: 132; top: 88 }
+#playfield #field-3-3 { background-image: url(double-word.png); left: 132; top: 132 }
+#playfield #field-3-4 { background-image: url(standard.png); left: 132; top: 176 }
+#playfield #field-3-5 { background-image: url(standard.png); left: 132; top: 220 }
+#playfield #field-3-6 { background-image: url(standard.png); left: 132; top: 264 }
+#playfield #field-3-7 { background-image: url(double-letter.png); left: 132; top: 308 }
+#playfield #field-3-8 { background-image: url(standard.png); left: 132; top: 352 }
+#playfield #field-3-9 { background-image: url(standard.png); left: 132; top: 396 }
+#playfield #field-3-10 { background-image: url(standard.png); left: 132; top: 440 }
+#playfield #field-3-11 { background-image: url(double-word.png); left: 132; top: 484 }
+#playfield #field-3-12 { background-image: url(standard.png); left: 132; top: 528 }
+#playfield #field-3-13 { background-image: url(standard.png); left: 132; top: 572 }
+#playfield #field-3-14 { background-image: url(double-letter.png); left: 132; top: 616 }
+#playfield #field-4-0 { background-image: url(standard.png); left: 176; top: 0 }
+#playfield #field-4-1 { background-image: url(standard.png); left: 176; top: 44 }
+#playfield #field-4-2 { background-image: url(standard.png); left: 176; top: 88 }
+#playfield #field-4-3 { background-image: url(standard.png); left: 176; top: 132 }
+#playfield #field-4-4 { background-image: url(double-word.png); left: 176; top: 176 }
+#playfield #field-4-5 { background-image: url(standard.png); left: 176; top: 220 }
+#playfield #field-4-6 { background-image: url(standard.png); left: 176; top: 264 }
+#playfield #field-4-7 { background-image: url(standard.png); left: 176; top: 308 }
+#playfield #field-4-8 { background-image: url(standard.png); left: 176; top: 352 }
+#playfield #field-4-9 { background-image: url(standard.png); left: 176; top: 396 }
+#playfield #field-4-10 { background-image: url(double-word.png); left: 176; top: 440 }
+#playfield #field-4-11 { background-image: url(standard.png); left: 176; top: 484 }
+#playfield #field-4-12 { background-image: url(standard.png); left: 176; top: 528 }
+#playfield #field-4-13 { background-image: url(standard.png); left: 176; top: 572 }
+#playfield #field-4-14 { background-image: url(standard.png); left: 176; top: 616 }
+#playfield #field-5-0 { background-image: url(standard.png); left: 220; top: 0 }
+#playfield #field-5-1 { background-image: url(triple-letter.png); left: 220; top: 44 }
+#playfield #field-5-2 { background-image: url(standard.png); left: 220; top: 88 }
+#playfield #field-5-3 { background-image: url(standard.png); left: 220; top: 132 }
+#playfield #field-5-4 { background-image: url(standard.png); left: 220; top: 176 }
+#playfield #field-5-5 { background-image: url(triple-letter.png); left: 220; top: 220 }
+#playfield #field-5-6 { background-image: url(standard.png); left: 220; top: 264 }
+#playfield #field-5-7 { background-image: url(standard.png); left: 220; top: 308 }
+#playfield #field-5-8 { background-image: url(standard.png); left: 220; top: 352 }
+#playfield #field-5-9 { background-image: url(triple-letter.png); left: 220; top: 396 }
+#playfield #field-5-10 { background-image: url(standard.png); left: 220; top: 440 }
+#playfield #field-5-11 { background-image: url(standard.png); left: 220; top: 484 }
+#playfield #field-5-12 { background-image: url(standard.png); left: 220; top: 528 }
+#playfield #field-5-13 { background-image: url(triple-letter.png); left: 220; top: 572 }
+#playfield #field-5-14 { background-image: url(standard.png); left: 220; top: 616 }
+#playfield #field-6-0 { background-image: url(standard.png); left: 264; top: 0 }
+#playfield #field-6-1 { background-image: url(standard.png); left: 264; top: 44 }
+#playfield #field-6-2 { background-image: url(double-letter.png); left: 264; top: 88 }
+#playfield #field-6-3 { background-image: url(standard.png); left: 264; top: 132 }
+#playfield #field-6-4 { background-image: url(standard.png); left: 264; top: 176 }
+#playfield #field-6-5 { background-image: url(standard.png); left: 264; top: 220 }
+#playfield #field-6-6 { background-image: url(double-letter.png); left: 264; top: 264 }
+#playfield #field-6-7 { background-image: url(standard.png); left: 264; top: 308 }
+#playfield #field-6-8 { background-image: url(double-letter.png); left: 264; top: 352 }
+#playfield #field-6-9 { background-image: url(standard.png); left: 264; top: 396 }
+#playfield #field-6-10 { background-image: url(standard.png); left: 264; top: 440 }
+#playfield #field-6-11 { background-image: url(standard.png); left: 264; top: 484 }
+#playfield #field-6-12 { background-image: url(double-letter.png); left: 264; top: 528 }
+#playfield #field-6-13 { background-image: url(standard.png); left: 264; top: 572 }
+#playfield #field-6-14 { background-image: url(standard.png); left: 264; top: 616 }
+#playfield #field-7-0 { background-image: url(triple-word.png); left: 308; top: 0 }
+#playfield #field-7-1 { background-image: url(standard.png); left: 308; top: 44 }
+#playfield #field-7-2 { background-image: url(standard.png); left: 308; top: 88 }
+#playfield #field-7-3 { background-image: url(double-letter.png); left: 308; top: 132 }
+#playfield #field-7-4 { background-image: url(standard.png); left: 308; top: 176 }
+#playfield #field-7-5 { background-image: url(standard.png); left: 308; top: 220 }
+#playfield #field-7-6 { background-image: url(standard.png); left: 308; top: 264 }
+#playfield #field-7-7 { background-image: url(triple-word.png); left: 308; top: 308 }
+#playfield #field-7-8 { background-image: url(standard.png); left: 308; top: 352 }
+#playfield #field-7-9 { background-image: url(standard.png); left: 308; top: 396 }
+#playfield #field-7-10 { background-image: url(standard.png); left: 308; top: 440 }
+#playfield #field-7-11 { background-image: url(double-letter.png); left: 308; top: 484 }
+#playfield #field-7-12 { background-image: url(standard.png); left: 308; top: 528 }
+#playfield #field-7-13 { background-image: url(standard.png); left: 308; top: 572 }
+#playfield #field-7-14 { background-image: url(triple-word.png); left: 308; top: 616 }
+#playfield #field-8-0 { background-image: url(standard.png); left: 352; top: 0 }
+#playfield #field-8-1 { background-image: url(standard.png); left: 352; top: 44 }
+#playfield #field-8-2 { background-image: url(double-letter.png); left: 352; top: 88 }
+#playfield #field-8-3 { background-image: url(standard.png); left: 352; top: 132 }
+#playfield #field-8-4 { background-image: url(standard.png); left: 352; top: 176 }
+#playfield #field-8-5 { background-image: url(standard.png); left: 352; top: 220 }
+#playfield #field-8-6 { background-image: url(double-letter.png); left: 352; top: 264 }
+#playfield #field-8-7 { background-image: url(standard.png); left: 352; top: 308 }
+#playfield #field-8-8 { background-image: url(double-letter.png); left: 352; top: 352 }
+#playfield #field-8-9 { background-image: url(standard.png); left: 352; top: 396 }
+#playfield #field-8-10 { background-image: url(standard.png); left: 352; top: 440 }
+#playfield #field-8-11 { background-image: url(standard.png); left: 352; top: 484 }
+#playfield #field-8-12 { background-image: url(double-letter.png); left: 352; top: 528 }
+#playfield #field-8-13 { background-image: url(standard.png); left: 352; top: 572 }
+#playfield #field-8-14 { background-image: url(standard.png); left: 352; top: 616 }
+#playfield #field-9-0 { background-image: url(standard.png); left: 396; top: 0 }
+#playfield #field-9-1 { background-image: url(triple-letter.png); left: 396; top: 44 }
+#playfield #field-9-2 { background-image: url(standard.png); left: 396; top: 88 }
+#playfield #field-9-3 { background-image: url(standard.png); left: 396; top: 132 }
+#playfield #field-9-4 { background-image: url(standard.png); left: 396; top: 176 }
+#playfield #field-9-5 { background-image: url(triple-letter.png); left: 396; top: 220 }
+#playfield #field-9-6 { background-image: url(standard.png); left: 396; top: 264 }
+#playfield #field-9-7 { background-image: url(standard.png); left: 396; top: 308 }
+#playfield #field-9-8 { background-image: url(standard.png); left: 396; top: 352 }
+#playfield #field-9-9 { background-image: url(triple-letter.png); left: 396; top: 396 }
+#playfield #field-9-10 { background-image: url(standard.png); left: 396; top: 440 }
+#playfield #field-9-11 { background-image: url(standard.png); left: 396; top: 484 }
+#playfield #field-9-12 { background-image: url(standard.png); left: 396; top: 528 }
+#playfield #field-9-13 { background-image: url(triple-letter.png); left: 396; top: 572 }
+#playfield #field-9-14 { background-image: url(standard.png); left: 396; top: 616 }
+#playfield #field-10-0 { background-image: url(standard.png); left: 440; top: 0 }
+#playfield #field-10-1 { background-image: url(standard.png); left: 440; top: 44 }
+#playfield #field-10-2 { background-image: url(standard.png); left: 440; top: 88 }
+#playfield #field-10-3 { background-image: url(standard.png); left: 440; top: 132 }
+#playfield #field-10-4 { background-image: url(double-word.png); left: 440; top: 176 }
+#playfield #field-10-5 { background-image: url(standard.png); left: 440; top: 220 }
+#playfield #field-10-6 { background-image: url(standard.png); left: 440; top: 264 }
+#playfield #field-10-7 { background-image: url(standard.png); left: 440; top: 308 }
+#playfield #field-10-8 { background-image: url(standard.png); left: 440; top: 352 }
+#playfield #field-10-9 { background-image: url(standard.png); left: 440; top: 396 }
+#playfield #field-10-10 { background-image: url(double-word.png); left: 440; top: 440 }
+#playfield #field-10-11 { background-image: url(standard.png); left: 440; top: 484 }
+#playfield #field-10-12 { background-image: url(standard.png); left: 440; top: 528 }
+#playfield #field-10-13 { background-image: url(standard.png); left: 440; top: 572 }
+#playfield #field-10-14 { background-image: url(standard.png); left: 440; top: 616 }
+#playfield #field-11-0 { background-image: url(double-letter.png); left: 484; top: 0 }
+#playfield #field-11-1 { background-image: url(standard.png); left: 484; top: 44 }
+#playfield #field-11-2 { background-image: url(standard.png); left: 484; top: 88 }
+#playfield #field-11-3 { background-image: url(double-word.png); left: 484; top: 132 }
+#playfield #field-11-4 { background-image: url(standard.png); left: 484; top: 176 }
+#playfield #field-11-5 { background-image: url(standard.png); left: 484; top: 220 }
+#playfield #field-11-6 { background-image: url(standard.png); left: 484; top: 264 }
+#playfield #field-11-7 { background-image: url(double-letter.png); left: 484; top: 308 }
+#playfield #field-11-8 { background-image: url(standard.png); left: 484; top: 352 }
+#playfield #field-11-9 { background-image: url(standard.png); left: 484; top: 396 }
+#playfield #field-11-10 { background-image: url(standard.png); left: 484; top: 440 }
+#playfield #field-11-11 { background-image: url(double-word.png); left: 484; top: 484 }
+#playfield #field-11-12 { background-image: url(standard.png); left: 484; top: 528 }
+#playfield #field-11-13 { background-image: url(standard.png); left: 484; top: 572 }
+#playfield #field-11-14 { background-image: url(double-letter.png); left: 484; top: 616 }
+#playfield #field-12-0 { background-image: url(standard.png); left: 528; top: 0 }
+#playfield #field-12-1 { background-image: url(standard.png); left: 528; top: 44 }
+#playfield #field-12-2 { background-image: url(double-word.png); left: 528; top: 88 }
+#playfield #field-12-3 { background-image: url(standard.png); left: 528; top: 132 }
+#playfield #field-12-4 { background-image: url(standard.png); left: 528; top: 176 }
+#playfield #field-12-5 { background-image: url(standard.png); left: 528; top: 220 }
+#playfield #field-12-6 { background-image: url(double-letter.png); left: 528; top: 264 }
+#playfield #field-12-7 { background-image: url(standard.png); left: 528; top: 308 }
+#playfield #field-12-8 { background-image: url(double-letter.png); left: 528; top: 352 }
+#playfield #field-12-9 { background-image: url(standard.png); left: 528; top: 396 }
+#playfield #field-12-10 { background-image: url(standard.png); left: 528; top: 440 }
+#playfield #field-12-11 { background-image: url(standard.png); left: 528; top: 484 }
+#playfield #field-12-12 { background-image: url(double-word.png); left: 528; top: 528 }
+#playfield #field-12-13 { background-image: url(standard.png); left: 528; top: 572 }
+#playfield #field-12-14 { background-image: url(standard.png); left: 528; top: 616 }
+#playfield #field-13-0 { background-image: url(standard.png); left: 572; top: 0 }
+#playfield #field-13-1 { background-image: url(double-word.png); left: 572; top: 44 }
+#playfield #field-13-2 { background-image: url(standard.png); left: 572; top: 88 }
+#playfield #field-13-3 { background-image: url(standard.png); left: 572; top: 132 }
+#playfield #field-13-4 { background-image: url(standard.png); left: 572; top: 176 }
+#playfield #field-13-5 { background-image: url(triple-letter.png); left: 572; top: 220 }
+#playfield #field-13-6 { background-image: url(standard.png); left: 572; top: 264 }
+#playfield #field-13-7 { background-image: url(standard.png); left: 572; top: 308 }
+#playfield #field-13-8 { background-image: url(standard.png); left: 572; top: 352 }
+#playfield #field-13-9 { background-image: url(triple-letter.png); left: 572; top: 396 }
+#playfield #field-13-10 { background-image: url(standard.png); left: 572; top: 440 }
+#playfield #field-13-11 { background-image: url(standard.png); left: 572; top: 484 }
+#playfield #field-13-12 { background-image: url(standard.png); left: 572; top: 528 }
+#playfield #field-13-13 { background-image: url(double-word.png); left: 572; top: 572 }
+#playfield #field-13-14 { background-image: url(standard.png); left: 572; top: 616 }
+#playfield #field-14-0 { background-image: url(triple-word.png); left: 616; top: 0 }
+#playfield #field-14-1 { background-image: url(standard.png); left: 616; top: 44 }
+#playfield #field-14-2 { background-image: url(standard.png); left: 616; top: 88 }
+#playfield #field-14-3 { background-image: url(double-letter.png); left: 616; top: 132 }
+#playfield #field-14-4 { background-image: url(standard.png); left: 616; top: 176 }
+#playfield #field-14-5 { background-image: url(standard.png); left: 616; top: 220 }
+#playfield #field-14-6 { background-image: url(standard.png); left: 616; top: 264 }
+#playfield #field-14-7 { background-image: url(triple-word.png); left: 616; top: 308 }
+#playfield #field-14-8 { background-image: url(standard.png); left: 616; top: 352 }
+#playfield #field-14-9 { background-image: url(standard.png); left: 616; top: 396 }
+#playfield #field-14-10 { background-image: url(standard.png); left: 616; top: 440 }
+#playfield #field-14-11 { background-image: url(double-letter.png); left: 616; top: 484 }
+#playfield #field-14-12 { background-image: url(standard.png); left: 616; top: 528 }
+#playfield #field-14-13 { background-image: url(standard.png); left: 616; top: 572 }
+#playfield #field-14-14 { background-image: url(triple-word.png); left: 616; top: 616 }
Added: branches/trunk-reorg/bknr/projects/scrabble/website/de/standard.png
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/bknr/projects/scrabble/website/de/standard.png
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/bknr/projects/scrabble/website/de/test.html
===================================================================
--- branches/trunk-reorg/bknr/projects/scrabble/website/de/test.html 2007-10-04 21:08:36 UTC (rev 2210)
+++ branches/trunk-reorg/bknr/projects/scrabble/website/de/test.html 2007-10-04 21:34:36 UTC (rev 2211)
@@ -0,0 +1,268 @@
+<head>
+ <link rel="stylesheet" type="text/css" href="scrabble.css" />
+</head>
+<body bgcolor="#004B36">
+<img src="A.png"/>
+<img src="B.png"/>
+<img src="C.png"/>
+<img src="D.png"/>
+<img src="E.png"/>
+<img src="F.png"/>
+<img src="G.png"/>
+<img src="H.png"/>
+<img src="I.png"/>
+<img src="J.png"/>
+<img src="K.png"/>
+<img src="L.png"/>
+<img src="M.png"/>
+<img src="N.png"/>
+<img src="O.png"/>
+<img src="P.png"/>
+<img src="Q.png"/>
+<img src="R.png"/>
+<img src="S.png"/>
+<img src="T.png"/>
+<img src="U.png"/>
+<img src="V.png"/>
+<img src="W.png"/>
+<img src="X.png"/>
+<img src="Y.png"/>
+<img src="Z.png"/>
+<img src="�.png"/>
+<img src="�.png"/>
+<img src="�.png"/>
+<br>
+<img src="double-letter.png"/>
+<img src="double-word.png"/>
+<img src="triple-letter.png"/>
+<img src="triple-word.png"/>
+<img src="standard.png"/>
+<br/>
+<div id='playfield'>
+ <div id='field-0-0'/></div>
+ <div id='field-0-1'/></div>
+ <div id='field-0-2'/></div>
+ <div id='field-0-3'/></div>
+ <div id='field-0-4'/></div>
+ <div id='field-0-5'/></div>
+ <div id='field-0-6'/></div>
+ <div id='field-0-7'/></div>
+ <div id='field-0-8'/></div>
+ <div id='field-0-9'/></div>
+ <div id='field-0-10'/></div>
+ <div id='field-0-11'/></div>
+ <div id='field-0-12'/></div>
+ <div id='field-0-13'/></div>
+ <div id='field-0-14'/></div>
+ <div id='field-1-0'/></div>
+ <div id='field-1-1'/></div>
+ <div id='field-1-2'/></div>
+ <div id='field-1-3'/></div>
+ <div id='field-1-4'/></div>
+ <div id='field-1-5'/></div>
+ <div id='field-1-6'/></div>
+ <div id='field-1-7'/></div>
+ <div id='field-1-8'/></div>
+ <div id='field-1-9'/></div>
+ <div id='field-1-10'/></div>
+ <div id='field-1-11'/></div>
+ <div id='field-1-12'/></div>
+ <div id='field-1-13'/></div>
+ <div id='field-1-14'/></div>
+ <div id='field-2-0'/><img src="I.png"/></div>
+ <div id='field-2-1'/><img src="C.png"/></div>
+ <div id='field-2-2'/><img src="H.png"/></div>
+ <div id='field-2-3'/></div>
+ <div id='field-2-4'/></div>
+ <div id='field-2-5'/></div>
+ <div id='field-2-6'/></div>
+ <div id='field-2-7'/></div>
+ <div id='field-2-8'/></div>
+ <div id='field-2-9'/></div>
+ <div id='field-2-10'/></div>
+ <div id='field-2-11'/></div>
+ <div id='field-2-12'/></div>
+ <div id='field-2-13'/></div>
+ <div id='field-2-14'/></div>
+ <div id='field-3-0'/></div>
+ <div id='field-3-1'/></div>
+ <div id='field-3-2'/><img src="L.png"/></div>
+ <div id='field-3-3'/><img src="I.png"/></div>
+ <div id='field-3-4'/><img src="E.png"/></div>
+ <div id='field-3-5'/><img src="B.png"/></div>
+ <div id='field-3-6'/><img src="E.png"/></div>
+ <div id='field-3-7'/></div>
+ <div id='field-3-8'/></div>
+ <div id='field-3-9'/></div>
+ <div id='field-3-10'/></div>
+ <div id='field-3-11'/></div>
+ <div id='field-3-12'/></div>
+ <div id='field-3-13'/></div>
+ <div id='field-3-14'/></div>
+ <div id='field-4-0'/></div>
+ <div id='field-4-1'/></div>
+ <div id='field-4-2'/><img src="D.png"/></div>
+ <div id='field-4-3'/><img src="I.png"/></div>
+ <div id='field-4-4'/><img src="C.png"/></div>
+ <div id='field-4-5'/><img src="H.png"/></div>
+ <div id='field-4-6'/></div>
+ <div id='field-4-7'/></div>
+ <div id='field-4-8'/></div>
+ <div id='field-4-9'/></div>
+ <div id='field-4-10'/></div>
+ <div id='field-4-11'/></div>
+ <div id='field-4-12'/></div>
+ <div id='field-4-13'/></div>
+ <div id='field-4-14'/></div>
+ <div id='field-5-0'/></div>
+ <div id='field-5-1'/></div>
+ <div id='field-5-2'/></div>
+ <div id='field-5-3'/></div>
+ <div id='field-5-4'/></div>
+ <div id='field-5-5'/></div>
+ <div id='field-5-6'/></div>
+ <div id='field-5-7'/></div>
+ <div id='field-5-8'/></div>
+ <div id='field-5-9'/></div>
+ <div id='field-5-10'/></div>
+ <div id='field-5-11'/></div>
+ <div id='field-5-12'/></div>
+ <div id='field-5-13'/></div>
+ <div id='field-5-14'/></div>
+ <div id='field-6-0'/></div>
+ <div id='field-6-1'/></div>
+ <div id='field-6-2'/></div>
+ <div id='field-6-3'/></div>
+ <div id='field-6-4'/></div>
+ <div id='field-6-5'/></div>
+ <div id='field-6-6'/></div>
+ <div id='field-6-7'/></div>
+ <div id='field-6-8'/></div>
+ <div id='field-6-9'/></div>
+ <div id='field-6-10'/></div>
+ <div id='field-6-11'/></div>
+ <div id='field-6-12'/></div>
+ <div id='field-6-13'/></div>
+ <div id='field-6-14'/></div>
+ <div id='field-7-0'/></div>
+ <div id='field-7-1'/></div>
+ <div id='field-7-2'/></div>
+ <div id='field-7-3'/></div>
+ <div id='field-7-4'/></div>
+ <div id='field-7-5'/></div>
+ <div id='field-7-6'/></div>
+ <div id='field-7-7'/></div>
+ <div id='field-7-8'/></div>
+ <div id='field-7-9'/></div>
+ <div id='field-7-10'/></div>
+ <div id='field-7-11'/></div>
+ <div id='field-7-12'/></div>
+ <div id='field-7-13'/></div>
+ <div id='field-7-14'/></div>
+ <div id='field-8-0'/></div>
+ <div id='field-8-1'/></div>
+ <div id='field-8-2'/></div>
+ <div id='field-8-3'/></div>
+ <div id='field-8-4'/></div>
+ <div id='field-8-5'/></div>
+ <div id='field-8-6'/></div>
+ <div id='field-8-7'/></div>
+ <div id='field-8-8'/></div>
+ <div id='field-8-9'/></div>
+ <div id='field-8-10'/></div>
+ <div id='field-8-11'/></div>
+ <div id='field-8-12'/></div>
+ <div id='field-8-13'/></div>
+ <div id='field-8-14'/></div>
+ <div id='field-9-0'/></div>
+ <div id='field-9-1'/></div>
+ <div id='field-9-2'/></div>
+ <div id='field-9-3'/></div>
+ <div id='field-9-4'/></div>
+ <div id='field-9-5'/></div>
+ <div id='field-9-6'/></div>
+ <div id='field-9-7'/></div>
+ <div id='field-9-8'/></div>
+ <div id='field-9-9'/></div>
+ <div id='field-9-10'/></div>
+ <div id='field-9-11'/></div>
+ <div id='field-9-12'/></div>
+ <div id='field-9-13'/></div>
+ <div id='field-9-14'/></div>
+ <div id='field-10-0'/></div>
+ <div id='field-10-1'/></div>
+ <div id='field-10-2'/></div>
+ <div id='field-10-3'/></div>
+ <div id='field-10-4'/></div>
+ <div id='field-10-5'/></div>
+ <div id='field-10-6'/></div>
+ <div id='field-10-7'/></div>
+ <div id='field-10-8'/></div>
+ <div id='field-10-9'/></div>
+ <div id='field-10-10'/></div>
+ <div id='field-10-11'/></div>
+ <div id='field-10-12'/></div>
+ <div id='field-10-13'/></div>
+ <div id='field-10-14'/></div>
+ <div id='field-11-0'/></div>
+ <div id='field-11-1'/></div>
+ <div id='field-11-2'/></div>
+ <div id='field-11-3'/></div>
+ <div id='field-11-4'/></div>
+ <div id='field-11-5'/></div>
+ <div id='field-11-6'/></div>
+ <div id='field-11-7'/></div>
+ <div id='field-11-8'/></div>
+ <div id='field-11-9'/></div>
+ <div id='field-11-10'/></div>
+ <div id='field-11-11'/></div>
+ <div id='field-11-12'/></div>
+ <div id='field-11-13'/></div>
+ <div id='field-11-14'/></div>
+ <div id='field-12-0'/></div>
+ <div id='field-12-1'/></div>
+ <div id='field-12-2'/></div>
+ <div id='field-12-3'/></div>
+ <div id='field-12-4'/></div>
+ <div id='field-12-5'/></div>
+ <div id='field-12-6'/></div>
+ <div id='field-12-7'/></div>
+ <div id='field-12-8'/></div>
+ <div id='field-12-9'/></div>
+ <div id='field-12-10'/></div>
+ <div id='field-12-11'/></div>
+ <div id='field-12-12'/></div>
+ <div id='field-12-13'/></div>
+ <div id='field-12-14'/></div>
+ <div id='field-13-0'/></div>
+ <div id='field-13-1'/></div>
+ <div id='field-13-2'/></div>
+ <div id='field-13-3'/></div>
+ <div id='field-13-4'/></div>
+ <div id='field-13-5'/></div>
+ <div id='field-13-6'/></div>
+ <div id='field-13-7'/></div>
+ <div id='field-13-8'/></div>
+ <div id='field-13-9'/></div>
+ <div id='field-13-10'/></div>
+ <div id='field-13-11'/></div>
+ <div id='field-13-12'/></div>
+ <div id='field-13-13'/></div>
+ <div id='field-13-14'/></div>
+ <div id='field-14-0'/></div>
+ <div id='field-14-1'/></div>
+ <div id='field-14-2'/></div>
+ <div id='field-14-3'/></div>
+ <div id='field-14-4'/></div>
+ <div id='field-14-5'/></div>
+ <div id='field-14-6'/></div>
+ <div id='field-14-7'/></div>
+ <div id='field-14-8'/></div>
+ <div id='field-14-9'/></div>
+ <div id='field-14-10'/></div>
+ <div id='field-14-11'/></div>
+ <div id='field-14-12'/></div>
+ <div id='field-14-13'/></div>
+ <div id='field-14-14'/></div>
+</div>
+</body>
\ No newline at end of file
Added: branches/trunk-reorg/bknr/projects/scrabble/website/de/triple-letter.png
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/bknr/projects/scrabble/website/de/triple-letter.png
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/bknr/projects/scrabble/website/de/triple-word.png
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/bknr/projects/scrabble/website/de/triple-word.png
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
1
0
[bknr-cvs] r2210 - in branches/trunk-reorg: bknr/datastore/src bknr/datastore/src/data bknr/datastore/src/utils thirdparty xhtmlgen
by bknr＠bknr.net 04 Oct '07
by bknr＠bknr.net 04 Oct '07
04 Oct '07
Author: hhubner
Date: 2007-10-04 17:08:36 -0400 (Thu, 04 Oct 2007)
New Revision: 2210
Added:
branches/trunk-reorg/thirdparty/cl-interpol/
Modified:
branches/trunk-reorg/bknr/datastore/src/bknr-data-impex.asd
branches/trunk-reorg/bknr/datastore/src/bknr-datastore.asd
branches/trunk-reorg/bknr/datastore/src/bknr-utils.asd
branches/trunk-reorg/bknr/datastore/src/data/package.lisp
branches/trunk-reorg/bknr/datastore/src/data/txn.lisp
branches/trunk-reorg/bknr/datastore/src/utils/acl-mp-compat.lisp
branches/trunk-reorg/bknr/datastore/src/utils/package.lisp
branches/trunk-reorg/bknr/datastore/src/utils/utils.lisp
branches/trunk-reorg/xhtmlgen/xhtmlgen.asd
branches/trunk-reorg/xhtmlgen/xhtmlgen.lisp
Log:
SBCL-1.0.10 loads :bknr-datastore and performs some basic operations.
The rest of this is untested. I'll be moving this forward while working
on the scrabble application that I'm going to commit later on.
Modified: branches/trunk-reorg/bknr/datastore/src/bknr-data-impex.asd
===================================================================
--- branches/trunk-reorg/bknr/datastore/src/bknr-data-impex.asd 2007-10-04 20:57:29 UTC (rev 2209)
+++ branches/trunk-reorg/bknr/datastore/src/bknr-data-impex.asd 2007-10-04 21:08:36 UTC (rev 2210)
@@ -16,8 +16,6 @@
:description "baikonour - launchpad for lisp satellites"
:depends-on (:cl-interpol :unit-test :bknr-utils :bknr-indices
- :bknr-datastore :bknr-impex
- #+(not allegro)
- :acl-compat)
+ :bknr-datastore :bknr-impex)
:components ((:module "data" :components ((:file "xml-object")))))
Modified: branches/trunk-reorg/bknr/datastore/src/bknr-datastore.asd
===================================================================
--- branches/trunk-reorg/bknr/datastore/src/bknr-datastore.asd 2007-10-04 20:57:29 UTC (rev 2209)
+++ branches/trunk-reorg/bknr/datastore/src/bknr-datastore.asd 2007-10-04 21:08:36 UTC (rev 2210)
@@ -17,10 +17,10 @@
:description "baikonour - launchpad for lisp satellites"
:depends-on (:cl-interpol
+ :closer-mop
:unit-test
:bknr-utils
- :bknr-indices
- #+(not allegro) :acl-compat)
+ :bknr-indices)
:components ((:module "data" :components ((:file "package")
(:file "encoding" :depends-on ("package"))
Modified: branches/trunk-reorg/bknr/datastore/src/bknr-utils.asd
===================================================================
--- branches/trunk-reorg/bknr/datastore/src/bknr-utils.asd 2007-10-04 20:57:29 UTC (rev 2209)
+++ branches/trunk-reorg/bknr/datastore/src/bknr-utils.asd 2007-10-04 21:08:36 UTC (rev 2210)
@@ -18,8 +18,6 @@
:depends-on (:cl-interpol :cl-ppcre
:md5
- #+(not allegro)
- :acl-compat
:iconv)
:components ((:module "statistics" :components ((:file "package")
Modified: branches/trunk-reorg/bknr/datastore/src/data/package.lisp
===================================================================
--- branches/trunk-reorg/bknr/datastore/src/data/package.lisp 2007-10-04 20:57:29 UTC (rev 2209)
+++ branches/trunk-reorg/bknr/datastore/src/data/package.lisp 2007-10-04 21:08:36 UTC (rev 2210)
@@ -3,16 +3,7 @@
(defpackage :bknr.datastore
(:use :cl :bknr.utils :cl-interpol :cl-ppcre
:bknr.indices :bknr.statistics
- #+allegro
- :mp
- #+(not allegro)
- :acl-compat.mp
- #+allegro :aclmop
- #+cmu :pcl
- #+openmcl :openmcl-mop
- #+sbcl :sb-mop)
- #+(not allegro)
- (:shadowing-import-from :acl-compat.mp process-kill process-wait)
+ :closer-mop )
(:shadowing-import-from :cl-interpol quote-meta-chars)
(:export #:*store-debug*
#:*store*
Modified: branches/trunk-reorg/bknr/datastore/src/data/txn.lisp
===================================================================
--- branches/trunk-reorg/bknr/datastore/src/data/txn.lisp 2007-10-04 20:57:29 UTC (rev 2209)
+++ branches/trunk-reorg/bknr/datastore/src/data/txn.lisp 2007-10-04 21:08:36 UTC (rev 2210)
@@ -37,15 +37,18 @@
(transaction-run-time :accessor store-transaction-run-time
:initform 0
:documentation "The total run time of all application transaction code since last snapshot"))
- (:default-initargs :guard #'funcall :log-guard #'funcall :subsystems (list (make-instance 'store-object-subsystem))))
+ (:default-initargs
+ :guard #'funcall
+ :log-guard #'funcall
+ :subsystems (list (make-instance 'store-object-subsystem))))
(defclass mp-store (store)
()
- (:default-initargs :guard (let ((lock (make-process-lock)))
+ (:default-initargs :guard (let ((lock (mp-make-lock)))
(lambda (thunk)
(mp-with-recursive-lock-held (lock)
(funcall thunk))))
- :log-guard (let ((lock (make-process-lock)))
+ :log-guard (let ((lock (mp-make-lock)))
(lambda (thunk)
(mp-with-recursive-lock-held (lock)
(funcall thunk)))))
Modified: branches/trunk-reorg/bknr/datastore/src/utils/acl-mp-compat.lisp
===================================================================
--- branches/trunk-reorg/bknr/datastore/src/utils/acl-mp-compat.lisp 2007-10-04 20:57:29 UTC (rev 2209)
+++ branches/trunk-reorg/bknr/datastore/src/utils/acl-mp-compat.lisp 2007-10-04 21:08:36 UTC (rev 2210)
@@ -1,24 +1,24 @@
-(in-package :bknr.utils)
-
-(defun mp-make-lock (&optional (name "Anonymous"))
- #+allegro
- (mp:make-process-lock :name name)
- #+sbcl
- (sb-thread:make-mutex :name name)
- #+cmu
- (mp:make-lock name))
-
-(defmacro mp-with-lock-held ((lock) &rest body)
- #+allegro
- `(mp:with-process-lock (,lock)
- ,@body)
- #+sbcl
- `(sb-thread:with-mutex (,lock)
- ,@body)
- #+cmu
- `(mp:with-lock-held (,lock)
- ,@body))
+(in-package :bknr.utils)
+(defun mp-make-lock (&optional (name "Anonymous"))
+ #+allegro
+ (mp:make-process-lock :name name)
+ #+sbcl
+ (sb-thread:make-mutex :name name)
+ #+cmu
+ (mp:make-lock name))
+
+(defmacro mp-with-lock-held ((lock) &rest body)
+ #+allegro
+ `(mp:with-process-lock (,lock)
+ ,@body)
+ #+sbcl
+ `(sb-thread:with-mutex (,lock)
+ ,@body)
+ #+cmu
+ `(mp:with-lock-held (,lock)
+ ,@body))
+
(defmacro mp-with-recursive-lock-held ((lock) &rest body)
#+allegro
`(mp:with-process-lock (,lock)
Modified: branches/trunk-reorg/bknr/datastore/src/utils/package.lisp
===================================================================
--- branches/trunk-reorg/bknr/datastore/src/utils/package.lisp 2007-10-04 20:57:29 UTC (rev 2209)
+++ branches/trunk-reorg/bknr/datastore/src/utils/package.lisp 2007-10-04 21:08:36 UTC (rev 2210)
@@ -6,12 +6,8 @@
:cl-interpol
:md5
#+cmu :extensions
-; #+sbcl :sb-ext
- #+(not allegro) :acl-compat.mp
- #+allegro :mp)
+ #+sbcl :sb-ext)
(:shadowing-import-from :cl-interpol quote-meta-chars)
- #+(not allegro)
- (:shadowing-import-from :acl-compat.mp process-kill process-wait)
(:export #:define-bknr-class
;; byte size formatting
Modified: branches/trunk-reorg/bknr/datastore/src/utils/utils.lisp
===================================================================
--- branches/trunk-reorg/bknr/datastore/src/utils/utils.lisp 2007-10-04 20:57:29 UTC (rev 2209)
+++ branches/trunk-reorg/bknr/datastore/src/utils/utils.lisp 2007-10-04 21:08:36 UTC (rev 2210)
@@ -546,14 +546,3 @@
(t
(format nil "~A" byte-count))))
-;;; from norvig
-(defun find-all (item sequence &rest keyword-args
- &key (test #'eql) test-not &allow-other-keys)
- "Find all those elements of sequence that match item,
- according to the keywords. Doesn't alter sequence."
- (if test-not
- (apply #'remove item sequence
- :test-not (complement test-not) keyword-args)
- (apply #'remove item sequence
- :test (complement test) keyword-args)))
-
Modified: branches/trunk-reorg/xhtmlgen/xhtmlgen.asd
===================================================================
--- branches/trunk-reorg/xhtmlgen/xhtmlgen.asd 2007-10-04 20:57:29 UTC (rev 2209)
+++ branches/trunk-reorg/xhtmlgen/xhtmlgen.asd 2007-10-04 21:08:36 UTC (rev 2210)
@@ -1,6 +1,7 @@
(in-package :cl-user)
-(defsystem :xhtmlgen
- :serial t
- :components ((:file "package")
- (:file "xhtmlgen")))
\ No newline at end of file
+(asdf:defsystem :xhtmlgen
+ :depends-on (:cxml)
+ :serial t
+ :components ((:file "package")
+ (:file "xhtmlgen")))
\ No newline at end of file
Modified: branches/trunk-reorg/xhtmlgen/xhtmlgen.lisp
===================================================================
--- branches/trunk-reorg/xhtmlgen/xhtmlgen.lisp 2007-10-04 20:57:29 UTC (rev 2209)
+++ branches/trunk-reorg/xhtmlgen/xhtmlgen.lisp 2007-10-04 21:08:36 UTC (rev 2210)
@@ -49,12 +49,12 @@
#-rune-is-character
(defun make-sink-for-utf8-strings (stream)
- (cxml:make-recoder (cxml:make-character-stream-sink stream :canonical nil :indentation 3)
+ (cxml:make-recoder (cxml:make-character-stream-sink/utf8 stream :canonical nil :indentation 3)
#'cxml::utf8-string-to-rod))
#-rune-is-character
(defun make-sink-for-latin1-strings (stream)
- (cxml:make-recoder (cxml:make-character-stream-sink stream :canonical nil :indentation 3)
+ (cxml:make-recoder (cxml:make-character-stream-sink/utf8 stream :canonical nil :indentation 3)
#'cxml::string-rod))
#-rune-is-character
@@ -75,9 +75,9 @@
`(let ((*html-sink* (if (boundp '*html-sink*)
*html-sink*
#+rune-is-character
- (cxml:make-character-stream-sink net.html.generator:*html-stream* :canonical nil :indentation 3)
+ (cxml:make-character-stream-sink *standard-output* :canonical nil :indentation 3)
#-rune-is-character
- (make-sink-for-internal-strings net.html.generator:*html-stream*))))
+ (make-sink-for-internal-strings *standard-output*))))
,(process-html-forms forms env)))
(defmacro html-stream (stream &rest forms &environment env)
1
0
Author: hhubner
Date: 2007-10-04 16:57:29 -0400 (Thu, 04 Oct 2007)
New Revision: 2209
Added:
branches/trunk-reorg/bknr/datastore/xml/
Log:
copy needed directory
Copied: branches/trunk-reorg/bknr/datastore/xml (from rev 2208, branches/bos/bknr/src/xml)
1
0
Author: hhubner
Date: 2007-10-04 16:57:05 -0400 (Thu, 04 Oct 2007)
New Revision: 2208
Added:
branches/trunk-reorg/bknr/datastore/src/bknr-xml.asd
Log:
copy needed file
Copied: branches/trunk-reorg/bknr/datastore/src/bknr-xml.asd (from rev 2207, branches/bos/bknr/src/bknr-xml.asd)
1
0
Author: hhubner
Date: 2007-10-04 15:56:01 -0400 (Thu, 04 Oct 2007)
New Revision: 2207
Added:
branches/trunk-reorg/thirdparty/closer-mop/
branches/trunk-reorg/thirdparty/closer-mop/_darcs/
branches/trunk-reorg/thirdparty/closer-mop/_darcs/checkpoints/
branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/
branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/allegro/
branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/allegro/closer-mop-packages.lisp
branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/allegro/closer-mop.lisp
branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/clisp/
branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/clisp/closer-mop-packages.lisp
branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/clisp/closer-mop.lisp
branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/closer-mop-utility-packages.lisp
branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/closer-mop.asd
branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/ecl/
branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/ecl/closer-mop-packages.lisp
branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/ecl/closer-mop.lisp
branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/features.lisp
branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/features.txt
branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/lispworks/
branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/lispworks/closer-mop-packages.lisp
branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/lispworks/closer-mop.lisp
branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/mcl/
branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/mcl/closer-mop-packages.lisp
branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/mcl/closer-mop.lisp
branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/pcl/
branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/pcl/closer-mop-packages.lisp
branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/pcl/closer-mop.lisp
branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/release-notes.txt
branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/supported-cls.txt
branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/test/
branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/test/jeffs-code.lisp
branches/trunk-reorg/thirdparty/closer-mop/_darcs/inventories/
branches/trunk-reorg/thirdparty/closer-mop/_darcs/inventories/20070421193107-dccf3-e9d51ab58efdffe18510bddafbfa450f276c224f.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/inventory
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20050802151239-dccf3-e268d42f1d0bfb9c7ef64135393a2f63b243ed54.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20050816144718-dccf3-c8e542ff6d11161f8c50c8595710590711c6732b.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20050816231151-dccf3-e3829cce37824704fb39f3cafdc3c6a92f2d3cf3.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20050904001359-dccf3-914880d9d7054a58ddf886f661065a9352df6e08.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20050910092744-dccf3-87b02abfabbf534e03e82a45a96521a1d7c7a3b2.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20050910103331-dccf3-6311e556632ec0e01cc952b75171e77536716c0c.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20050910110130-dccf3-c6296b87c9e0e39bf7e938444dbd278fbba606c3.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20051029013651-dccf3-b4be9c6147a26c1e9767e9951f49aee2c898655b.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20051029115614-dccf3-65351c2ca451aceaa696ac89c9c8223199afae00.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20051029224040-dccf3-98657977f7a5a7dc1dce7fc2b536413116b1e9cb.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20051103084956-dccf3-bc5ad826d6d0c656f1e9f7af023c238ad5a5fade.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20051105150436-dccf3-42c062a8ce5e51a74d47911cbf0aed17761f25d3.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20051117200922-dccf3-2a2e5386869e5788124740a6796aa8d93fe88a07.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20051117201142-dccf3-2700459573f278c02078ef40150f7d92fcb4ed5a.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20051117201252-dccf3-5469d4a6ff03e37238daa28708a8727f2f88fdd9.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20051130202445-dccf3-d3d97662bf9052129efdf34c4af8cb75d437eb27.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20051205134118-dccf3-8045f8a6023f1067bf862213cd46cd07363ce091.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20051216174627-3cc5d-3c778eca546a1cdb364885cd436fc275f71cb71e.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20051220162014-dccf3-5541c25791f62d836e27802984f53014e2cfc72e.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20051228150237-dccf3-fc2c4ab8e8c0798d200109ffc20b79259c28258c.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060103112938-dccf3-2f91b0e195aba3b348283c9c21f36d356db9d32b.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060119133808-dccf3-905164dbf83a727c6875e534c8afc7712adde1e2.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060119133914-dccf3-df1b6582ea4210cf1a697b8c75238342e465d444.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060119202553-dccf3-9e87c4d4d342a8a7fe01167b143ed5e67a08fa8c.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060127142634-dccf3-0cbc9730e904db90c5598f37d28ed2a5d01e8060.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060127142903-dccf3-114489c1437896299eba5cb5e1abcdcee3588f4d.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060127142950-dccf3-a9161a505f3d6fc1376d2e9d065da70c59ec99e2.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060127214635-dccf3-a6d51c1d634b093f9403635cb3ec6230bba703b1.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060201000120-dccf3-b4333796ffe0fe6f5c99603b29cc995508b8dcae.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060201000253-dccf3-6886af50a43d5a624a196f587acf8ef183c6946d.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060201000433-dccf3-825ddee7bae9c308010ec376b13fe5d4038687d5.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060201000511-dccf3-b67c903a0922806dde28834fef9548e1a19450df.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060203120853-dccf3-d772fe3f3f39f4c7114b18ba7dd1ce5c4eaf1896.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060211193158-dccf3-4534d4b849a303f855c692e41232ca1db1c18614.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060216145216-3cc5d-508513582f98be0b13ac28491b590ae926133b98.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060224212121-dccf3-4e71a819e03eb87e7e41b8bbb88758857ff26099.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060224212657-dccf3-068ab07c914a910ead2cf314711aec15c95b3f47.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060301115916-dccf3-319e857c38bf42decd2c98fc3df4208011590dd2.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060301200956-dccf3-d0315e6cf06746cfa4d2f9aae97af7ff6b95f979.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060302093912-dccf3-77419535e33067767884542db7d015cfccb3ac61.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060325171005-dccf3-c26bf0552b60f9e02107614b0fd23b84650b82c6.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060327120633-dccf3-c7f73a665f3f8fcd0d666ae7a08eaa1d586e6be5.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060427163929-dccf3-7c2b0e9aa58e3f5a27375162e099f2c8451137ca.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060501082945-dccf3-f330509c7bf886ad34c63a9fa7386a0a458b34ac.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060529180600-dccf3-62cfd9621e1802d45cd4459d96f367f7a10b5ca1.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060531202150-dccf3-686d5ba89231851614891f21e29033003105888d.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060531203220-dccf3-32e3cf5199ceaf2d34b7b9ed3732e923b6a6de53.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060629175352-dccf3-2a287976284aa6a523d7918f4747cf593174ebe7.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060711121904-dccf3-e427b977f9fa61ac7615b3f9266b3c09f6ab394c.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060720085220-dccf3-8733e01e9790f1929009378878359e13931ff231.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060720105100-dccf3-7d147f9c086e13bd2b83e670953ac124ec7dcb27.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060720105302-dccf3-70b8a60a40352e9ffa430467b36b41d9e785561b.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060721125623-dccf3-c9a6e3c8ab13d7545401922436152ef6039f35b8.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060729125750-dccf3-677f12862b02fb3e369b3855c7a82fc9c9f07e28.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060729134152-dccf3-ee40ebb2ef710ff23053b2765dfd8f5e5adeeb5b.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060729134711-dccf3-dbcf08303fe3f2e8ad195382c90e88cb5fa0fda7.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060729134940-dccf3-c4c1848e22a3d8293090441fd1a1b39670067107.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060729135119-dccf3-62cbac84437b668d5c7b4222d3ffcd9b743a2067.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060729135149-dccf3-615006dc944f3c9c6e15b57467e597f67a40ad77.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060729135435-dccf3-a6554658258dcdada3b08ad08e6dd17657c7c974.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060802122101-dccf3-c0ae6510f6436c0fb88bb5ff92a25c9ae529ad17.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060821203834-dccf3-d6305a3e3412ff99beace007948dafc3100e1d6e.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060826084425-dccf3-1cb35238f9645cd1d5d4e477a9234fc583e0dc6f.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060826103957-dccf3-4bfdc272ae29918f08b54d0bdc14fed29b443814.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060826124935-dccf3-2a4546691b80a18783c5421d46ac3d72a2c252fb.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060826130127-dccf3-eec66c0522b0ab74d72bfdd61250f0ffaae584c6.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060927161258-dccf3-649ad24438070167a2f0100bb9b8f62601147f6d.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061001221204-dccf3-56ed441636d15f7f23de7b76b6be8222fb9b67f8.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061010173021-dccf3-159ee4ddbabc437a75ebf561e3301e92327dadf2.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061010174147-dccf3-d08093855647506dfbfe1c8263a3555f7a08541a.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061013081525-dccf3-fe4c6c81952c166149c00b1fe0df0834743ea370.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061014113836-dccf3-f117c253f5ab3d478f32c411f076a5b9d90f28be.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061028113627-dccf3-5f62832804d6c3dc544bd00341a7551fce46af78.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061031090315-dccf3-42d2030266347debf49e4bf88a13abdcffb4eac1.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061116132730-dccf3-e92c87581e04f60c7a029bbe6d7cdd6958319ff7.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061130202814-dccf3-3120d1936aca4182a1f8fd2e9076e84e1404d7d5.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061130203424-dccf3-74301ed5df59c70046119acac59c5ceef0c00ecf.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061218222443-dccf3-edde41dbcc6152e160bfc02201985e577adc11b0.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061218222546-dccf3-81a4963703b080a4230de18285fcc7f4f8f076a8.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061227142245-dccf3-9eee2aa05227bdf4f4eeaf45e58c845a4707ffff.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061228002510-dccf3-163cba8d0d6e4c7548bcac17463887b52d482b11.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061228002726-dccf3-2abe813153b4868c6219d045cba84119bbe37b62.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061228002856-dccf3-af055d64a95a072906b14cf1713d04f171fae53d.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061228003007-dccf3-19d3d52b67d6752806ade229cc573df39fefd736.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061228151904-dccf3-ef3232d3763a7a5fcfd18bd92b289590e8dfbb77.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061228151916-dccf3-82758310329d2019305d44c787c6ff559720c202.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061228161029-dccf3-89435e9661c27dc9251269f3e035574cce8ccc6b.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061228161128-dccf3-0adc1e659006165544e9d15583841f321aca1b4e.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070127192325-dccf3-d77060b4d6264e601b0a0456c59bc0f9b6b39d42.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070127192925-dccf3-0f0f5a0c26d9089334b2f54ae13cea2ddc4cd881.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070127195002-dccf3-314892775fb8ae67ee688777168326daba80b565.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070127201814-dccf3-128f7776110f2b6673a72a9e5c97d3a090cd028f.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070206104737-dccf3-e8605c338153ef4cfca23e2691bdbd8220ed9c17.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070228193530-dccf3-b0fe50e904a9f06b680ab19c79d5e375c45bb4e1.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070327202949-dccf3-77b1abaa2cd6661419f04d3c1422ee0e4970e2d5.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070421192516-dccf3-13d712262e80609ffa3e44656a11ddf1eb8c5ba2.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070421193020-dccf3-46cccd00d206b252681348edde6d08b9f8c12744.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070421193107-dccf3-e9d51ab58efdffe18510bddafbfa450f276c224f.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070501115057-dccf3-fd3901cf565e463eddafaf82e6f526d9403f5f29.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070528145132-dccf3-e1d978c1cd424af7cfabb1d036d07a10a7a4ed62.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070628201619-dccf3-6697990e3daa875937fba6209b49f9700ce5f98f.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070831233438-dccf3-551d9afcedf44d0735b330c50be407619f4cb8e0.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070916181018-dccf3-e11c738d92d8e1b2dbc979a10f258a647e164022.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070926164316-dccf3-0399c8966f70466f0bb3f1abd28f14b7698f542f.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070926172622-dccf3-0c2318248afb60197e6986c33794e0f97e43cfa2.gz
branches/trunk-reorg/thirdparty/closer-mop/_darcs/prefs/
branches/trunk-reorg/thirdparty/closer-mop/_darcs/prefs/binaries
branches/trunk-reorg/thirdparty/closer-mop/_darcs/prefs/boring
branches/trunk-reorg/thirdparty/closer-mop/_darcs/prefs/defaultrepo
branches/trunk-reorg/thirdparty/closer-mop/_darcs/prefs/motd
branches/trunk-reorg/thirdparty/closer-mop/_darcs/prefs/repos
branches/trunk-reorg/thirdparty/closer-mop/allegro/
branches/trunk-reorg/thirdparty/closer-mop/allegro/closer-mop-packages.lisp
branches/trunk-reorg/thirdparty/closer-mop/allegro/closer-mop.lisp
branches/trunk-reorg/thirdparty/closer-mop/clisp/
branches/trunk-reorg/thirdparty/closer-mop/clisp/closer-mop-packages.lisp
branches/trunk-reorg/thirdparty/closer-mop/clisp/closer-mop.lisp
branches/trunk-reorg/thirdparty/closer-mop/closer-mop-utility-packages.lisp
branches/trunk-reorg/thirdparty/closer-mop/closer-mop.asd
branches/trunk-reorg/thirdparty/closer-mop/ecl/
branches/trunk-reorg/thirdparty/closer-mop/ecl/closer-mop-packages.lisp
branches/trunk-reorg/thirdparty/closer-mop/ecl/closer-mop.lisp
branches/trunk-reorg/thirdparty/closer-mop/features.lisp
branches/trunk-reorg/thirdparty/closer-mop/features.txt
branches/trunk-reorg/thirdparty/closer-mop/lispworks/
branches/trunk-reorg/thirdparty/closer-mop/lispworks/closer-mop-packages.lisp
branches/trunk-reorg/thirdparty/closer-mop/lispworks/closer-mop.lisp
branches/trunk-reorg/thirdparty/closer-mop/mcl/
branches/trunk-reorg/thirdparty/closer-mop/mcl/closer-mop-packages.lisp
branches/trunk-reorg/thirdparty/closer-mop/mcl/closer-mop.lisp
branches/trunk-reorg/thirdparty/closer-mop/pcl/
branches/trunk-reorg/thirdparty/closer-mop/pcl/closer-mop-packages.lisp
branches/trunk-reorg/thirdparty/closer-mop/pcl/closer-mop.lisp
branches/trunk-reorg/thirdparty/closer-mop/release-notes.txt
branches/trunk-reorg/thirdparty/closer-mop/supported-cls.txt
branches/trunk-reorg/thirdparty/closer-mop/test/
branches/trunk-reorg/thirdparty/closer-mop/test/jeffs-code.lisp
branches/trunk-reorg/thirdparty/lw-compat/
branches/trunk-reorg/thirdparty/lw-compat/_darcs/
branches/trunk-reorg/thirdparty/lw-compat/_darcs/checkpoints/
branches/trunk-reorg/thirdparty/lw-compat/_darcs/current/
branches/trunk-reorg/thirdparty/lw-compat/_darcs/current/lw-compat-package.lisp
branches/trunk-reorg/thirdparty/lw-compat/_darcs/current/lw-compat.asd
branches/trunk-reorg/thirdparty/lw-compat/_darcs/current/lw-compat.lisp
branches/trunk-reorg/thirdparty/lw-compat/_darcs/inventories/
branches/trunk-reorg/thirdparty/lw-compat/_darcs/inventories/20060826123920-dccf3-4b37fa484f969eb9c3837a020e32b42e33f4cef6.gz
branches/trunk-reorg/thirdparty/lw-compat/_darcs/inventory
branches/trunk-reorg/thirdparty/lw-compat/_darcs/patches/
branches/trunk-reorg/thirdparty/lw-compat/_darcs/patches/20050802152818-dccf3-9ba8553d2b62c698e6208680ab099ea6273a7458.gz
branches/trunk-reorg/thirdparty/lw-compat/_darcs/patches/20050811150118-dccf3-9db8fc99fbfbac77dda86fa3ca80f0f92c0f054b.gz
branches/trunk-reorg/thirdparty/lw-compat/_darcs/patches/20051228220551-dccf3-bec704780b86cf94b4f443e53d52d8e46f8ab139.gz
branches/trunk-reorg/thirdparty/lw-compat/_darcs/patches/20060821203626-dccf3-a75c8e2b513b571a43ce6c5e8dd377b2bca40887.gz
branches/trunk-reorg/thirdparty/lw-compat/_darcs/patches/20060826123920-dccf3-4b37fa484f969eb9c3837a020e32b42e33f4cef6.gz
branches/trunk-reorg/thirdparty/lw-compat/_darcs/patches/20060826125726-dccf3-b9ca9d92f93eefe4744f2275eaf40b6702e5b743.gz
branches/trunk-reorg/thirdparty/lw-compat/_darcs/patches/20060918174843-dccf3-641503d97f1447c7cf67b79d9d0e557fe35e4dfa.gz
branches/trunk-reorg/thirdparty/lw-compat/_darcs/prefs/
branches/trunk-reorg/thirdparty/lw-compat/_darcs/prefs/binaries
branches/trunk-reorg/thirdparty/lw-compat/_darcs/prefs/boring
branches/trunk-reorg/thirdparty/lw-compat/_darcs/prefs/defaultrepo
branches/trunk-reorg/thirdparty/lw-compat/_darcs/prefs/motd
branches/trunk-reorg/thirdparty/lw-compat/_darcs/prefs/repos
branches/trunk-reorg/thirdparty/lw-compat/lw-compat-package.lisp
branches/trunk-reorg/thirdparty/lw-compat/lw-compat.asd
branches/trunk-reorg/thirdparty/lw-compat/lw-compat.lisp
Log:
adding new libs
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/allegro/closer-mop-packages.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/allegro/closer-mop-packages.lisp 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/allegro/closer-mop-packages.lisp 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,190 @@
+(in-package :cl-user)
+
+(defpackage #:closer-mop
+ (:use #:common-lisp #:lispworks)
+ (:nicknames #:c2mop)
+
+ (:shadow
+ #:defclass #:defgeneric #:ensure-generic-function
+ #:standard-class #:standard-generic-function)
+ (:export
+ #:defclass #:defgeneric #:ensure-generic-function
+ #:standard-class #:standard-generic-function)
+
+ (:import-from #:mop
+
+ #:direct-slot-definition
+ #:effective-slot-definition
+ #:eql-specializer
+ #:forward-referenced-class
+ #:funcallable-standard-class
+ #:funcallable-standard-object
+ #:metaobject
+ #:slot-definition
+ #:specializer
+ #:standard-accessor-method
+ #:standard-direct-slot-definition
+ #:standard-effective-slot-definition
+ #:standard-reader-method
+ #:standard-slot-definition
+ #:standard-writer-method
+
+ #:accessor-method-slot-definition
+ #:add-dependent
+ #:add-direct-method
+ #:add-direct-subclass
+ #:class-default-initargs
+ #:class-direct-default-initargs
+ #:class-direct-slots
+ #:class-direct-subclasses
+ #:class-direct-superclasses
+ #:class-finalized-p
+ #:class-precedence-list
+ #:class-prototype
+ #:class-slots
+ #:compute-applicable-methods-using-classes
+ #:compute-class-precedence-list
+ #:compute-default-initargs
+ #:compute-discriminating-function
+ #:compute-effective-method
+ #:compute-effective-slot-definition
+ #:compute-slots
+ #:direct-slot-definition-class
+ #:effective-slot-definition-class
+ #:ensure-class
+ #:ensure-class-using-class
+ #:ensure-generic-function-using-class
+ #:eql-specializer-object
+ #:extract-lambda-list
+ #:extract-specializer-names
+ #:finalize-inheritance
+ #:find-method-combination
+ #:funcallable-standard-instance-access
+ #:generic-function-argument-precedence-order
+ #:generic-function-declarations
+ #:generic-function-lambda-list
+ #:generic-function-method-class
+ #:generic-function-method-combination
+ #:generic-function-methods
+ #:generic-function-name
+ #:intern-eql-specializer
+ #-allegro #:make-method-lambda
+ #:map-dependents
+ #:method-function
+ #:method-generic-function
+ #:method-lambda-list
+ #:method-specializers
+ #:reader-method-class
+ #:remove-dependent
+ #:remove-direct-method
+ #:remove-direct-subclass
+ #:set-funcallable-instance-function
+ #:slot-boundp-using-class
+ #:slot-definition-allocation
+ #:slot-definition-initargs
+ #:slot-definition-initform
+ #:slot-definition-initfunction
+ #:slot-definition-location
+ #:slot-definition-name
+ #:slot-definition-readers
+ #:slot-definition-writers
+ #:slot-definition-type
+ #:slot-makunbound-using-class
+ #:slot-value-using-class
+ #:specializer-direct-generic-functions
+ #:specializer-direct-methods
+ #:standard-instance-access
+ #:update-dependent
+ #:validate-superclass
+ #:writer-method-class)
+
+ (:export
+ #:direct-slot-definition
+ #:effective-slot-definition
+ #:eql-specializer
+ #:forward-referenced-class
+ #:funcallable-standard-class
+ #:funcallable-standard-object
+ #:metaobject
+ #:slot-definition
+ #:specializer
+ #:standard-accessor-method
+ #:standard-direct-slot-definition
+ #:standard-effective-slot-definition
+ #:standard-reader-method
+ #:standard-slot-definition
+ #:standard-writer-method
+
+ #:ensure-finalized
+ #:ensure-method
+ #:fix-slot-initargs
+ #:required-args
+
+ #:accessor-method-slot-definition
+ #:add-dependent
+ #:add-direct-method
+ #:add-direct-subclass
+ #:class-default-initargs
+ #:class-direct-default-initargs
+ #:class-direct-slots
+ #:class-direct-subclasses
+ #:class-direct-superclasses
+ #:class-finalized-p
+ #:class-precedence-list
+ #:class-prototype
+ #:class-slots
+ #:compute-applicable-methods-using-classes
+ #:compute-class-precedence-list
+ #:compute-default-initargs
+ #:compute-discriminating-function
+ #:compute-effective-method
+ #:compute-effective-slot-definition
+ #:compute-slots
+ #:direct-slot-definition-class
+ #:effective-slot-definition-class
+ #:ensure-class
+ #:ensure-class-using-class
+ #:ensure-generic-function-using-class
+ #:eql-specializer-object
+ #:extract-lambda-list
+ #:extract-specializer-names
+ #:finalize-inheritance
+ #:find-method-combination
+ #:funcallable-standard-instance-access
+ #:generic-function-argument-precedence-order
+ #:generic-function-declarations
+ #:generic-function-lambda-list
+ #:generic-function-method-class
+ #:generic-function-method-combination
+ #:generic-function-methods
+ #:generic-function-name
+ #:intern-eql-specializer
+ #-allegro #:make-method-lambda
+ #:map-dependents
+ #:method-function
+ #:method-generic-function
+ #:method-lambda-list
+ #:method-specializers
+ #:reader-method-class
+ #:remove-dependent
+ #:remove-direct-method
+ #:remove-direct-subclass
+ #:set-funcallable-instance-function
+ #:slot-boundp-using-class
+ #:slot-definition-allocation
+ #:slot-definition-initargs
+ #:slot-definition-initform
+ #:slot-definition-initfunction
+ #:slot-definition-location
+ #:slot-definition-name
+ #:slot-definition-readers
+ #:slot-definition-writers
+ #:slot-definition-type
+ #:slot-makunbound-using-class
+ #:slot-value-using-class
+ #:specializer-direct-generic-functions
+ #:specializer-direct-methods
+ #:standard-instance-access
+ #:update-dependent
+ #:validate-superclass
+ #:writer-method-class))
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/allegro/closer-mop.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/allegro/closer-mop.lisp 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/allegro/closer-mop.lisp 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,197 @@
+(in-package :closer-mop)
+
+;; Some utility functions.
+
+(defun required-args (lambda-list &optional (collector #'identity))
+ (loop for arg in lambda-list
+ until (member arg lambda-list-keywords)
+ collect (funcall collector arg)))
+
+(defun ensure-finalized (class &optional (errorp t))
+ (if (typep class 'class)
+ (unless (class-finalized-p class)
+ (finalize-inheritance class))
+ (when errorp (error "~S is not a class." class)))
+ class)
+
+;; We need a new standard-class for various things.
+
+(cl:defclass standard-class (cl:standard-class)
+ ((valid-slot-allocations :initform '(:instance :class)
+ :accessor valid-slot-allocations
+ :reader excl::valid-slot-allocation-list)))
+
+;; validate-superclass for metaclass classes is a little bit
+;; more tricky than for class metaobject classes because
+;; we don't want to make all standard-classes compatible to
+;; each other.
+
+;; Our validate-superclass may get passed a class-prototype
+;; as its second argument, so don't expect its readers to
+;; yield useful information. (In ANSI parlance, "the
+;; consequences are undefined...")
+
+(cl:defmethod validate-superclass
+ ((class standard-class)
+ (superclass cl:standard-class))
+ (or (when (eq (class-of class) (find-class 'standard-class))
+ (or (eq (class-of superclass) (find-class 'cl:standard-class))
+ (eq (class-of superclass) (find-class 'standard-class))))
+ (call-next-method)
+ (when (eq (class-of superclass) (find-class 'cl:standard-class))
+ (validate-superclass class (class-prototype (find-class 'standard-class))))))
+
+;; The following macro ensures that the new standard-class is used by default.
+
+(defmacro defclass (name (&rest supers) &body options)
+ (if (member :metaclass options :key #'car)
+ `(cl:defclass ,name ,supers ,@options)
+ `(cl:defclass ,name ,supers ,@options
+ (:metaclass standard-class))))
+
+;; Allegro defines an extra check for :allocation kinds. AMOP expects any kind to be
+;; permissible, though. This is corrected here.
+
+(defmethod direct-slot-definition-class :before ((class standard-class) &key allocation &allow-other-keys)
+ (unless (eq (class-of class) (find-class 'standard-class))
+ (pushnew allocation (valid-slot-allocations class))))
+
+;;; In Allegro, slot-boundp-using-class and slot-makunbound-using-class are specialized
+;;; on slot names instead of effective slot definitions. In order to fix this,
+;;; we need to rewire the slot access protocol.
+
+#-(version>= 8 1)
+(progn
+ (cl:defmethod slot-boundp-using-class
+ ((class standard-class) object (slot symbol))
+ (declare (optimize (speed 3) (debug 0) (safety 0)
+ (compilation-speed 0)))
+ (let ((slotd (find slot (class-slots class)
+ :test #'eq
+ :key #'slot-definition-name)))
+ (if slotd
+ (slot-boundp-using-class class object slotd)
+ (slot-missing class object slot 'slot-boundp))))
+
+ (cl:defmethod slot-boundp-using-class
+ ((class standard-class) object (slotd standard-effective-slot-definition))
+ (declare (optimize (speed 3) (debug 0) (safety 0)
+ (compilation-speed 0)))
+ (slot-boundp-using-class
+ (load-time-value (class-prototype (find-class 'cl:standard-class)))
+ object
+ (slot-definition-name slotd))))
+
+(cl:defmethod slot-makunbound-using-class
+ ((class standard-class) object (slot symbol))
+ (declare (optimize (speed 3) (debug 0) (safety 0)
+ (compilation-speed 0)))
+ (let ((slotd (find slot (class-slots class)
+ :test #'eq
+ :key #'slot-definition-name)))
+ (if slotd
+ (slot-makunbound-using-class class object slotd)
+ (slot-missing class object slot 'slot-makunbound))))
+
+(cl:defmethod slot-makunbound-using-class
+ ((class standard-class) object (slotd standard-effective-slot-definition))
+ (declare (optimize (speed 3) (debug 0) (safety 0)
+ (compilation-speed 0)))
+ (slot-makunbound-using-class
+ (load-time-value (class-prototype (find-class 'cl:standard-class)))
+ object
+ (slot-definition-name slotd)))
+
+;; We need a new standard-generic-function for various things.
+
+(cl:defclass standard-generic-function (cl:standard-generic-function)
+ ()
+ (:metaclass clos:funcallable-standard-class))
+
+;; The following ensures that the new standard-generic-function is used.
+
+(defun ensure-generic-function
+ (name &rest args
+ &key (generic-function-class 'standard-generic-function)
+ &allow-other-keys)
+ (declare (dynamic-extent args))
+ (when (fboundp name)
+ (let ((function (fdefinition name)))
+ (unless (typep function 'generic-function)
+ (cerror "Discard existing definition and create generic function."
+ "~S is already fbound, but not as a generic function." name)
+ (fmakunbound name))))
+ (if (fboundp name)
+ (let ((function (fdefinition name)))
+ (apply #'ensure-generic-function-using-class
+ function name args))
+ (apply #'ensure-generic-function-using-class nil name
+ :generic-function-class generic-function-class
+ args)))
+
+;; The following macro ensures that the new standard-generic-function
+;; is used by default.
+
+(defmacro defgeneric (name (&rest args) &body options)
+ (if (member :generic-function-class options :key #'car)
+ `(cl:defgeneric ,name ,args ,@options)
+ `(cl:defgeneric ,name ,args ,@options
+ (:generic-function-class standard-generic-function))))
+
+;;; The following three methods ensure that the dependent protocol
+;;; for generic function works.
+
+;; The following method additionally ensures that
+;; compute-discriminating-function is triggered.
+
+(cl:defmethod reinitialize-instance :after
+ ((gf standard-generic-function) &rest initargs)
+ (declare (dynamic-extent initargs))
+ (set-funcallable-instance-function
+ gf (compute-discriminating-function gf))
+ (map-dependents
+ gf (lambda (dep) (apply #'update-dependent gf dep initargs))))
+
+(cl:defmethod add-method :after
+ ((gf standard-generic-function) method)
+ (map-dependents
+ gf (lambda (dep) (update-dependent gf dep 'add-method method))))
+
+(cl:defmethod remove-method :after
+ ((gf standard-generic-function) method)
+ (map-dependents
+ gf (lambda (dep) (update-dependent gf dep 'remove-method method))))
+
+(defun ensure-method (gf lambda-expression
+ &key (qualifiers ())
+ (lambda-list (cadr lambda-expression))
+ (specializers (required-args lambda-list (constantly (find-class 't)))))
+ (funcall (compile nil `(lambda ()
+ (defmethod ,(generic-function-name gf) ,@qualifiers
+ ,(loop for specializer in specializers
+ for (arg . rest) on lambda-list
+ collect `(,arg ,specializer) into args
+ finally (return (nconc args rest)))
+ ,@(cddr lambda-expression))))))
+
+;; The following can be used in direct-slot-definition-class to get the correct initargs
+;; for a slot. Use it like this:
+;;
+;; (defmethod direct-slot-definition-class
+;; ((class my-standard-class) &rest initargs)
+;; (declare (dynamic-extent initargs))
+;; (destructuring-bind
+;; (&key key-of-interest &allow-other-keys)
+;; (fix-slot-initargs initargs)
+;; ...))
+
+(defvar *standard-slot-keys*
+ '(:name :documentation
+ :initargs :initform :initfunction
+ :readers :writers))
+
+(defun fix-slot-initargs (initargs)
+ initargs)
+
+(eval-when (:compile-toplevel :load-toplevel :execute)
+ (pushnew :closer-mop *features*))
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/clisp/closer-mop-packages.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/clisp/closer-mop-packages.lisp 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/clisp/closer-mop-packages.lisp 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,183 @@
+(in-package :cl-user)
+
+(defpackage #:closer-mop
+ (:use #:common-lisp #:lispworks)
+ (:nicknames #:c2mop)
+
+ (:import-from #:clos
+
+ #:direct-slot-definition
+ #:effective-slot-definition
+ #:eql-specializer
+ #:forward-referenced-class
+ #:funcallable-standard-class
+ #:funcallable-standard-object
+ #:metaobject
+ #:slot-definition
+ #:specializer
+ #:standard-accessor-method
+ #:standard-direct-slot-definition
+ #:standard-effective-slot-definition
+ #:standard-reader-method
+ #:standard-slot-definition
+ #:standard-writer-method
+
+ #:accessor-method-slot-definition
+ #:add-dependent
+ #:add-direct-method
+ #:add-direct-subclass
+ #:class-default-initargs
+ #:class-direct-default-initargs
+ #:class-direct-slots
+ #:class-direct-subclasses
+ #:class-direct-superclasses
+ #:class-finalized-p
+ #:class-precedence-list
+ #:class-prototype
+ #:class-slots
+ #:compute-applicable-methods-using-classes
+ #:compute-class-precedence-list
+ #:compute-default-initargs
+ #:compute-discriminating-function
+ #:compute-effective-method
+ #:compute-effective-slot-definition
+ #:compute-slots
+ #:direct-slot-definition-class
+ #:effective-slot-definition-class
+ #:ensure-class
+ #:ensure-class-using-class
+ #:ensure-generic-function-using-class
+ #:eql-specializer-object
+ #:extract-lambda-list
+ #:extract-specializer-names
+ #:finalize-inheritance
+ #:find-method-combination
+ #:funcallable-standard-instance-access
+ #:generic-function-argument-precedence-order
+ #:generic-function-declarations
+ #:generic-function-lambda-list
+ #:generic-function-method-class
+ #:generic-function-method-combination
+ #:generic-function-methods
+ #:generic-function-name
+ #:intern-eql-specializer
+ #-clisp #:make-method-lambda
+ #:map-dependents
+ #:method-function
+ #:method-generic-function
+ #:method-lambda-list
+ #:method-specializers
+ #:reader-method-class
+ #:remove-dependent
+ #:remove-direct-method
+ #:remove-direct-subclass
+ #:set-funcallable-instance-function
+ #:slot-boundp-using-class
+ #:slot-definition-allocation
+ #:slot-definition-initargs
+ #:slot-definition-initform
+ #:slot-definition-initfunction
+ #:slot-definition-location
+ #:slot-definition-name
+ #:slot-definition-readers
+ #:slot-definition-writers
+ #:slot-definition-type
+ #:slot-makunbound-using-class
+ #:slot-value-using-class
+ #:specializer-direct-generic-functions
+ #:specializer-direct-methods
+ #:standard-instance-access
+ #:update-dependent
+ #:validate-superclass
+ #:writer-method-class)
+
+ (:export
+ #:direct-slot-definition
+ #:effective-slot-definition
+ #:eql-specializer
+ #:forward-referenced-class
+ #:funcallable-standard-class
+ #:funcallable-standard-object
+ #:metaobject
+ #:slot-definition
+ #:specializer
+ #:standard-accessor-method
+ #:standard-direct-slot-definition
+ #:standard-effective-slot-definition
+ #:standard-reader-method
+ #:standard-slot-definition
+ #:standard-writer-method
+
+ #:ensure-finalized
+ #:ensure-method
+ #:fix-slot-initargs
+ #:required-args
+
+ #:accessor-method-slot-definition
+ #:add-dependent
+ #:add-direct-method
+ #:add-direct-subclass
+ #:class-default-initargs
+ #:class-direct-default-initargs
+ #:class-direct-slots
+ #:class-direct-subclasses
+ #:class-direct-superclasses
+ #:class-finalized-p
+ #:class-precedence-list
+ #:class-prototype
+ #:class-slots
+ #:compute-applicable-methods-using-classes
+ #:compute-class-precedence-list
+ #:compute-default-initargs
+ #:compute-discriminating-function
+ #:compute-effective-method
+ #:compute-effective-slot-definition
+ #:compute-slots
+ #:direct-slot-definition-class
+ #:effective-slot-definition-class
+ #:ensure-class
+ #:ensure-class-using-class
+ #:ensure-generic-function-using-class
+ #:eql-specializer-object
+ #:extract-lambda-list
+ #:extract-specializer-names
+ #:finalize-inheritance
+ #:find-method-combination
+ #:funcallable-standard-instance-access
+ #:generic-function-argument-precedence-order
+ #:generic-function-declarations
+ #:generic-function-lambda-list
+ #:generic-function-method-class
+ #:generic-function-method-combination
+ #:generic-function-methods
+ #:generic-function-name
+ #:intern-eql-specializer
+ #-clisp #:make-method-lambda
+ #:map-dependents
+ #:method-function
+ #:method-generic-function
+ #:method-lambda-list
+ #:method-specializers
+ #:reader-method-class
+ #:remove-dependent
+ #:remove-direct-method
+ #:remove-direct-subclass
+ #:set-funcallable-instance-function
+ #:slot-boundp-using-class
+ #:slot-definition-allocation
+ #:slot-definition-initargs
+ #:slot-definition-initform
+ #:slot-definition-initfunction
+ #:slot-definition-location
+ #:slot-definition-name
+ #:slot-definition-readers
+ #:slot-definition-writers
+ #:slot-definition-type
+ #:slot-makunbound-using-class
+ #:slot-value-using-class
+ #:specializer-direct-generic-functions
+ #:specializer-direct-methods
+ #:standard-instance-access
+ #:update-dependent
+ #:validate-superclass
+ #:writer-method-class))
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/clisp/closer-mop.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/clisp/closer-mop.lisp 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/clisp/closer-mop.lisp 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,49 @@
+(in-package :closer-mop)
+
+;; Some utility functions.
+
+(defun required-args (lambda-list &optional (collector #'identity))
+ (loop for arg in lambda-list
+ until (member arg lambda-list-keywords)
+ collect (funcall collector arg)))
+
+(defun ensure-finalized (class &optional (errorp t))
+ (if (typep class 'class)
+ (unless (class-finalized-p class)
+ (finalize-inheritance class))
+ (when errorp (error "~S is not a class." class)))
+ class)
+
+(defun ensure-method (gf lambda-expression
+ &key (qualifiers ())
+ (lambda-list (cadr lambda-expression))
+ (specializers (required-args lambda-list (constantly 't))))
+ (funcall (compile nil `(lambda ()
+ (defmethod ,(generic-function-name gf) ,@qualifiers
+ ,(loop for specializer in specializers
+ for (arg . rest) on lambda-list
+ collect `(,arg ,specializer) into args
+ finally (return (nconc args rest)))
+ ,@(cddr lambda-expression))))))
+
+;; The following can be used in direct-slot-definition-class to get the correct initargs
+;; for a slot. Use it like this:
+;;
+;; (defmethod direct-slot-definition-class
+;; ((class my-standard-class) &rest initargs)
+;; (declare (dynamic-extent initargs))
+;; (destructuring-bind
+;; (&key key-of-interest &allow-other-keys)
+;; (fix-slot-initargs initargs)
+;; ...))
+
+(defvar *standard-slot-keys*
+ '(:name :documentation
+ :initargs :initform :initfunction
+ :readers :writers))
+
+(defun fix-slot-initargs (initargs)
+ initargs)
+
+(eval-when (:compile-toplevel :load-toplevel :execute)
+ (pushnew :closer-mop *features*))
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/closer-mop-utility-packages.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/closer-mop-utility-packages.lisp 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/closer-mop-utility-packages.lisp 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,18 @@
+(in-package :cl-user)
+
+(defpackage #:closer-common-lisp
+ (:nicknames #:c2cl)
+ (:use))
+
+(let ((syms (nunion (loop for sym being the external-symbols of :common-lisp
+ if (find-symbol (symbol-name sym) :c2mop)
+ collect it
+ else collect sym)
+ (loop for sym being the external-symbols of :c2mop
+ collect sym))))
+ (import syms :c2cl)
+ (export syms :c2cl))
+
+(defpackage #:closer-common-lisp-user
+ (:nicknames #:c2cl-user)
+ (:use #:closer-common-lisp))
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/closer-mop.asd
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/closer-mop.asd 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/closer-mop.asd 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,47 @@
+(asdf:defsystem #:closer-mop
+ :name "Closer to MOP"
+ :author "Pascal Costanza"
+ :version "0.42"
+ :licence "
+Copyright (c) 2005 - 2007 Pascal Costanza
+
+Permission is hereby granted, free of charge, to any person
+obtaining a copy of this software and associated documentation
+files (the \"Software\"), to deal in the Software without
+restriction, including without limitation the rights to use,
+copy, modify, merge, publish, distribute, sublicense, and/or
+sell copies of the Software, and to permit persons to whom the
+Software is furnished to do so, subject to the following
+conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED \"AS IS\", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES
+OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
+HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
+WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
+FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
+OTHER DEALINGS IN THE SOFTWARE.
+"
+ :depends-on (#-lispworks #:lw-compat)
+ :components
+ ((:module
+ #+allegro "allegro"
+ #+clisp "clisp"
+ #+ecl "ecl"
+ #+lispworks "lispworks"
+ #+(or mcl openmcl) "mcl"
+ #+(or cmu sbcl) "pcl"
+ :components ((:file "closer-mop-packages")
+ (:file "closer-mop"
+ :depends-on ("closer-mop-packages"))))
+ (:file "closer-mop-utility-packages"
+ :depends-on (#+allegro "allegro"
+ #+clisp "clisp"
+ #+ecl "ecl"
+ #+lispworks "lispworks"
+ #+(or mcl openmcl) "mcl"
+ #+(or cmu sbcl) "pcl"))))
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/ecl/closer-mop-packages.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/ecl/closer-mop-packages.lisp 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/ecl/closer-mop-packages.lisp 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,190 @@
+(in-package :cl-user)
+
+(defpackage #:closer-mop
+ (:use #:common-lisp #:lispworks)
+ (:nicknames #:c2mop)
+
+ (:shadow #:defgeneric #:ensure-generic-function #:find-method
+ #:remove-method #:standard-generic-function)
+ (:export #:defgeneric #:ensure-generic-function #:find-method
+ #:remove-method #:standard-generic-function)
+
+ (:import-from #:clos
+
+ #:direct-slot-definition
+ #:effective-slot-definition
+ #-ecl #:eql-specializer
+ #:forward-referenced-class
+ #-ecl #:funcallable-standard-class
+ #-ecl #:funcallable-standard-object
+ #-ecl #:metaobject
+ #:slot-definition
+ #-ecl #:specializer
+ #-ecl #:standard-accessor-method
+ #:standard-direct-slot-definition
+ #:standard-effective-slot-definition
+ #-ecl #:standard-reader-method
+ #:standard-slot-definition
+ #-ecl #:standard-writer-method
+
+ #-ecl #:accessor-method-slot-definition
+ #-ecl #:add-dependent
+ #-ecl #:add-direct-method
+ #:add-direct-subclass
+ #:class-default-initargs
+ #:class-direct-default-initargs
+ #:class-direct-slots
+ #:class-direct-subclasses
+ #:class-direct-superclasses
+ #:class-finalized-p
+ #:class-precedence-list
+ #:class-prototype
+ #:class-slots
+ #-ecl #:compute-applicable-methods-using-classes
+ #:compute-class-precedence-list
+ #:compute-default-initargs
+ #:compute-discriminating-function
+ #:compute-effective-method
+ #:compute-effective-slot-definition
+ #:compute-slots
+ #:direct-slot-definition-class
+ #:effective-slot-definition-class
+ #:ensure-class
+ #:ensure-class-using-class
+ #:ensure-generic-function-using-class
+ #-ecl #:eql-specializer-object
+ #-ecl #:extract-lambda-list
+ #-ecl #:extract-specializer-names
+ #:finalize-inheritance
+ #-ecl #:find-method-combination
+ #:funcallable-standard-instance-access
+ #:generic-function-argument-precedence-order
+ #-ecl #:generic-function-declarations
+ #:generic-function-lambda-list
+ #:generic-function-method-class
+ #:generic-function-method-combination
+ #:generic-function-methods
+ #:generic-function-name
+ #-ecl #:intern-eql-specializer
+ #-ecl #:make-method-lambda
+ #-ecl #:map-dependents
+ #:method-function
+ #:method-generic-function
+ #:method-lambda-list
+ #:method-specializers
+ #-ecl #:reader-method-class
+ #-ecl #:remove-dependent
+ #-ecl #:remove-direct-method
+ #:remove-direct-subclass
+ #:set-funcallable-instance-function
+ #:slot-boundp-using-class
+ #:slot-definition-allocation
+ #:slot-definition-initargs
+ #:slot-definition-initform
+ #:slot-definition-initfunction
+ #:slot-definition-location
+ #:slot-definition-name
+ #:slot-definition-readers
+ #:slot-definition-writers
+ #:slot-definition-type
+ #:slot-makunbound-using-class
+ #:slot-value-using-class
+ #-ecl #:specializer-direct-generic-functions
+ #-ecl #:specializer-direct-methods
+ #:standard-instance-access
+ #-ecl #:update-dependent
+ #-ecl #:validate-superclass
+ #-ecl #:writer-method-class)
+
+ (:export
+ #:direct-slot-definition
+ #:effective-slot-definition
+ #:eql-specializer
+ #:forward-referenced-class
+ #-ecl #:funcallable-standard-class
+ #-ecl #:funcallable-standard-object
+ #-ecl #:metaobject
+ #:slot-definition
+ #-ecl #:specializer
+ #:standard-accessor-method
+ #:standard-direct-slot-definition
+ #:standard-effective-slot-definition
+ #:standard-reader-method
+ #:standard-slot-definition
+ #:standard-writer-method
+
+ #:ensure-finalized
+ #:ensure-method
+ #:fix-slot-initargs
+ #:required-args
+
+ #:accessor-method-slot-definition
+ #-ecl #:add-dependent
+ #:add-direct-method
+ #:add-direct-subclass
+ #:class-default-initargs
+ #:class-direct-default-initargs
+ #:class-direct-slots
+ #:class-direct-subclasses
+ #:class-direct-superclasses
+ #:class-finalized-p
+ #:class-precedence-list
+ #:class-prototype
+ #:class-slots
+ #-ecl #:compute-applicable-methods-using-classes
+ #:compute-class-precedence-list
+ #:compute-default-initargs
+ #:compute-discriminating-function
+ #:compute-effective-method
+ #:compute-effective-slot-definition
+ #:compute-slots
+ #:direct-slot-definition-class
+ #:effective-slot-definition-class
+ #:ensure-class
+ #:ensure-class-using-class
+ #:ensure-generic-function-using-class
+ #:eql-specializer-object
+ #:eql-specializer-object*
+ #:extract-lambda-list
+ #:extract-specializer-names
+ #:finalize-inheritance
+ #-ecl #:find-method-combination
+ #:funcallable-standard-instance-access
+ #:generic-function-argument-precedence-order
+ #-ecl #:generic-function-declarations
+ #:generic-function-lambda-list
+ #:generic-function-method-class
+ #:generic-function-method-combination
+ #:generic-function-methods
+ #:generic-function-name
+ #:intern-eql-specializer
+ #:intern-eql-specializer*
+ #-ecl #:make-method-lambda
+ #-ecl #:map-dependents
+ #:method-function
+ #:method-generic-function
+ #:method-lambda-list
+ #:method-specializers
+ #:reader-method-class
+ #-ecl #:remove-dependent
+ #:remove-direct-method
+ #:remove-direct-subclass
+ #:set-funcallable-instance-function
+ #:slot-boundp-using-class
+ #:slot-definition-allocation
+ #:slot-definition-initargs
+ #:slot-definition-initform
+ #:slot-definition-initfunction
+ #:slot-definition-location
+ #:slot-definition-name
+ #:slot-definition-readers
+ #:slot-definition-writers
+ #:slot-definition-type
+ #:slot-makunbound-using-class
+ #:slot-value-using-class
+ #:specializer-direct-generic-functions
+ #:specializer-direct-methods
+ #:standard-instance-access
+ #-ecl #:update-dependent
+ #-ecl #:validate-superclass
+ #:writer-method-class))
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/ecl/closer-mop.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/ecl/closer-mop.lisp 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/ecl/closer-mop.lisp 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,312 @@
+(in-package :closer-mop)
+
+;; Some utility functions.
+
+(defun required-args (lambda-list &optional (collector #'identity))
+ (loop for arg in lambda-list
+ until (member arg lambda-list-keywords)
+ collect (funcall collector arg)))
+
+(defun ensure-finalized (class &optional (errorp t))
+ (if (typep class 'class)
+ (unless (class-finalized-p class)
+ (finalize-inheritance class))
+ (when errorp (error "~S is not a class." class)))
+ class)
+
+(defun extract-lambda-list (lambda-list)
+ (loop for (arg . rest) on lambda-list
+ until (member arg lambda-list-keywords)
+ if (consp arg)
+ collect (car arg) into args
+ else collect arg into args
+ finally (return (if arg
+ (nconc args (cons arg rest))
+ args))))
+
+(defun extract-specializer-names (lambda-list)
+ (loop for arg in lambda-list
+ until (member arg lambda-list-keywords)
+ if (consp arg)
+ collect (cadr arg)
+ else collect 't))
+
+;; We need a new standard-generic-function for various things.
+
+(cl:defclass standard-generic-function (cl:standard-generic-function)
+ ())
+
+;; The following ensures that the new standard-generic-function is used.
+
+(defun ensure-generic-function
+ (name &rest args
+ &key (generic-function-class 'standard-generic-function)
+ &allow-other-keys)
+ (declare (dynamic-extent args))
+ (apply #'cl:ensure-generic-function name
+ :generic-function-class generic-function-class
+ args))
+
+#|
+(defun ensure-generic-function
+ (name &rest args
+ &key (generic-function-class 'standard-generic-function)
+ &allow-other-keys)
+ (declare (dynamic-extent args))
+ (when (fboundp name)
+ (let ((function (fdefinition name)))
+ (unless (typep function 'generic-function)
+ (cerror "Discard existing definition and create generic function."
+ "~S is already fbound, but not as a generic function." name)
+ (fmakunbound name))))
+ (if (fboundp name)
+ (let ((function (fdefinition name)))
+ (apply #'ensure-generic-function-using-class
+ function name args))
+ (apply #'ensure-generic-function-using-class nil name
+ :generic-function-class generic-function-class
+ args)))
+|#
+
+;; The standard accessor classes.
+
+(cl:defclass standard-accessor-method (standard-method)
+ ((slotd :initarg :slot-definition
+ :reader accessor-method-slot-definition)))
+
+(cl:defclass standard-reader-method (standard-accessor-method)
+ ())
+
+(cl:defclass standard-writer-method (standard-accessor-method)
+ ())
+
+;; In ECL, reader-method-class and writer-method-class are
+;; not used during class initialization. The following definitions
+;; correct this.
+
+(cl:defgeneric reader-method-class (class slot-definition &rest initargs)
+ (:method ((class class) slot-definition &rest initargs)
+ (declare (ignore slot-definition initargs))
+ (load-time-value (find-class 'standard-reader-method))))
+
+(cl:defgeneric writer-method-class (class slot-definition &rest initargs)
+ (:method ((class class) slot-definition &rest initargs)
+ (declare (ignore slot-definition initargs))
+ (load-time-value (find-class 'standard-writer-method))))
+
+(cl:defgeneric find-method (gf qualifiers specializers &optional errorp)
+ (:method ((gf generic-function) qualifiers specializers &optional (errorp t))
+ (cl:find-method gf qualifiers specializers errorp)))
+
+(defun modify-accessors (class)
+ (loop with reader-specializers = (list class)
+ with writer-specializers = (list (find-class 't) class)
+ for slotd in (class-direct-slots class) do
+ (loop for reader in (slot-definition-readers slotd)
+ for reader-function = (fdefinition reader)
+ for reader-method = (find-method reader-function () reader-specializers)
+ for initargs = (list :qualifiers ()
+ :lambda-list '(object)
+ :specializers reader-specializers
+ :function (method-function reader-method)
+ :slot-definition slotd)
+ for method-class = (apply #'reader-method-class class slotd initargs)
+ unless (eq method-class (class-of reader-method))
+ do (add-method reader-function (apply #'make-instance method-class initargs)))
+ (loop for writer in (slot-definition-writers slotd)
+ for writer-function = (fdefinition writer)
+ for writer-method = (find-method writer-function () writer-specializers)
+ for initargs = (list :qualifiers ()
+ :lambda-list '(new-value object)
+ :specializers writer-specializers
+ :function (method-function writer-method)
+ :slot-definition slotd)
+ for method-class = (apply #'writer-method-class class slotd initargs)
+ unless (eq method-class (class-of writer-method))
+ do (add-method writer-function (apply #'make-instance method-class initargs)))))
+
+;; During class re/initialization, we take care of the following things:
+;; - Optimization of slot accessors is deactivated.
+;; - Removal of direct subclasses.
+
+(cl:defmethod initialize-instance :around
+ ((class standard-class) &rest initargs)
+ (declare (dynamic-extent initargs))
+ (prog1 (apply #'call-next-method class
+ :optimize-slot-access nil
+ initargs)
+ (modify-accessors class)))
+
+(cl:defmethod reinitialize-instance :around
+ ((class standard-class) &rest initargs
+ &key (direct-superclasses () direct-superclasses-p))
+ (declare (dynamic-extent initargs))
+ (when direct-superclasses-p
+ (loop for superclass in (copy-list (class-direct-superclasses class))
+ unless (member superclass direct-superclasses)
+ do (remove-direct-subclass superclass class)))
+ (prog1 (apply #'call-next-method class
+ :optimize-slot-access nil
+ initargs)
+ (modify-accessors class)))
+
+;; In ECL, eql specializers are lists. We cannot change this
+;; but we can soften some of the incompatibilities.
+
+(defun eql-specializer-p (cons)
+ (and (consp cons)
+ (eq (car cons) 'eql)
+ (null (cddr cons))))
+
+(deftype eql-specializer ()
+ '(or eql-specializer*
+ (satisfies eql-specializer-p)))
+
+(cl:defgeneric eql-specializer-object (eql-specializer)
+ (:method ((cons cons))
+ (if (eql-specializer-p cons)
+ (cadr cons)
+ (error "~S is not an eql-specializer." cons))))
+
+(defun intern-eql-specializer (object)
+ `(eql ,object))
+
+(cl:defgeneric specializer-direct-methods (specializer))
+
+(cl:defclass eql-specializer* (standard-object)
+ ((obj :reader eql-specializer-object
+ :initarg eso
+ :initform (error "Use intern-eql-specializer to create eql-specializers."))
+ (direct-methods :reader specializer-direct-methods
+ :accessor es-direct-methods
+ :initform ())))
+
+(defvar *eql-specializers* (make-hash-table))
+
+(defun intern-eql-specializer* (object)
+ (or (gethash object *eql-specializers*)
+ (setf (gethash object *eql-specializers*)
+ (make-instance 'eql-specializer* 'eso object))))
+
+(defvar *direct-methods* (make-hash-table :test #'eq))
+
+(cl:defgeneric add-direct-method (specializer method)
+ (:method ((specializer class) (method method))
+ (pushnew method (gethash specializer *direct-methods*)))
+ (:method ((specializer eql-specializer*) (method method))
+ (pushnew method (es-direct-methods specializer))))
+
+(cl:defgeneric remove-direct-method (specializer method)
+ (:method ((specializer class) (method method))
+ (removef (gethash specializer *direct-methods*) method))
+ (:method ((specializer eql-specializer*) (method method))
+ (removef (es-direct-methods specializer) method)))
+
+(cl:defmethod specializer-direct-methods ((class class))
+ (gethash class *direct-methods*))
+
+(cl:defgeneric specializer-direct-generic-functions (specializer)
+ (:method ((class class))
+ (remove-duplicates
+ (mapcar #'method-generic-function
+ (specializer-direct-methods class))))
+ (:method ((eql-specializer eql-specializer*))
+ (remove-duplicates
+ (mapcar #'method-generic-function
+ (specializer-direct-methods eql-specializer))))
+ (:method ((cons cons))
+ (specializer-direct-generic-functions
+ (intern-eql-specializer*
+ (eql-specializer-object cons)))))
+
+;; The following method ensures that remove-method is called.
+
+(cl:defmethod add-method :before ((gf standard-generic-function) (method method))
+ (when-let (old-method (find-method gf (method-qualifiers method)
+ (method-specializers method) nil))
+ (remove-method gf old-method)))
+
+;; The following two methods ensure that add/remove-direct-method is called,
+;; and that the dependent protocol for generic function works.
+
+(cl:defmethod add-method :after ((gf standard-generic-function) (method method))
+ (loop for specializer in (method-specializers method)
+ do (add-direct-method
+ (if (consp specializer)
+ (intern-eql-specializer*
+ (eql-specializer-object specializer))
+ specializer)
+ method)))
+
+(cl:defgeneric remove-method (generic-function method)
+ (:method ((gf generic-function) (method method))
+ (cl:remove-method gf method)))
+
+(cl:defmethod remove-method :after ((gf generic-function) (method method))
+ (loop for specializer in (method-specializers method)
+ do (remove-direct-method
+ (if (consp specializer)
+ (intern-eql-specializer*
+ (eql-specializer-object specializer))
+ specializer)
+ method)))
+
+(defun ensure-method (gf lambda-expression
+ &key (qualifiers ())
+ (lambda-list (cadr lambda-expression))
+ (specializers (required-args lambda-list (constantly (find-class 't)))))
+ (funcall (compile nil `(lambda ()
+ (defmethod ,(generic-function-name gf) ,@qualifiers
+ ,(loop for specializer in specializers
+ for (arg . rest) on lambda-list
+ collect `(,arg ,specializer) into args
+ finally (return (nconc args rest)))
+ ,@(cddr lambda-expression))))))
+
+(defmacro defgeneric (&whole form name (&rest args) &body options)
+ (unless (every #'consp options)
+ (error "Illegal generic functions options in defgeneric form ~S." form))
+ `(cl:defgeneric ,name ,args
+ ,@options
+ ,@(unless (member :generic-function-class options :key #'car :test #'eq)
+ '((:generic-function-class standard-generic-function)))))
+
+;; The following can be used in direct-slot-definition-class to get the correct initargs
+;; for a slot. Use it like this:
+;;
+;; (defmethod direct-slot-definition-class
+;; ((class my-standard-class) &rest initargs)
+;; (declare (dynamic-extent initargs))
+;; (destructuring-bind
+;; (&key key-of-interest &allow-other-keys)
+;; (fix-slot-initargs initargs)
+;; ...))
+
+(defvar *standard-slot-keys*
+ '(:name :documentation
+ :initargs :initform :initfunction
+ :readers :writers))
+
+(defun fix-slot-initargs (initargs)
+ (let* ((counts (loop with counts
+ for (key nil) on initargs by #'cddr
+ do (incf (getf counts key 0))
+ finally (return counts)))
+ (keys-to-fix (loop for (key value) on counts by #'cddr
+ if (> value 1) collect key)))
+ (if keys-to-fix
+ (let ((multiple-standard-keys
+ (intersection keys-to-fix *standard-slot-keys*)))
+ (if multiple-standard-keys
+ (error "Too many occurences of ~S in slot initargs ~S."
+ multiple-standard-keys initargs)
+ (loop with fixed-keys
+ for (key value) on initargs by #'cddr
+ if (member key keys-to-fix)
+ do (nconcf (getf fixed-keys key) (list value))
+ else nconc (list key value) into fixed-initargs
+ finally (return (nconc fixed-initargs fixed-keys)))))
+ initargs)))
+
+(eval-when (:compile-toplevel :load-toplevel :execute)
+ (pushnew :closer-mop *features*))
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/features.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/features.lisp 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/features.lisp 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,498 @@
+
+:allegro7.0
+((:class-default-initargs)
+ (:class-direct-default-initargs)
+ (:compute-default-initargs) ; -> :compute-default-initargs-allegro
+ (:default-superclass-for-funcallable-standard-class-is-funcallable-standard-object)
+ (:defgeneric-calls-find-method-combination)
+ (:defmethod-calls-make-method-lambda)
+ (:dependent-protocol-for-generic-functions fixed)
+ (:extensible-allocation fixed)
+ (:function-invocation-calls-compute-applicable-methods)
+ (:function-invocation-calls-compute-applicable-methods-using-classes)
+ (:function-invocation-calls-compute-effective-method)
+ (:make-method-lambda)
+ (:method-functions-take-processed-parameters)
+ (:method-lambdas-are-processed)
+ (:multiple-qualifiers)
+ (:reinitialize-instance-calls-compute-discriminating-function fixed)
+ (:setf-class-name-calls-reinitialize-instance)
+ (:setf-generic-function-name-calls-reinitialize-instance)
+ (:slot-boundp-using-class-specialized-on-slot-definition fixed)
+ (:slot-makunbound-using-class-specialized-on-slot-definition fixed)
+ (:standard-class-and-funcallable-standard-class-are-compatible)
+ (:subclasses-of-built-in-class-do-not-inherit-exported-slots)
+ (:subclasses-of-forward-referenced-class-do-not-inherit-exported-slots)
+ (:subclasses-of-funcallable-standard-class-do-not-inherit-exported-slots)
+ (:subclasses-of-method-combination-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-accessor-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-class-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-direct-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-effective-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-generic-function-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-reader-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-writer-method-do-not-inherit-exported-slots)
+ (:t-is-always-a-valid-superclass))
+
+:allegro8.0
+((:class-default-initargs)
+ (:class-direct-default-initargs)
+ (:compute-default-initargs) ; -> :compute-default-initargs-allegro
+ (:default-superclass-for-funcallable-standard-class-is-funcallable-standard-object)
+ (:defgeneric-calls-find-method-combination)
+ (:defmethod-calls-make-method-lambda)
+ (:dependent-protocol-for-generic-functions fixed)
+ (:extensible-allocation fixed)
+ (:function-invocation-calls-compute-applicable-methods)
+ (:function-invocation-calls-compute-applicable-methods-using-classes)
+ (:function-invocation-calls-compute-effective-method)
+ (:make-method-lambda)
+ (:method-functions-take-processed-parameters)
+ (:method-lambdas-are-processed)
+ (:reinitialize-instance-calls-compute-discriminating-function fixed)
+ (:setf-class-name-calls-reinitialize-instance)
+ (:setf-generic-function-name-calls-reinitialize-instance)
+ (:slot-boundp-using-class-specialized-on-slot-definition fixed)
+ (:slot-makunbound-using-class-specialized-on-slot-definition fixed)
+ (:standard-class-and-funcallable-standard-class-are-compatible)
+ (:subclasses-of-built-in-class-do-not-inherit-exported-slots)
+ (:subclasses-of-forward-referenced-class-do-not-inherit-exported-slots)
+ (:subclasses-of-funcallable-standard-class-do-not-inherit-exported-slots)
+ (:subclasses-of-method-combination-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-accessor-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-class-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-direct-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-effective-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-generic-function-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-reader-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-writer-method-do-not-inherit-exported-slots)
+ (:t-is-always-a-valid-superclass))
+
+:allegro8.1
+((:class-default-initargs)
+ (:class-direct-default-initargs)
+ (:compute-default-initargs) ; -> :compute-default-initargs-allegro
+ (:default-superclass-for-funcallable-standard-class-is-funcallable-standard-object)
+ (:defgeneric-calls-find-method-combination)
+ (:defmethod-calls-make-method-lambda)
+ (:dependent-protocol-for-generic-functions fixed)
+ (:extensible-allocation fixed)
+ (:function-invocation-calls-compute-applicable-methods)
+ (:function-invocation-calls-compute-applicable-methods-using-classes)
+ (:function-invocation-calls-compute-effective-method)
+ (:make-method-lambda)
+ (:method-functions-take-processed-parameters)
+ (:method-lambdas-are-processed)
+ (:reinitialize-instance-calls-compute-discriminating-function fixed)
+ (:setf-class-name-calls-reinitialize-instance)
+ (:setf-generic-function-name-calls-reinitialize-instance)
+ (:slot-makunbound-using-class-specialized-on-slot-definition fixed)
+ (:standard-class-and-funcallable-standard-class-are-compatible)
+ (:subclasses-of-built-in-class-do-not-inherit-exported-slots)
+ (:subclasses-of-forward-referenced-class-do-not-inherit-exported-slots)
+ (:subclasses-of-funcallable-standard-class-do-not-inherit-exported-slots)
+ (:subclasses-of-method-combination-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-accessor-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-class-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-direct-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-effective-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-generic-function-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-reader-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-writer-method-do-not-inherit-exported-slots)
+ (:t-is-always-a-valid-superclass))
+
+:clisp2.35-2.36
+((:accessor-method-initialized-with-function)
+ (:add-method-calls-compute-discriminating-function)
+ (:compute-slots-requested-slot-order-honoured)
+ (:defmethod-calls-make-method-lambda)
+ (:extensible-allocation)
+ (:forward-referenced-class-changed-by-change-class)
+ (:initialize-instance-calls-compute-discriminating-function)
+ (:make-method-lambda)
+ (:method-initialized-with-function)
+ (:method-lambdas-are-processed)
+ (:reinitialize-instance-calls-compute-discriminating-function)
+ (:reinitialize-instance-calls-finalize-inheritance)
+ (:remove-method-calls-compute-discriminating-function)
+ (:subclasses-of-method-combination-do-not-inherit-exported-slots))
+
+:clisp2.37-2.39
+((:accessor-method-initialized-with-function)
+ (:add-method-calls-compute-discriminating-function)
+ (:compute-slots-requested-slot-order-honoured)
+ (:defmethod-calls-make-method-lambda)
+ (:forward-referenced-class-changed-by-change-class)
+ (:initialize-instance-calls-compute-discriminating-function)
+ (:make-method-lambda)
+ (:method-initialized-with-function)
+ (:method-lambdas-are-processed)
+ (:reinitialize-instance-calls-compute-discriminating-function)
+ (:reinitialize-instance-calls-finalize-inheritance)
+ (:remove-method-calls-compute-discriminating-function)
+ (:subclasses-of-method-combination-do-not-inherit-exported-slots))
+
+:clisp2.40-2.41
+((:accessor-method-initialized-with-function)
+ (:add-method-calls-compute-discriminating-function)
+ (:compute-slots-requested-slot-order-honoured)
+ (:defmethod-calls-make-method-lambda)
+ (:forward-referenced-class-changed-by-change-class)
+ (:initialize-instance-calls-compute-discriminating-function)
+ (:make-method-lambda)
+ (:method-initialized-with-function)
+ (:method-lambdas-are-processed)
+ (:reinitialize-instance-calls-compute-discriminating-function)
+ (:remove-method-calls-compute-discriminating-function)
+ (:subclasses-of-method-combination-do-not-inherit-exported-slots))
+
+:cmu19c-19d
+((:accessor-method-initialized-with-function fixed)
+ (:accessor-method-initialized-with-lambda-list fixed)
+ (:accessor-method-initialized-with-slot-definition fixed)
+ (:accessor-method-initialized-with-specializers fixed)
+ (:anonymous-classes fixed)
+ (:class-default-initargs)
+ (:class-direct-default-initargs)
+ (:class-initialization-calls-reader-method-class fixed)
+ (:class-initialization-calls-writer-method-class fixed)
+ (:discriminating-functions-can-be-closures)
+ (:discriminating-functions-can-be-funcalled)
+ (:documentation-passed-to-effective-slot-definition-class)
+ (:effective-slot-definition-initialized-with-documentation)
+ (:method-initialized-with-function)
+ (:multiple-slot-options-passed-as-list-to-direct-slot-definition-class) ; fix with fix-slot-initargs
+ (:reinitialize-instance-calls-compute-discriminating-function fixed)
+ (:reinitialize-instance-calls-finalize-inheritance)
+ (:setf-class-name-calls-reinitialize-instance)
+ (:setf-generic-function-name-calls-reinitialize-instance)
+ (:slot-definition-documentation fixed)
+ (:standard-class-and-funcallable-standard-class-are-compatible)
+ (:subclasses-of-built-in-class-do-not-inherit-exported-slots)
+ (:subclasses-of-class-do-not-inherit-exported-slots)
+ (:subclasses-of-direct-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-effective-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-eql-specializer-do-not-inherit-exported-slots)
+ (:subclasses-of-forward-referenced-class-do-not-inherit-exported-slots)
+ (:subclasses-of-funcallable-standard-class-do-not-inherit-exported-slots)
+ (:subclasses-of-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-specializer-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-accessor-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-class-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-direct-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-effective-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-generic-function-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-reader-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-writer-method-do-not-inherit-exported-slots))
+
+:ecl0.9i
+((:accessor-method-initialized-with-function fixed)
+ (:accessor-method-initialized-with-lambda-list fixed)
+ (:accessor-method-initialized-with-slot-definition fixed)
+ (:accessor-method-initialized-with-specializers fixed)
+ (:accessor-method-slot-definition fixed)
+ (:add-direct-method fixed)
+ (:add-method-calls-add-direct-method fixed)
+ (:add-method-calls-compute-discriminating-function)
+ (:add-method-calls-remove-method fixed)
+ (:add-method-updates-specializer-direct-generic-functions fixed)
+ (:add-method-updates-specializer-direct-methods fixed)
+ (:class-default-initargs)
+ (:class-direct-default-initargs)
+ (:class-initialization-calls-reader-method-class fixed)
+ (:class-initialization-calls-writer-method-class fixed)
+ (:class-reinitialization-calls-remove-direct-subclass fixed)
+ (:classes-are-always-their-own-valid-superclasses)
+ (:compute-applicable-methods-is-generic)
+ (:compute-applicable-methods-using-classes)
+ (:compute-effective-method-is-generic)
+ (:default-superclass-for-funcallable-standard-class-is-funcallable-standard-object)
+ (:default-reader-methods-are-standard-reader-methods fixed)
+ (:default-writer-methods-are-standard-writer-methods fixed)
+ (:defgeneric-calls-find-method-combination)
+ (:defmethod-calls-generic-function-method-class)
+ (:defmethod-calls-initialize-instance)
+ (:defmethod-calls-make-method-lambda)
+ (:dependent-protocol-for-classes)
+ (:dependent-protocol-for-generic-functions)
+ (:direct-slot-definition-initialized-with-type)
+ (:discriminating-functions-can-be-closures)
+ (:discriminating-functions-can-be-funcalled)
+ (:eql-specializer)
+ (:eql-specializer-object fixed)
+ (:eql-specializers-are-objects)
+ (:extract-lambda-list fixed)
+ (:extract-specializer-names fixed)
+ (:find-method-combination)
+ (:find-method-is-generic fixed)
+ (:funcallable-standard-class)
+ (:funcallable-standard-object)
+ (:function-invocation-calls-compute-applicable-methods)
+ (:function-invocation-calls-compute-applicable-methods-using-classes)
+ (:function-invocation-calls-compute-effective-method)
+ (:generic-function-declarations)
+ (:generic-function-method-class-is-generic)
+ (:generic-function-method-combination)
+ (:generic-functions-can-be-empty)
+ (:initform-passed-to-direct-slot-definition-class)
+ (:initform-passed-to-effective-slot-definition-class)
+ (:initialize-instance-calls-compute-discriminating-function)
+ (:intern-eql-specializer fixed)
+ (:make-method-lambda)
+ (:metaobject)
+ (:method-functions-take-processed-parameters)
+ (:method-initialized-with-documentation)
+ (:method-initialized-with-function)
+ (:method-initialized-with-lambda-list)
+ (:method-initialized-with-qualifiers)
+ (:method-initialized-with-specializers)
+ (:method-lambdas-are-processed)
+ (:multiple-slot-options-passed-as-list-to-direct-slot-definition-class)
+ (:reader-method-class fixed)
+ (:reinitialize-instance-calls-compute-discriminating-function)
+ (:remove-direct-method fixed)
+ (:remove-method-calls-compute-discriminating-function)
+ (:remove-method-calls-remove-direct-method fixed)
+ (:remove-method-is-generic fixed)
+ (:setf-class-name-calls-reinitialize-instance)
+ (:setf-generic-function-name)
+ (:setf-generic-function-name-calls-reinitialize-instance)
+ (:slot-definition-documentation)
+ (:slot-definition-initform)
+ (:slot-definition-initfunction)
+ (:slot-definition-type)
+ (:slot-reader-calls-slot-value-using-class fixed)
+ (:slot-writer-calls-slot-value-using-class fixed)
+ (:specializer)
+ (:specializer-direct-generic-functions fixed)
+ (:specializer-direct-methods fixed)
+ (:standard-accessor-method fixed)
+ (:standard-class-and-funcallable-standard-class-are-compatible)
+ (:standard-reader-method fixed)
+ (:standard-writer-method fixed)
+ (:subclasses-of-built-in-class-do-not-inherit-exported-slots)
+ (:subclasses-of-class-do-not-inherit-exported-slots)
+ (:subclasses-of-direct-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-effective-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-forward-referenced-class-do-not-inherit-exported-slots)
+ (:subclasses-of-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-class-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-direct-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-effective-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-generic-function-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-slot-definition-do-not-inherit-exported-slots)
+ (:t-is-always-a-valid-superclass)
+ (:type-passed-to-direct-slot-definition-class)
+ (:validate-superclass)
+ (:writer-method-class fixed))
+
+:lispworks4.4
+((:add-method-calls-add-direct-method fixed)
+ (:add-method-calls-compute-discriminating-function)
+ (:add-method-calls-remove-method fixed)
+ (:add-method-updates-specializer-direct-generic-functions fixed)
+ (:allocation-passed-to-effective-slot-definition-class) ; instead :flags-passed-to-effective-slot-definition-class
+ (:class-default-initargs)
+ (:class-direct-default-initargs)
+ (:class-initialized-with-direct-default-initargs) ; instead: conditionalization
+ (:class-reinitialization-calls-remove-direct-subclass fixed)
+ (:compute-applicable-methods-using-classes)
+ (:compute-default-initargs)
+ (:defgeneric-calls-find-method-combination)
+ (:direct-superclasses-by-default-empty) ; not fixed, but direct superclasses are automatically adjusted
+ (:effective-slot-definition-initialized-with-allocation) ; instead :effective-slot-definition-initialized-with-flags
+ (:eql-specializer) ; partially fixed
+ (:eql-specializer-object fixed)
+ (:eql-specializers-are-objects)
+ (:extensible-allocation)
+ (:finalize-inheritance-calls-compute-default-initargs)
+ (:find-method-combination fixed) ; partially
+ (:funcallable-standard-instance-access)
+ (:function-invocation-calls-compute-applicable-methods)
+ (:function-invocation-calls-compute-applicable-methods-using-classes)
+ (:generic-function-initialized-with-declarations) ; map from generic-function-initialized-with-declare
+ (:initialize-instance-calls-compute-discriminating-function)
+ (:intern-eql-specializer fixed) ; partially
+ (:make-method-lambda fixed) ; partially
+ (:method-functions-take-processed-parameters)
+ (:reinitialize-instance-calls-compute-discriminating-function)
+ (:remove-method-calls-compute-discriminating-function)
+ (:remove-method-calls-remove-direct-method fixed)
+ (:setf-class-name-calls-reinitialize-instance)
+ (:setf-generic-function-name-calls-reinitialize-instance)
+ (:setf-slot-value-using-class-specialized-on-slot-definition fixed)
+ (:slot-boundp-using-class-specialized-on-slot-definition fixed)
+ (:slot-makunbound-using-class-specialized-on-slot-definition fixed)
+ (:slot-reader-calls-slot-value-using-class fixed)
+ (:slot-value-using-class-specialized-on-slot-definition fixed)
+ (:slot-writer-calls-slot-value-using-class fixed)
+ (:specializer)
+ (:specializer-direct-generic-functions fixed)
+ (:standard-class-and-funcallable-standard-class-are-compatible)
+ (:standard-instance-access)
+ (:subclasses-of-built-in-class-do-not-inherit-exported-slots fixed)
+ (:subclasses-of-class-do-not-inherit-exported-slots fixed)
+ (:subclasses-of-direct-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-effective-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-forward-referenced-class-do-not-inherit-exported-slots fixed)
+ (:subclasses-of-funcallable-standard-class-do-not-inherit-exported-slots fixed)
+ (:subclasses-of-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-accessor-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-class-do-not-inherit-exported-slots fixed)
+ (:subclasses-of-standard-direct-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-effective-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-generic-function-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-reader-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-writer-method-do-not-inherit-exported-slots))
+
+:lispworks5.0-5.0.2
+((:add-method-calls-compute-discriminating-function)
+ (:add-method-updates-specializer-direct-generic-functions fixed)
+ (:class-default-initargs)
+ (:class-direct-default-initargs)
+ (:compute-applicable-methods-using-classes)
+ (:compute-default-initargs)
+ (:defgeneric-calls-find-method-combination)
+ (:eql-specializer) ; partially fixed
+ (:eql-specializer-object fixed)
+ (:eql-specializers-are-objects)
+ (:extensible-allocation)
+ (:finalize-inheritance-calls-compute-default-initargs)
+ (:find-method-combination fixed) ; partially
+ (:funcallable-standard-instance-access)
+ (:function-invocation-calls-compute-applicable-methods)
+ (:function-invocation-calls-compute-applicable-methods-using-classes)
+ (:initialize-instance-calls-compute-discriminating-function)
+ (:intern-eql-specializer fixed) ; partially
+ (:make-method-lambda fixed) ; partially
+ (:method-functions-take-processed-parameters)
+ (:reinitialize-instance-calls-compute-discriminating-function)
+ (:remove-method-calls-compute-discriminating-function)
+ (:setf-slot-value-using-class-specialized-on-slot-definition fixed)
+ (:slot-boundp-using-class-specialized-on-slot-definition fixed)
+ (:slot-makunbound-using-class-specialized-on-slot-definition fixed)
+ (:slot-reader-calls-slot-value-using-class fixed)
+ (:slot-value-using-class-specialized-on-slot-definition fixed)
+ (:slot-writer-calls-slot-value-using-class fixed)
+ (:specializer)
+ (:specializer-direct-generic-functions fixed)
+ (:standard-class-and-funcallable-standard-class-are-compatible)
+ (:standard-instance-access)
+ (:subclasses-of-built-in-class-do-not-inherit-exported-slots fixed)
+ (:subclasses-of-class-do-not-inherit-exported-slots fixed)
+ (:subclasses-of-direct-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-effective-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-forward-referenced-class-do-not-inherit-exported-slots fixed)
+ (:subclasses-of-funcallable-standard-class-do-not-inherit-exported-slots fixed)
+ (:subclasses-of-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-accessor-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-class-do-not-inherit-exported-slots fixed)
+ (:subclasses-of-standard-direct-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-effective-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-generic-function-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-reader-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-writer-method-do-not-inherit-exported-slots))
+
+:mcl
+((:add-method-calls-compute-discriminating-function)
+ (:compute-applicable-methods-using-classes)
+ (:default-superclass-for-funcallable-standard-class-is-funcallable-standard-object)
+ (:defmethod-calls-generic-function-method-class)
+ (:defmethod-calls-make-method-lambda)
+ (:discriminating-functions-can-be-closures)
+ (:discriminating-functions-can-be-funcalled)
+ (:funcallable-standard-object)
+ (:function-invocation-calls-compute-applicable-methods)
+ (:function-invocation-calls-compute-applicable-methods-using-classes)
+ (:function-invocation-calls-compute-effective-method)
+ (:generic-function-declarations)
+ (:generic-function-initialized-with-declarations)
+ (:generic-functions-can-be-empty)
+ (:initialize-instance-calls-compute-discriminating-function)
+ (:make-method-lambda)
+ (:method-functions-take-processed-parameters)
+ (:method-lambdas-are-processed)
+ (:reinitialize-instance-calls-compute-discriminating-function)
+ (:reinitialize-lambda-list-reinitializes-argument-precedence-order)
+ (:remove-method-calls-compute-discriminating-function)
+ (:set-funcallable-instance-function)
+ (:setf-generic-function-name)
+ (:setf-generic-function-name-calls-reinitialize-instance)
+; ---
+ (:compute-slots-requested-slot-order-honoured)
+ (:direct-slot-definition fixed)
+ (:direct-superclasses-by-default-empty) ; not fixed, but direct superclasses are automatically adjusted, not for funcallable-standard-class though
+ (:effective-slot-definition fixed)
+ (:eql-specializer fixed)
+ (:extensible-allocation)
+ (:multiple-slot-options-passed-as-list-to-direct-slot-definition-class) ; fix with fix-slot-initargs
+ (:reinitialize-instance-calls-finalize-inheritance)
+ (:setf-class-name-calls-reinitialize-instance)
+ (:slot-definition fixed)
+ (:standard-slot-definition fixed)
+ (:subclasses-of-direct-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-effective-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-accessor-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-direct-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-effective-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-generic-function-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-reader-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-writer-method-do-not-inherit-exported-slots))
+
+:openmcl
+((:add-method-calls-compute-discriminating-function)
+ (:compute-applicable-methods-using-classes)
+ (:default-superclass-for-funcallable-standard-class-is-funcallable-standard-object)
+ (:defmethod-calls-generic-function-method-class)
+ (:defmethod-calls-make-method-lambda)
+ (:discriminating-functions-can-be-closures)
+ (:discriminating-functions-can-be-funcalled)
+ (:funcallable-standard-object)
+ (:function-invocation-calls-compute-applicable-methods)
+ (:function-invocation-calls-compute-applicable-methods-using-classes)
+ (:function-invocation-calls-compute-effective-method)
+ (:generic-functions-can-be-empty)
+ (:initialize-instance-calls-compute-discriminating-function)
+ (:make-method-lambda)
+ (:method-functions-take-processed-parameters)
+ (:method-lambdas-are-processed)
+ (:reinitialize-instance-calls-compute-discriminating-function)
+ (:reinitialize-lambda-list-reinitializes-argument-precedence-order)
+ (:remove-method-calls-compute-discriminating-function)
+; ---
+ (:compute-slots-requested-slot-order-honoured)
+ (:eql-specializer fixed)
+ (:reinitialize-instance-calls-finalize-inheritance)
+ (:slot-definition-documentation fixed)
+ (:subclasses-of-direct-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-effective-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-generic-function-do-not-inherit-exported-slots)
+ (:subclasses-of-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-accessor-method-do-not-inherit-exported-slot)
+ (:subclasses-of-standard-direct-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-effective-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-generic-function-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-reader-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-accessor-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-writer-method-do-not-inherit-exported-slots))
+
+:sbcl 0.9.16-1.0.10
+#| all features implemented |#
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/features.txt
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/features.txt 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/features.txt 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,225 @@
+Features that don't adhere to AMOP in various CLOS MOP implementations, and whether and how they are resolved in Closer to MOP.
+
+Allegro Common Lisp 7.0
+
+- CLASS-DIRECT-DEFAULT-INITARGS and CLASS-DEFAULT-INITARGS don't return canonicalized default initargs as specified. Not fixed.
+- COMPUTE-DEFAULT-INITARGS takes more parameters than specified. Not fixed. Conditionalize on #+allegro for your own methods instead.
+- FUNCALLABLE-STANDARD-OBJECT is not used as the default superclass for classes with :metaclass FUNCALLABLE-STANDARD-CLASS.
+- DEFGENERIC does not call FIND-METHOD-COMBINATION. Not fixed.
+- DEFMETHOD doesn't call MAKE-METHOD-LAMBDA. Not fixed.
+- The dependent protocol for generic functions doesn't work fully. Fixed.
+- The function invocation protocol doesn't call COMPUTE-APPLICABLE-METHODS, COMPUTE-APPLICABLE-METHODS-USING-CLASSES and COMPUTE-EFFECTIVE-METHOD. Not fixed.
+- The :ALLOCATION type cannot be extended. Fixed.
+- MAKE-METHOD-LAMBDA is not provided. Not fixed.
+- Method functions don't take parameters as specified in AMOP, but instead just the parameters that the generic function receives. Not fixed.
+- The defmethod form does not accept multiple qualifiers. Not fixed.
+- REINITIALIZE-INSTANCE doesn't determine a new discriminating function. Fixed.
+- (SETF CLASS-NAME) and (SETF GENERIC-FUNCTION-NAME) do not use REINITIALIZE-INSTANCE for changing the names. Not fixed.
+- SLOT-BOUNDP-USING-CLASS and SLOT-MAKUNBOUND-USING-CLASS are not specialized on slot definition metaobjects, but on symbols. Fixed.
+- STANDARD-CLASS and FUNCALLABLE-STANDARD-CLASS are not compatible. Not fixed.
+- VALIDATE-SUPERCLASS doesn't recognize T as a valid superclass. Not fixed.
+- Subclasses of BUILT-IN-CLASS, FORWARD-REFERENCED-CLASS, FUNCALLABLE-STANDARD-CLASS, METHOD-COMBINATION, STANDARD-ACCESSOR-METHOD, STANDARD-CLASS, STANDARD-DIRECT-SLOT-DEFINITION, STANDARD-EFFECTIVE-SLOT-DEFINITION, STANDARD-GENERIC-FUNCTION, STANDARD-METHOD, STANDARD-READER-METHOD, STANDARD-SLOT-DEFINITION and STANDARD-WRITER-METHOD will inherit slots whose names are exported symbols and/or accessible in the package common-lisp-user. Not fixed.
+
+Allegro Common Lisp 8.0
+
+- CLASS-DIRECT-DEFAULT-INITARGS and CLASS-DEFAULT-INITARGS don't return canonicalized default initargs as specified. Not fixed.
+- COMPUTE-DEFAULT-INITARGS takes more parameters than specified. Not fixed. Conditionalize on #+allegro for your own methods instead.
+- FUNCALLABLE-STANDARD-OBJECT is not used as the default superclass for classes with :metaclass FUNCALLABLE-STANDARD-CLASS.
+- DEFGENERIC does not call FIND-METHOD-COMBINATION. Not fixed.
+- DEFMETHOD doesn't call MAKE-METHOD-LAMBDA. Not fixed.
+- The dependent protocol for generic functions doesn't work fully. Fixed.
+- The function invocation protocol doesn't call COMPUTE-APPLICABLE-METHODS, COMPUTE-APPLICABLE-METHODS-USING-CLASSES and COMPUTE-EFFECTIVE-METHOD. Not fixed.
+- The :ALLOCATION type cannot be extended. Fixed.
+- MAKE-METHOD-LAMBDA is not provided. Not fixed.
+- Method functions don't take parameters as specified in AMOP, but instead just the parameters that the generic function receives. Not fixed.
+- REINITIALIZE-INSTANCE doesn't determine a new discriminating function. Fixed.
+- (SETF CLASS-NAME) and (SETF GENERIC-FUNCTION-NAME) do not use REINITIALIZE-INSTANCE for changing the names. Not fixed.
+- SLOT-BOUNDP-USING-CLASS and SLOT-MAKUNBOUND-USING-CLASS are not specialized on slot definition metaobjects, but on symbols. Fixed.
+- STANDARD-CLASS and FUNCALLABLE-STANDARD-CLASS are not compatible. Not fixed.
+- VALIDATE-SUPERCLASS doesn't recognize T as a valid superclass. Not fixed.
+- Subclasses of BUILT-IN-CLASS, FORWARD-REFERENCED-CLASS, FUNCALLABLE-STANDARD-CLASS, METHOD-COMBINATION, STANDARD-ACCESSOR-METHOD, STANDARD-CLASS, STANDARD-DIRECT-SLOT-DEFINITION, STANDARD-EFFECTIVE-SLOT-DEFINITION, STANDARD-GENERIC-FUNCTION, STANDARD-METHOD, STANDARD-READER-METHOD, STANDARD-SLOT-DEFINITION and STANDARD-WRITER-METHOD will inherit slots whose names are exported symbols and/or accessible in the package common-lisp-user. Not fixed.
+
+Allegro Common Lisp 8.1
+
+- CLASS-DIRECT-DEFAULT-INITARGS and CLASS-DEFAULT-INITARGS don't return canonicalized default initargs as specified. Not fixed.
+- COMPUTE-DEFAULT-INITARGS takes more parameters than specified. Not fixed. Conditionalize on #+allegro for your own methods instead.
+- FUNCALLABLE-STANDARD-OBJECT is not used as the default superclass for classes with :metaclass FUNCALLABLE-STANDARD-CLASS.
+- DEFGENERIC does not call FIND-METHOD-COMBINATION. Not fixed.
+- DEFMETHOD doesn't call MAKE-METHOD-LAMBDA. Not fixed.
+- The dependent protocol for generic functions doesn't work fully. Fixed.
+- The function invocation protocol doesn't call COMPUTE-APPLICABLE-METHODS, COMPUTE-APPLICABLE-METHODS-USING-CLASSES and COMPUTE-EFFECTIVE-METHOD. Not fixed.
+- The :ALLOCATION type cannot be extended. Fixed.
+- MAKE-METHOD-LAMBDA is not provided. Not fixed.
+- Method functions don't take parameters as specified in AMOP, but instead just the parameters that the generic function receives. Not fixed.
+- REINITIALIZE-INSTANCE doesn't determine a new discriminating function. Fixed.
+- (SETF CLASS-NAME) and (SETF GENERIC-FUNCTION-NAME) do not use REINITIALIZE-INSTANCE for changing the names. Not fixed.
+- SLOT-MAKUNBOUND-USING-CLASS is not specialized on slot definition metaobjects, but on symbols. Fixed.
+- STANDARD-CLASS and FUNCALLABLE-STANDARD-CLASS are not compatible. Not fixed.
+- VALIDATE-SUPERCLASS doesn't recognize T as a valid superclass. Not fixed.
+- Subclasses of BUILT-IN-CLASS, FORWARD-REFERENCED-CLASS, FUNCALLABLE-STANDARD-CLASS, METHOD-COMBINATION, STANDARD-ACCESSOR-METHOD, STANDARD-CLASS, STANDARD-DIRECT-SLOT-DEFINITION, STANDARD-EFFECTIVE-SLOT-DEFINITION, STANDARD-GENERIC-FUNCTION, STANDARD-METHOD, STANDARD-READER-METHOD, STANDARD-SLOT-DEFINITION and STANDARD-WRITER-METHOD will inherit slots whose names are exported symbols and/or accessible in the package common-lisp-user. Not fixed.
+
+CLisp 2.35 and 2.36
+
+None of the incompatibilities in CLisp are fixed.
+
+- Methods are not initialized with :function.
+- ADD-METHOD, REMOVE-METHOD, INITIALIZE-INSTANCE and REINITIALIZE-INSTANCE do not determine a new discriminating function. This is postponed until function invocation instead, so shouldn't be a problem in practice.
+- The slot order requested by a primary method for COMPUTE-SLOTS is not honoured by this MOP.
+- DEFMETHOD does not call MAKE-METHOD-LAMBDA.
+- The :ALLOCATION type cannot be extended. Not fixed.
+- A FORWARD-REFERENCED-CLASS is not changed via CHANGE-CLASS (but is correctly reinitialized via REINITIALIZE-INSTANCE).
+- MAKE-METHOD-LAMBDA is not provided.
+- REINITIALIZE-INSTANCE of a class metaobject doesn't invoke FINALIZE-INHERITANCE again. Not fixed.
+- Subclasses of METHOD-COMBINATION will inherit slots whose names are exported symbols and/or accessible in the package common-lisp-user. Not fixed.
+
+CLisp 2.37 - 2.39
+
+None of the incompatibilities in CLisp are fixed.
+
+- Methods are not initialized with :function.
+- ADD-METHOD, REMOVE-METHOD, INITIALIZE-INSTANCE and REINITIALIZE-INSTANCE do not determine a new discriminating function. This is postponed until function invocation instead, so shouldn't be a problem in practice.
+- The slot order requested by a primary method for COMPUTE-SLOTS is not honoured by this MOP.
+- DEFMETHOD does not call MAKE-METHOD-LAMBDA.
+- A FORWARD-REFERENCED-CLASS is not changed via CHANGE-CLASS (but is correctly reinitialized via REINITIALIZE-INSTANCE).
+- MAKE-METHOD-LAMBDA is not provided.
+- REINITIALIZE-INSTANCE of a class metaobject doesn't invoke FINALIZE-INHERITANCE again. Not fixed.
+- Subclasses of METHOD-COMBINATION will inherit slots whose names are exported symbols and/or accessible in the package common-lisp-user. Not fixed.
+
+CLisp 2.40 and 2.41
+
+None of the incompatibilities in CLisp are fixed.
+
+- Methods are not initialized with :function.
+- ADD-METHOD, REMOVE-METHOD, INITIALIZE-INSTANCE and REINITIALIZE-INSTANCE do not determine a new discriminating function. This is postponed until function invocation instead, so shouldn't be a problem in practice.
+- The slot order requested by a primary method for COMPUTE-SLOTS is not honoured by this MOP.
+- DEFMETHOD does not call MAKE-METHOD-LAMBDA.
+- A FORWARD-REFERENCED-CLASS is not changed via CHANGE-CLASS (but is correctly reinitialized via REINITIALIZE-INSTANCE).
+- MAKE-METHOD-LAMBDA is not provided.
+- Subclasses of METHOD-COMBINATION will inherit slots whose names are exported symbols and/or accessible in the package common-lisp-user. Not fixed.
+
+CMUCL 19c, 19d
+
+- CLASS-DIRECT-DEFAULT-INITARGS and CLASS-DEFAULT-INITARGS don't return canonicalized default initargs as specified. Not fixed.
+- Accessor methods are not initialized with :function, :lambda-list, :slot-definition and :specializers. Fixed.
+- Classes cannot be anonymous. Fixed.
+- Class initialization doesn't call READER-METHOD-CLASS and WRITER-METHOD-CLASS for accessor methods. Fixed.
+- The object returned by compute-discriminating-function cannot be a closure. Likewise, the second parameter to set-funcallable-instance-function cannot be a closure, but only a "pure" function/thunk. Not fixed.
+- Effective slot definitions are not initialized with :documentation, and EFFECTIVE-SLOT-DEFINITION-CLASS also doesn't receive that initarg. Not fixed.
+- Calling DOCUMENTATION on effective slot definition metaobjects don't return their documentation as specified in ANSI Common Lisp. Fixed.
+- Methods are not initialized with :function. Not fixed.
+- Multiple slot options are not passed as lists to DIRECT-SLOT-DEFINITION-CLASS. Not fixed, but use FIX-SLOT-INITARGS as a workaround.
+- REINITIALIZE-INSTANCE doesn't determine a new discriminating function. Fixed.
+- REINITIALIZE-INSTANCE of a class metaobject doesn't invoke FINALIZE-INHERITANCE again. Not fixed.
+- (SETF CLASS-NAME) and (SETF GENERIC-FUNCTION-NAME) do not use REINITIALIZE-INSTANCE for changing the names. Fixed.
+- STANDARD-CLASS and FUNCALLABLE-STANDARD-CLASS are not compatible. Not fixed.
+- Subclasses of BUILT-IN-CLASS, CLASS, DIRECT-SLOT-DEFINITION, EFFECTIVE-SLOT-DEFINITION, EQL-SPECIALIZER, FORWARD-REFERENCED-CLASS, FUNCALLABLE-STANDARD-CLASS, SLOT-DEFINITION, SPECIALIZER, STANDARD-ACCESSOR-METHOD, STANDARD-CLASS, STANDARD-DIRECT-SLOT-DEFINITION, STANDARD-EFFECTIVE-SLOT-DEFINITION, STANDARD-GENERIC-FUNCTION, STANDARD-METHOD, STANDARD-READER-METHOD, STANDARD-SLOT-DEFINITION and STANDARD-WRITER-METHOD will inherit slots whose names are exported symbols and/or accessible in the package common-lisp-user. Not fixed.
+
+LispWorks, 4.4.5, 4.4.6, Personal and Professional Editions
+
+- CLASS-DIRECT-DEFAULT-INITARGS and CLASS-DEFAULT-INITARGS don't return canonicalized default initargs as specified. Not fixed.
+- ADD-METHOD doesn't call ADD-DIRECT-METHOD and REMOVE-METHOD. Fixed.
+- ADD-METHOD, REMOVE-METHOD, INITIALIZE-INSTANCE and REINITIALIZE-INSTANCE do not determine a new discriminating function. This is postponed until function invocation instead, so shouldn't be a problem in practice.
+- Effective slot definitions are not initialized with :allocation, and EFFECTIVE-SLOT-DEFINITION-CLASS also doesn't receive that initarg. Not fixed. This information is encoded in the initarg :flags, but I don't have any detailed information about that parameter.
+- Classes are not initialized with :direct-default-initargs, but with :default-initargs. Conditionalize on #+lispworks to fix this.
+- Class reinitialization does not call REMOVE-DIRECT-SUBCLASS. Fixed.
+- COMPUTE-APPLICABLE-METHODS-USING-CLASSES doesn't exist. Not fixed.
+- COMPUTE-DEFAULT-INITARGS doesn't exist. Not fixed.
+- DEFGENERIC does not call FIND-METHOD-COMBINATION. Not fixed.
+- When classes are initialized, :direct-superclasses are by default not empty. Not fixed, but direct superclasses are automatically adjusted when you use the standard idiom for adding a new default superclass.
+- EQL-SPECIALIZER, EQL-SPECIALIZER-OBJECT and INTERN-EQL-SPECIALIZER don't exist. In LispWorks, eql specializers are lists not objects. I have provided EQL-SPECIALIZER as a type (not as a class) and EQL-SPECIALIZER-OBJECT and INTERN-EQL-SPECIALIZER to work on lists, and a class EQL-SPECIALIZER* and corresponding EQL-SPECIALIZER-OBJECT* and INTERN-EQL-SPECILAIZER* to soften the incompatibilities.
+- The :ALLOCATION type cannot be extended. Not fixed.
+- FIND-METHOD-COMBINATION doesn't exist. Fixed, but fixed version doesn't work with method combination options.
+- FUNCALLABLE-STANDARD-INSTANCE-ACCESS and STANDARD-INSTANCE-ACCESS don't exist. Not fixed.
+- The function invocation protocol doesn't call COMPUTE-APPLICABLE-METHODS and COMPUTE-APPLICABLE-METHODS-USING-CLASSES. Not fixed.
+- Generic functions are not initialized with :declarations, but with 'declare. Not fixed. Conditionalize on #+lispworks instead.
+- MAKE-METHOD-LAMBDA expects other parameters than specified. Fixed.
+- Method functions don't take parameters as specified in AMOP, but instead just the parameters that the generic function receives. Not fixed.
+- REMOVE-METHOD doesn't call REMOVE-DIRECT-METHOD. Fixed.
+- (SETF CLASS-NAME) and (SETF GENERIC-FUNCTION-NAME) do not use REINITIALIZE-INSTANCE for changing the names. Not fixed.
+- The slot methods (SLOT-VALUE-USING-CLASS, etc.) are not specialized on effective slot definitions, but on slot names. Fixed.
+- The generated accessor methods don't use the slot methods for accessing slots. Fixed. (Don't use :optimize-slot-access to deoptimize slot access, or otherwise the fixed slot access protocol doesn't work anymore!)
+- SPECIALIZER doesn't exist. Not fixed.
+- SPECIALIZER-DIRECT-GENERIC-FUNCTIONS doesn't exist. Fixed.
+- STANDARD-CLASS and FUNCALLABLE-STANDARD-CLASS are not compatible. Not fixed.
+- Subclasses of BUILT-IN-CLASS (fixed), CLASS (fixed), DIRECT-SLOT-DEFINITION, EFFECTIVE-SLOT-DEFINITION, FORWARD-REFERENCED-CLASS (fixed), FUNCALLABLE-STANDARD-CLASS (fixed), SLOT-DEFINITION, STANDARD-ACCESSOR-METHOD, STANDARD-CLASS (fixed), STANDARD-DIRECT-SLOT-DEFINITION, STANDARD-EFFECTIVE-SLOT-DEFINITION, STANDARD-GENERIC-FUNCTION, STANDARD-METHOD, STANDARD-READER-METHOD, STANDARD-SLOT-DEFINITION and STANDARD-WRITER-METHOD will inherit slots whose names are exported symbols and/or accessible in the package common-lisp-user. Not fixed, except where indicated otherwise.
+
+
+LispWorks, 5.0 and 5.0.1, Personal Edition
+LispWorks, 5.0 - 5.0.2, Professional Edition
+
+- CLASS-DIRECT-DEFAULT-INITARGS and CLASS-DEFAULT-INITARGS don't return canonicalized default initargs as specified. Not fixed.
+- ADD-METHOD, REMOVE-METHOD, INITIALIZE-INSTANCE and REINITIALIZE-INSTANCE do not determine a new discriminating function. This is postponed until function invocation instead, so shouldn't be a problem in practice.
+- COMPUTE-APPLICABLE-METHODS-USING-CLASSES doesn't exist. Not fixed.
+- COMPUTE-DEFAULT-INITARGS doesn't exist. Not fixed.
+- DEFGENERIC does not call FIND-METHOD-COMBINATION. Not fixed.
+- EQL-SPECIALIZER, EQL-SPECIALIZER-OBJECT and INTERN-EQL-SPECIALIZER don't exist. In LispWorks, eql specializers are lists not objects. I have provided EQL-SPECIALIZER as a type (not as a class) and EQL-SPECIALIZER-OBJECT and INTERN-EQL-SPECIALIZER to work on lists, and a class EQL-SPECIALIZER* and corresponding EQL-SPECIALIZER-OBJECT* and INTERN-EQL-SPECILAIZER* to soften the incompatibilities.
+- The :ALLOCATION type cannot be extended. Not fixed.
+- FIND-METHOD-COMBINATION doesn't exist. Fixed, but fixed version doesn't work with method combination options.
+- FUNCALLABLE-STANDARD-INSTANCE-ACCESS and STANDARD-INSTANCE-ACCESS don't exist. Not fixed.
+- The function invocation protocol doesn't call COMPUTE-APPLICABLE-METHODS and COMPUTE-APPLICABLE-METHODS-USING-CLASSES. Not fixed.
+- MAKE-METHOD-LAMBDA expects other parameters than specified. Fixed.
+- Method functions don't take parameters as specified in AMOP, but instead just the parameters that the generic function receives. Not fixed.
+- The slot methods (SLOT-VALUE-USING-CLASS, etc.) are not specialized on effective slot definitions, but on slot names. Fixed.
+- The generated accessor methods don't use the slot methods for accessing slots. Fixed. (Don't use :optimize-slot-access to deoptimize slot access, or otherwise the fixed slot access protocol doesn't work anymore!)
+- SPECIALIZER doesn't exist. Not fixed.
+- SPECIALIZER-DIRECT-GENERIC-FUNCTIONS doesn't exist. Fixed.
+- STANDARD-CLASS and FUNCALLABLE-STANDARD-CLASS are not compatible. Not fixed.
+- Subclasses of BUILT-IN-CLASS (fixed), CLASS (fixed), DIRECT-SLOT-DEFINITION, EFFECTIVE-SLOT-DEFINITION, FORWARD-REFERENCED-CLASS (fixed), FUNCALLABLE-STANDARD-CLASS (fixed), SLOT-DEFINITION, STANDARD-ACCESSOR-METHOD, STANDARD-CLASS (fixed), STANDARD-DIRECT-SLOT-DEFINITION, STANDARD-EFFECTIVE-SLOT-DEFINITION, STANDARD-GENERIC-FUNCTION, STANDARD-METHOD, STANDARD-READER-METHOD, STANDARD-SLOT-DEFINITION and STANDARD-WRITER-METHOD will inherit slots whose names are exported symbols and/or accessible in the package common-lisp-user. Not fixed, except where indicated otherwise.
+
+
+MCL 5.1
+
+In MCL, generic functions work completely differently than specified. The specific incompatibilities are not listed and are not fixed.
+
+- The slot order requested by a primary method for COMPUTE-SLOTS is not honoured by this MOP. Not fixed.
+- DIRECT-SLOT-DEFINITION, EFFECTIVE-SLOT-DEFINITION, EQL-SPECIALIZER, SLOT-DEFINITION and STANDARD-SLOT-DEFINITION are not exported. Fixed.
+- When classes are initialized, :direct-superclasses are by default not empty. Not fixed, but direct superclasses are automatically adjusted when you use the standard idiom for adding a new default superclass.
+- The :ALLOCATION type cannot be extended. Not fixed.
+- Multiple slot options are not passed as lists to DIRECT-SLOT-DEFINITION-CLASS. Not fixed, but use FIX-SLOT-INITARGS as a workaround.
+- (SETF CLASS-NAME) doesn't use REINITIALIZE-INSTANCE for changing the names. Fixed.
+- REINITIALIZE-INSTANCE of a class metaobject doesn't invoke FINALIZE-INHERITANCE again. Not fixed.
+- Subclasses of DIRECT-SLOT-DEFINITION, EFFECTIVE-SLOT-DEFINITION, SLOT-DEFINITION, STANDARD-ACCESSOR-METHOD, STANDARD-DIRECT-SLOT-DEFINITION, STANDARD-EFFECTIVE-SLOT-DEFINITION, STANDARD-GENERIC-FUNCTION, STANDARD-METHOD, STANDARD-READER-METHOD, STANDARD-SLOT-DEFINITION and STANDARD-WRITER-METHOD will inherit slots whose names are exported symbols and/or accessible in the package common-lisp-user. Not fixed.
+
+OpenMCL 1.0
+
+In OpenMCL, generic functions work completely differently than specified. The specific incompatibilities are not listed and are not fixed.
+
+- The slot order requested by a primary method for COMPUTE-SLOTS is not honoured by this MOP. Not fixed.
+- EQL-SPECIALIZER is not exported. Fixed.
+- DOCUMENTATION doesn't return the documentation strings for slot definition metaobjects. Fixed.
+- REINITIALIZE-INSTANCE of a class metaobject doesn't invoke FINALIZE-INHERITANCE again. Not fixed.
+- Subclasses of DIRECT-SLOT-DEFINITION, EFFECTIVE-SLOT-DEFINITION, GENERIC-FUNCTION, SLOT-DEFINITION, STANDARD-ACCESSOR-METHOD, STANDARD-DIRECT-SLOT-DEFINITION, STANDARD-EFFECTIVE-SLOT-DEFINITION, STANDARD-GENERIC-FUNCTION, STANDARD-METHOD, STANDARD-READER-METHOD, STANDARD-SLOT-DEFINITION and STANDARD-WRITER-METHOD will inherit slots whose names are exported symbols and/or accessible in the package common-lisp-user. Not fixed.
+
+SBCL 0.9.16 - 1.0.10
+
+All features implemented.
+
+
+Summary:
+
+- CLASS-DIRECT-DEFAULT-INITARGS and CLASS-DEFAULT-INITARGS exist, but don't work as expected in Allegro Common Lisp, CMUCL and LispWorks.
+- If you specialize COMPUTE-DEFAULT-INITAGS, conditionalize for the extra parameters in Allegro Common Lisp.
+- In Allegro Common Lisp, FUNCALLABLE-STANDARD-OBJECT is not used as the default superclass for classes with :metaclass FUNCALLABLE-STANDARD-CLASS.
+- In CMUCL, the object returned by compute-discriminating-function cannot be a closure. Likewise, the second parameter to set-funcallable-instance-function cannot be a closure, but only a "pure" function/thunk.
+- In CLisp, MCL and OpenMCL, the slot order requested by a primary method for COMPUTE-SLOTS is not honoured by the respective MOPs.
+- Don't rely on FIND-METHOD-COMBINATION to do its job correctly, only when you don't provide method combination options.
+- MAKE-METHOD-LAMBDA only works in CMUCL and SBCL as specified (but make sure that the respective generic function and method metaobject classes and make-method-lambda definitions are part of your compilation enviroment). MAKE-METHOD-LAMBDA also works in LispWorks, but the returned lambda expressions don't adhere to the AMOP specification (which may be good enough for your purposes).
+- Specialize the methods for the dependent protocol on the class or generic function metaobject class. The example in AMOP doesn't do this but that is fragile code.
+- Don't rely on methods being initialized with the specified initargs from inside the MOP.
+- CLisp doesn't change a FORWARD-REFERENCED-CLASS via CHANGE-CLASS. Apart from that, FORWARD-REFERENCED-CLASS works reliably across all MOPs.
+- Effective slot definitions and EFFECTIVE-SLOT-DEFINITION-CLASS don't receive :documentation in CMUCL, and no :allocation (!) in LispWorks before 5.0.
+- If you specialize DIRECT-SLOT-DEFINITION-CLASS, use FIX-SLOT-INITARGS in portable code.
+- If you want to use :ALLOCATION types other than :CLASS or :INSTANCE, you cannot use CLisp before 2.37, LispWorks or MCL. Only Allegro Common Lisp, CLisp from 2.37 on, CMUCL, OpenMCL and SBCL support this.
+- In Allegro, CMUCL and LispWorks, STANDARD-CLASS and FUNCALLABLE-STANDARD-CLASS are not compatible.
+- The function invocation protocol only works in CMUCL, SBCL and CLisp.
+- If you need to see :direct-default-initargs when classes are initialized, conditionalize on #+lispworks to receive :default-initargs instead for LispWorks version before 5.0.
+- COMPUTE-DEFAULT-INITARGS doesn't exist (and isn't called) in LispWorks.
+- In LispWorks, eql specializers are lists.
+- FUNCALLABLE-STANDARD-INSTANCE-ACCESS and STANDARD-INSTANCE-ACCESS doesn't exist / should not be used in LispWorks.
+- In CLisp before version 2.40, and in CMUCL, MCL and OpenMCL, the reinitialization of a class metaobject does not lead to a call of FINALIZE-INHERITANCE, so methods defined on FINALIZE-INHERITANCE won't be called again in that case.
+- If you need to see :declarations when generic functions are initialized, conditionalize on #+lispworks to receive 'declare instead for LispWorks versions before 5.0. (Actually, AMOP and ANSI Common Lisp diverge in this regard. AMOP specifies that :declarations is used whereas ANSI Common Lisp specifies that 'declare is used. Since most MOP implementations adhere to AMOP in this regard, I have also chosen that path.)
+- In Allegro Common Lisp and LispWorks, method functions take the original parameters that a generic function has received.
+- In LispWorks before 5.0, the class SPECIALIZER doesn't exist.
+- If you need to rely on the generic function protocols, don't use MCL or OpenMCL (or be very careful - some minor things work there as specified).
+- The declarations for a generic function cannot be inspected in MCL.
+- All implementations define slots on various specified metaobject classes that are exported from some package and/or accessible in the package common-lisp-user. Only sbcl is safe from this, and clisp is relatively safe in that it does that only for the class METHOD-COMBINATION.
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/lispworks/closer-mop-packages.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/lispworks/closer-mop-packages.lisp 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/lispworks/closer-mop-packages.lisp 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,194 @@
+(in-package :cl-user)
+
+(defpackage #:closer-mop
+ (:use #:common-lisp #:lispworks)
+ (:nicknames #:c2mop)
+
+ (:shadow
+ #:defclass #:defgeneric #:defmethod
+ #:ensure-generic-function
+ #:standard-class #:standard-generic-function)
+ (:export
+ #:defclass #:defgeneric #:defmethod
+ #:ensure-generic-function
+ #:standard-class #:standard-generic-function)
+
+ (:import-from #:clos
+
+ #:direct-slot-definition
+ #:effective-slot-definition
+ #-lispworks #:eql-specializer
+ #:forward-referenced-class
+ #-lispworks #:funcallable-standard-class
+ #+lispworks5.0 #:funcallable-standard-object
+ #:metaobject
+ #:slot-definition
+ #-lispworks #:specializer
+ #:standard-accessor-method
+ #:standard-direct-slot-definition
+ #:standard-effective-slot-definition
+ #:standard-reader-method
+ #:standard-slot-definition
+ #:standard-writer-method
+
+ #-lispworks4.3 #:accessor-method-slot-definition
+ #:add-dependent
+ #:add-direct-method
+ #:add-direct-subclass
+ #:class-default-initargs
+ #:class-direct-default-initargs
+ #:class-direct-slots
+ #:class-direct-subclasses
+ #:class-direct-superclasses
+ #:class-finalized-p
+ #:class-precedence-list
+ #:class-prototype
+ #:class-slots
+ #-lispworks #:compute-applicable-methods-using-classes
+ #:compute-class-precedence-list
+ #-lispworks #:compute-default-initargs
+ #:compute-discriminating-function
+ #:compute-effective-method
+ #:compute-effective-slot-definition
+ #:compute-slots
+ #:direct-slot-definition-class
+ #:effective-slot-definition-class
+ #:ensure-class
+ #:ensure-class-using-class
+ #:ensure-generic-function-using-class
+ #-lispworks #:eql-specializer-object
+ #:extract-lambda-list
+ #:extract-specializer-names
+ #:finalize-inheritance
+ #-lispworks #:find-method-combination
+ #-lispworks #:funcallable-standard-instance-access
+ #:generic-function-argument-precedence-order
+ #:generic-function-declarations
+ #:generic-function-lambda-list
+ #:generic-function-method-class
+ #:generic-function-method-combination
+ #:generic-function-methods
+ #:generic-function-name
+ #-lispworks #:intern-eql-specializer
+ #-lispworks #:make-method-lambda
+ #:map-dependents
+ #:method-function
+ #:method-generic-function
+ #:method-lambda-list
+ #:method-specializers
+ #-lispworks4.3 #:reader-method-class
+ #:remove-dependent
+ #:remove-direct-method
+ #:remove-direct-subclass
+ #:set-funcallable-instance-function
+ #:slot-boundp-using-class
+ #:slot-definition-allocation
+ #:slot-definition-initargs
+ #:slot-definition-initform
+ #:slot-definition-initfunction
+ #:slot-definition-location
+ #:slot-definition-name
+ #:slot-definition-readers
+ #:slot-definition-writers
+ #:slot-definition-type
+ #:slot-makunbound-using-class
+ #:slot-value-using-class
+ #-lispworks #:specializer-direct-generic-functions
+ #:specializer-direct-methods
+ #-lispworks #:standard-instance-access
+ #:update-dependent
+ #:validate-superclass
+ #-lispworks4.3 #:writer-method-class)
+
+ (:export
+ #:direct-slot-definition
+ #:effective-slot-definition
+ #:eql-specializer
+ #+lispworks #:eql-specializer*
+ #:forward-referenced-class
+ #:funcallable-standard-class
+ #:funcallable-standard-object
+ #:metaobject
+ #:slot-definition
+ #-lispworks #:specializer
+ #:standard-accessor-method
+ #:standard-direct-slot-definition
+ #:standard-effective-slot-definition
+ #:standard-reader-method
+ #:standard-slot-definition
+ #:standard-writer-method
+
+ #:ensure-finalized
+ #:ensure-method
+ #:fix-slot-initargs
+ #:required-args
+
+ #-lispworks4.3 #:accessor-method-slot-definition
+ #:add-dependent
+ #:add-direct-method
+ #:add-direct-subclass
+ #:class-default-initargs
+ #:class-direct-default-initargs
+ #:class-direct-slots
+ #:class-direct-subclasses
+ #:class-direct-superclasses
+ #:class-finalized-p
+ #:class-precedence-list
+ #:class-prototype
+ #:class-slots
+ #-lispworks #:compute-applicable-methods-using-classes
+ #:compute-class-precedence-list
+ #-lispworks #:compute-default-initargs
+ #:compute-discriminating-function
+ #:compute-effective-method
+ #:compute-effective-slot-definition
+ #:compute-slots
+ #:direct-slot-definition-class
+ #:effective-slot-definition-class
+ #:ensure-class
+ #:ensure-class-using-class
+ #:ensure-generic-function-using-class
+ #:eql-specializer-object
+ #:extract-lambda-list
+ #:extract-specializer-names
+ #:finalize-inheritance
+ #:find-method-combination
+ #-lispworks #:funcallable-standard-instance-access
+ #:generic-function-argument-precedence-order
+ #:generic-function-declarations
+ #:generic-function-lambda-list
+ #:generic-function-method-class
+ #:generic-function-method-combination
+ #:generic-function-methods
+ #:generic-function-name
+ #:intern-eql-specializer
+ #+lispworks #:intern-eql-specializer*
+ #:make-method-lambda
+ #:map-dependents
+ #:method-function
+ #:method-generic-function
+ #:method-lambda-list
+ #:method-specializers
+ #-lispworks4.3 #:reader-method-class
+ #:remove-dependent
+ #:remove-direct-method
+ #:remove-direct-subclass
+ #:set-funcallable-instance-function
+ #:slot-boundp-using-class
+ #:slot-definition-allocation
+ #:slot-definition-initargs
+ #:slot-definition-initform
+ #:slot-definition-initfunction
+ #:slot-definition-location
+ #:slot-definition-name
+ #:slot-definition-readers
+ #:slot-definition-writers
+ #:slot-definition-type
+ #:slot-makunbound-using-class
+ #:slot-value-using-class
+ #:specializer-direct-generic-functions
+ #:specializer-direct-methods
+ #-lispworks #:standard-instance-access
+ #:update-dependent
+ #:validate-superclass
+ #-lispworks4.3 #:writer-method-class))
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/lispworks/closer-mop.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/lispworks/closer-mop.lisp 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/lispworks/closer-mop.lisp 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,605 @@
+(in-package :closer-mop)
+
+;; Some utility functions.
+
+(defun required-args (lambda-list &optional (collector #'identity))
+ (loop for arg in lambda-list
+ until (member arg lambda-list-keywords)
+ collect (funcall collector arg)))
+
+(defun ensure-finalized (class &optional (errorp t))
+ (if (typep class 'class)
+ (unless (class-finalized-p class)
+ (finalize-inheritance class))
+ (when errorp (error "~S is not a class." class)))
+ class)
+
+;; We need a new standard-generic-function for various things.
+
+(cl:defclass standard-generic-function (cl:standard-generic-function)
+ ((initial-methods :initform '()))
+ (:metaclass clos:funcallable-standard-class))
+
+;; The following ensures that the new standard-generic-function is used.
+
+(defun ensure-generic-function
+ (name &rest args
+ &key (generic-function-class 'standard-generic-function)
+ &allow-other-keys)
+ (declare (dynamic-extent args))
+ (when (fboundp name)
+ (let ((function (fdefinition name)))
+ (unless (typep function 'generic-function)
+ (cerror "Discard existing definition and create generic function."
+ "~S is already fbound, but not as a generic function." name)
+ (fmakunbound name))))
+ (if (fboundp name)
+ (let ((function (fdefinition name)))
+ (apply #'ensure-generic-function-using-class
+ function name args))
+ (apply #'ensure-generic-function-using-class nil name
+ :generic-function-class generic-function-class
+ args)))
+
+;; We need a new standard-class for various things.
+
+(cl:defclass standard-class (cl:standard-class)
+ ())
+
+;; validate-superclass for metaclass classes is a little bit
+;; more tricky than for class metaobject classes because
+;; we don't want to make all standard-classes compatible to
+;; each other.
+
+;; Our validate-superclass may get passed a class-prototype
+;; as its second argument, so don't expect its readers to
+;; yield useful information. (In ANSI parlance, "the
+;; consequences are undefined...")
+
+(cl:defmethod validate-superclass
+ ((class standard-class)
+ (superclass cl:standard-class))
+ (or (when (eq (class-of class) (find-class 'standard-class))
+ (or (eq (class-of superclass) (find-class 'cl:standard-class))
+ (eq (class-of superclass) (find-class 'standard-class))))
+ (call-next-method)
+ (when (eq (class-of superclass) (find-class 'cl:standard-class))
+ (validate-superclass class (class-prototype (find-class 'standard-class))))))
+
+;; The following macro ensures that the new standard-class is used
+;; by default. It would have been useful to fix other deficiencies
+;; in a complete redefinition of defclass, but there is no portable
+;; way to ensure the necessary compile-time effects as specified
+;; by ANSI Common Lisp. Therefore, we just expand to the original
+;; cl:defclass.
+
+(defmacro defclass (name (&rest supers) &body options)
+ (if (member :metaclass options :key #'car)
+ `(cl:defclass ,name ,supers ,@options)
+ `(cl:defclass ,name ,supers ,@options
+ (:metaclass standard-class))))
+
+;; We need a new funcallable-standard-class for various things.
+
+(cl:defclass funcallable-standard-class (clos:funcallable-standard-class)
+ ())
+
+;; See the comment on validate-superclass for standard-class above.
+
+(cl:defmethod validate-superclass
+ ((class funcallable-standard-class)
+ (superclass clos:funcallable-standard-class))
+ (or (when (eq (class-of class) (find-class 'funcallable-standard-class))
+ (or (eq (class-of superclass) (find-class 'clos:funcallable-standard-class))
+ (eq (class-of superclass) (find-class 'funcallable-standard-class))))
+ (call-next-method)
+ (when (eq (class-of superclass) (find-class 'clos:funcallable-standard-class))
+ (validate-superclass class (class-prototype (find-class 'funcallable-standard-class))))))
+
+#+lispworks5.0
+(cl:defmethod validate-superclass
+ ((class funcallable-standard-class)
+ (superclass (eql (find-class 'funcallable-standard-object))))
+ t)
+
+;; We also need a new funcallable-standard-object because the default one
+;; is not an instance of clos:funcallable-standard-class.
+
+#-lispworks5.0
+(cl:defclass funcallable-standard-object (clos:funcallable-standard-object)
+ ()
+ (:metaclass clos:funcallable-standard-class))
+
+;; The following code ensures that possibly incorrect lists of direct
+;; superclasses are corrected.
+
+#-lispworks5.0
+(defun modify-superclasses (direct-superclasses &optional (standardp t))
+ (if (null direct-superclasses)
+ (list (if standardp
+ (find-class 'standard-object)
+ (find-class 'funcallable-standard-object)))
+ (let ((standard-object (if standardp
+ (find-class 'standard-object)
+ (find-class 'clos:funcallable-standard-object))))
+ (if (eq (car (last direct-superclasses)) standard-object)
+ (if standardp
+ direct-superclasses
+ (append (butlast direct-superclasses)
+ (list (find-class 'funcallable-standard-object))))
+ (remove standard-object direct-superclasses)))))
+
+;; During class re/initialization, we take care of the following things:
+;; - Optimization of slot accessors is deactivated.
+;; - Lists of direct superclasses are corrected.
+;; - Removal of direct subclasses.
+
+(cl:defmethod initialize-instance :around
+ ((class standard-class) &rest initargs
+ #-lispworks5.0 &key
+ #-lispworks5.0 (direct-superclasses ()))
+ (declare (dynamic-extent initargs))
+ (apply #'call-next-method class
+ #-lispworks5.0 :direct-superclasses
+ #-lispworks5.0 (modify-superclasses direct-superclasses)
+ :optimize-slot-access nil
+ initargs))
+
+(cl:defmethod reinitialize-instance :around
+ ((class standard-class) &rest initargs
+ #-lispworks5.0 &key
+ #-lispworks5.0 (direct-superclasses () direct-superclasses-p))
+ (declare (dynamic-extent initargs))
+ #-lispworks5.0
+ (progn
+ (when direct-superclasses-p
+ (setq direct-superclasses (modify-superclasses direct-superclasses))
+ (loop for superclass in (copy-list (class-direct-superclasses class))
+ unless (member superclass direct-superclasses)
+ do (remove-direct-subclass superclass class)))
+ (if direct-superclasses-p
+ (apply #'call-next-method class
+ :direct-superclasses direct-superclasses
+ :optimize-slot-access nil
+ initargs)
+ (apply #'call-next-method class
+ :optimize-slot-access nil
+ initargs)))
+ #+lispworks5.0
+ (apply #'call-next-method class
+ :optimize-slot-access nil
+ initargs))
+
+(cl:defmethod initialize-instance :around
+ ((class funcallable-standard-class) &rest initargs
+ #-lispworks5.0 &key
+ #-lispworks5.0 (direct-superclasses ()))
+ (declare (dynamic-extent initargs))
+ (apply #'call-next-method class
+ #-lispworks5.0 :direct-superclasses
+ #-lispworks5.0 (modify-superclasses direct-superclasses nil)
+ :optimize-slot-access nil
+ initargs))
+
+(cl:defmethod reinitialize-instance :around
+ ((class funcallable-standard-class) &rest initargs
+ #-lispworks5.0 &key
+ #-lispworks5.0 (direct-superclasses () direct-superclasses-p))
+ (declare (dynamic-extent initargs))
+ #-lispworks5.0
+ (progn
+ (when direct-superclasses-p
+ (setq direct-superclasses (modify-superclasses direct-superclasses nil))
+ (loop for superclass in (copy-list (class-direct-superclasses class))
+ unless (member superclass direct-superclasses)
+ do (remove-direct-subclass superclass class)))
+ (if direct-superclasses-p
+ (apply #'call-next-method class
+ :direct-superclasses direct-superclasses
+ :optimize-slot-access nil
+ initargs)
+ (apply #'call-next-method class
+ :optimize-slot-access nil
+ initargs)))
+ #+lispworks5.0
+ (apply #'call-next-method class
+ :optimize-slot-access nil
+ initargs))
+
+;; The following is necessary for forward-referenced-classes.
+;; Since we replace the original funcallable-standard-object with
+;; a new one, we have to prevent LispWorks from trying to use
+;; the original one when forward-ferenced-classes are resolved.
+
+#-lispworks5.0
+(cl:defmethod change-class :around
+ ((class forward-referenced-class)
+ (new-class funcallable-standard-class)
+ &rest initargs
+ &key (direct-superclasses ()))
+ (declare (dynamic-extent initargs))
+ (apply #'call-next-method class new-class
+ :optimize-slot-access nil
+ :direct-superclasses (modify-superclasses direct-superclasses nil)
+ initargs))
+
+;;; In LispWorks, the slot accessors (slot-value-using-class, etc.) are specialized
+;;; on slot names instead of effective slot definitions. In order to fix this,
+;;; we need to rewire the slot access protocol.
+
+(cl:defmethod slot-value-using-class
+ ((class standard-class) object (slot symbol))
+ (declare (optimize (speed 3) (debug 0) (safety 0)
+ (compilation-speed 0)))
+ (let ((slotd (find slot (class-slots class)
+ :test #'eq
+ :key #'slot-definition-name)))
+ (if slotd
+ (slot-value-using-class class object slotd)
+ (slot-missing class object slot 'slot-value))))
+
+(cl:defmethod slot-value-using-class
+ ((class standard-class) object (slotd standard-effective-slot-definition))
+ (declare (optimize (speed 3) (debug 0) (safety 0)
+ (compilation-speed 0)))
+ (slot-value-using-class
+ (load-time-value (class-prototype (find-class 'cl:standard-class)))
+ object
+ (slot-definition-name slotd)))
+
+(cl:defmethod (setf slot-value-using-class)
+ (new-value (class standard-class) object (slot symbol))
+ (declare (optimize (speed 3) (debug 0) (safety 0)
+ (compilation-speed 0)))
+ (let ((slotd (find slot (class-slots class)
+ :test #'eq
+ :key #'slot-definition-name)))
+ (if slotd
+ (setf (slot-value-using-class class object slotd)
+ new-value)
+ (slot-missing class object slot 'setf new-value))))
+
+(cl:defmethod (setf slot-value-using-class)
+ (new-value (class standard-class) object (slotd standard-effective-slot-definition))
+ (declare (optimize (speed 3) (debug 0) (safety 0)
+ (compilation-speed 0)))
+ (setf (slot-value-using-class
+ (load-time-value (class-prototype (find-class 'cl:standard-class)))
+ object
+ (slot-definition-name slotd))
+ new-value))
+
+(cl:defmethod slot-boundp-using-class
+ ((class standard-class) object (slot symbol))
+ (declare (optimize (speed 3) (debug 0) (safety 0)
+ (compilation-speed 0)))
+ (let ((slotd (find slot (class-slots class)
+ :test #'eq
+ :key #'slot-definition-name)))
+ (if slotd
+ (slot-boundp-using-class class object slotd)
+ (slot-missing class object slot 'slot-boundp))))
+
+(cl:defmethod slot-boundp-using-class
+ ((class standard-class) object (slotd standard-effective-slot-definition))
+ (declare (optimize (speed 3) (debug 0) (safety 0)
+ (compilation-speed 0)))
+ (slot-boundp-using-class
+ (load-time-value (class-prototype (find-class 'cl:standard-class)))
+ object
+ (slot-definition-name slotd)))
+
+(cl:defmethod slot-makunbound-using-class
+ ((class standard-class) object (slot symbol))
+ (declare (optimize (speed 3) (debug 0) (safety 0)
+ (compilation-speed 0)))
+ (let ((slotd (find slot (class-slots class)
+ :test #'eq
+ :key #'slot-definition-name)))
+ (if slotd
+ (slot-makunbound-using-class class object slotd)
+ (slot-missing class object slot 'slot-makunbound))))
+
+(cl:defmethod slot-makunbound-using-class
+ ((class standard-class) object (slotd standard-effective-slot-definition))
+ (declare (optimize (speed 3) (debug 0) (safety 0)
+ (compilation-speed 0)))
+ (slot-makunbound-using-class
+ (load-time-value (class-prototype (find-class 'cl:standard-class)))
+ object
+ (slot-definition-name slotd)))
+
+;; In LispWorks, eql specializers are lists. We cannot change this
+;; but we can soften some of the incompatibilities.
+
+(deftype eql-specializer ()
+ '(or eql-specializer*
+ (satisfies clos:eql-specializer-p)))
+
+(cl:defgeneric eql-specializer-object (eql-specializer)
+ (:method ((cons cons))
+ (if (clos:eql-specializer-p cons)
+ (cadr cons)
+ (error "~S is not an eql-specializer." cons))))
+
+(defun intern-eql-specializer (object)
+ `(eql ,object))
+
+(cl:defclass eql-specializer* (metaobject)
+ ((obj :reader eql-specializer-object
+ :initarg eso
+ :initform (error "Use intern-eql-specializer to create eql-specializers."))
+ (direct-methods :reader specializer-direct-methods
+ :accessor es-direct-methods
+ :initform ())))
+
+(defvar *eql-specializers* (make-hash-table))
+
+(defun intern-eql-specializer* (object)
+ (or (gethash object *eql-specializers*)
+ (setf (gethash object *eql-specializers*)
+ (make-instance 'eql-specializer* 'eso object))))
+
+(cl:defmethod add-direct-method ((specializer eql-specializer*) (method method))
+ (pushnew method (es-direct-methods specializer)))
+
+(cl:defmethod remove-direct-method ((specializer eql-specializer*) (method method))
+ (removef (es-direct-methods specializer) method))
+
+(cl:defgeneric specializer-direct-generic-functions (specializer)
+ (:method ((class class))
+ (remove-duplicates
+ (mapcar #'method-generic-function
+ (specializer-direct-methods class))))
+ (:method ((eql-specializer eql-specializer*))
+ (remove-duplicates
+ (mapcar #'method-generic-function
+ (specializer-direct-methods eql-specializer))))
+ (:method ((cons cons))
+ (specializer-direct-generic-functions
+ (intern-eql-specializer*
+ (eql-specializer-object cons)))))
+
+;; The following method ensures that remove-method is called.
+
+#-lispworks5.0
+(cl:defmethod add-method :before ((gf standard-generic-function) (method method))
+ (when-let (old-method (find-method gf (method-qualifiers method)
+ (method-specializers method) nil))
+ (remove-method gf old-method)))
+
+;; The following two methods ensure that add/remove-direct-method is called,
+;; and that the dependent protocol for generic function works.
+
+(cl:defmethod add-method :after ((gf standard-generic-function) (method method))
+ (loop for specializer in (method-specializers method)
+ if (consp specializer)
+ do (add-direct-method
+ (intern-eql-specializer*
+ (eql-specializer-object specializer))
+ method)
+ #-lispworks5.0 else
+ #-lispworks5.0 do
+ #-lispworks5.0 (add-direct-method specializer method))
+ #+lispworks4.3
+ (map-dependents
+ gf (lambda (dep) (update-dependent gf dep 'add-method method))))
+
+(cl:defmethod remove-method :after ((gf standard-generic-function) (method method))
+ (loop for specializer in (method-specializers method)
+ if (consp specializer)
+ do (remove-direct-method
+ (intern-eql-specializer*
+ (eql-specializer-object specializer))
+ method)
+ #-lispworks5.0 else
+ #-lispworks5.0 do
+ #-lispworks5.0 (remove-direct-method specializer method))
+ #+lispworks4.3
+ (map-dependents
+ gf (lambda (dep) (update-dependent gf dep 'remove-method method))))
+
+(cl:defgeneric find-method-combination (gf combi combi-options)
+ (:method ((gf generic-function) (combi symbol) combi-options)
+ (when combi-options
+ (error "This implementation of find-method-combination cannot handle method combination options."))
+ (clos::find-a-method-combination-type combi)))
+
+;; In LispWorks, make-method-lambda expects different arguments than those
+;; specified in AMOP. We just bridge this. The method lambda returned
+;; still doesn't conform to AMOP, but may be good enough.
+
+(cl:defgeneric make-method-lambda (gf method lambda-expression env)
+ (:method ((gf cl:standard-generic-function)
+ (method standard-method)
+ lambda-expression env)
+ (declare (ignorable env))
+ (destructuring-bind
+ (lambda (&rest args) &body body)
+ lambda-expression
+ (declare (ignore lambda))
+ (loop with documentation = :unbound
+ for (car . cdr) = body then cdr
+ while (or (stringp car)
+ (and (consp car) (eq (car car) 'declare)))
+ if (stringp car)
+ do (setf documentation
+ (if (eq documentation :unbound) car
+ (error "Too many documentation strings in lambda expression ~S."
+ lambda-expression)))
+ else append (loop for declaration in (cdr car)
+ if (eq (car declaration) 'ignore)
+ collect `(ignorable ,@(cdr declaration))
+ and collect `(dynamic-extent ,@(cdr declaration))
+ else collect declaration) into declarations
+ finally (multiple-value-bind
+ (method-lambda method-args)
+ (clos:make-method-lambda
+ gf method args declarations
+ `(progn ,car ,@cdr) env)
+ (if (eq documentation :unbound)
+ (return (values method-lambda method-args))
+ (return (values
+ `(lambda ,(cadr method-lambda)
+ ,documentation
+ ,@(cddr method-lambda))
+ method-args))))))))
+
+(defun ensure-method (gf lambda-expression
+ &key (method-class (generic-function-method-class gf))
+ (qualifiers ())
+ (lambda-list (cadr lambda-expression))
+ (specializers (required-args lambda-list (constantly (find-class 't)))))
+ (multiple-value-bind
+ (method-lambda method-args)
+ (make-method-lambda
+ gf (class-prototype method-class)
+ lambda-expression ())
+ (let ((method (apply #'make-instance
+ method-class
+ :qualifiers qualifiers
+ :lambda-list lambda-list
+ :specializers specializers
+ :function (compile nil method-lambda)
+ method-args)))
+ (add-method gf method)
+ method)))
+
+;; helper function for creating a generic function lambda list
+;; from a method lambda list.
+(defun create-gf-lambda-list (method-lambda-list)
+ (loop with stop-keywords = '#.(remove '&optional lambda-list-keywords)
+ for arg in method-lambda-list
+ until (member arg stop-keywords)
+ collect arg into gf-lambda-list
+ finally (return (let (rest)
+ (cond ((member '&key method-lambda-list)
+ (nconc gf-lambda-list '(&key)))
+ ((setq rest (member '&rest method-lambda-list))
+ (nconc gf-lambda-list (subseq rest 0 2)))
+ (t gf-lambda-list))))))
+
+;; The defmethod macro is needed in order to ensure that make-method-lambda
+;; is called. (Unfortunately, this doesn't work in the other CL implementations.)
+
+(defmacro defmethod (&whole form name &body body &environment env)
+ (loop for tail = body then (cdr tail)
+ until (listp (car tail))
+ collect (car tail) into qualifiers
+ finally
+ (destructuring-bind
+ ((&rest specialized-args) &body body) tail
+ (loop with documentation = :unbound
+ for (car . cdr) = body then cdr
+ while (or (stringp car)
+ (and (consp car) (eq (car car) 'declare)))
+ if (stringp car)
+ do (setq documentation
+ (if (eq documentation :unbound) car
+ (error "Too many documentation strings for defmethod form ~S." form)))
+ else append (cdr car) into declarations
+ finally
+ (let* ((lambda-list (extract-lambda-list specialized-args))
+ (gf-lambda-list (create-gf-lambda-list lambda-list))
+ (gf (if (fboundp name)
+ (ensure-generic-function name)
+ (ensure-generic-function name :lambda-list gf-lambda-list)))
+ (method-class (generic-function-method-class gf))
+ (lambda-expression `(lambda ,lambda-list
+ (declare ,@declarations)
+ (block ,name ,car ,@cdr))))
+ (if (equal (compute-applicable-methods
+ #'make-method-lambda
+ (list gf (class-prototype method-class)
+ lambda-expression env))
+ (list (find-method
+ #'make-method-lambda '()
+ (list (find-class 'cl:standard-generic-function)
+ (find-class 'standard-method)
+ (find-class 't)
+ (find-class 't))
+ nil)))
+ (return-from defmethod `(cl:defmethod ,@(rest form)))
+ (multiple-value-bind
+ (method-lambda method-args)
+ (make-method-lambda
+ gf (class-prototype method-class)
+ lambda-expression env)
+ (with-unique-names (gf method)
+ (return-from defmethod
+ `(let ((,gf (if (fboundp ',name)
+ (ensure-generic-function ',name)
+ (ensure-generic-function
+ ',name :lambda-list ',gf-lambda-list)))
+ (,method
+ (make-instance
+ ',method-class
+ :qualifiers ',qualifiers
+ :specializers
+ (list
+ ,@(mapcar
+ (lambda (specializer-name)
+ (typecase specializer-name
+ (symbol `(find-class ',specializer-name))
+ (cons (cond
+ ((> (length specializer-name) 2)
+ (error "Invalid specializer ~S in defmethod form ~S."
+ specializer-name form))
+ ((eq (car specializer-name) 'eql)
+ `(intern-eql-specializer ,(cadr specializer-name)))
+ (t (error "Invalid specializer ~S in defmethod form ~S."
+ specializer-name form))))
+ (t (error "Invalid specializer ~S in defmethod form ~S."
+ specializer-name form))))
+ (extract-specializer-names specialized-args)))
+ :lambda-list ',lambda-list
+ :function (function ,method-lambda)
+ ,@(unless (eq documentation :unbound)
+ (list :documentation documentation))
+ ,@method-args)))
+ (add-method ,gf ,method)
+ ,method))))))))))
+
+;; The following macro ensures that the new standard-generic-function
+;; is used by default. It also ensures that make-method-lambda is called
+;; for the default methods, by expanding into defmethod forms.
+
+(defmacro defgeneric (&whole form name (&rest args) &body options)
+ (unless (every #'consp options)
+ (error "Illegal generic functions options in defgeneric form ~S." form))
+ `(progn
+ (let ((generic-function (ignore-errors (fdefinition ',name))))
+ (when (and generic-function (typep generic-function 'standard-generic-function))
+ (loop for method in (slot-value generic-function 'initial-methods)
+ do (remove-method generic-function method))))
+ (cl:defgeneric ,name ,args
+ ,@(remove :method options :key #'car :test #'eq)
+ ,@(unless (member :generic-function-class options :key #'car :test #'eq)
+ '((:generic-function-class standard-generic-function))))
+ (let ((generic-function (fdefinition ',name)))
+ (setf (slot-value generic-function 'initial-methods)
+ (list ,@(loop for method-spec in (remove :method options :key #'car :test-not #'eq)
+ collect `(defmethod ,name ,@(cdr method-spec)))))
+ generic-function)))
+
+;; The following can be used in direct-slot-definition-class to get the correct initargs
+;; for a slot. Use it like this:
+;;
+;; (defmethod direct-slot-definition-class
+;; ((class my-standard-class) &rest initargs)
+;; (declare (dynamic-extent initargs))
+;; (destructuring-bind
+;; (&key key-of-interest &allow-other-keys)
+;; (fix-slot-initargs initargs)
+;; ...))
+
+(defvar *standard-slot-keys*
+ '(:name :documentation
+ :initargs :initform :initfunction
+ :readers :writers))
+
+(defun fix-slot-initargs (initargs)
+ initargs)
+
+(eval-when (:compile-toplevel :load-toplevel :execute)
+ (pushnew :closer-mop *features*))
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/mcl/closer-mop-packages.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/mcl/closer-mop-packages.lisp 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/mcl/closer-mop-packages.lisp 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,190 @@
+(in-package :cl-user)
+
+(defpackage #:closer-mop
+ (:use #:common-lisp #:lispworks)
+ (:nicknames #:c2mop)
+
+ #-openmcl
+ (:shadow #:defclass #:standard-class #:typep #:subtypep)
+ #-openmcl
+ (:export #:defclass #:standard-class #:typep #:subtypep)
+
+ (:import-from #:ccl
+
+ #:direct-slot-definition
+ #:effective-slot-definition
+ #:eql-specializer
+ #:forward-referenced-class
+ #:funcallable-standard-class
+ #-(or mcl openmcl) #:funcallable-standard-object
+ #:metaobject
+ #:slot-definition
+ #:specializer
+ #:standard-accessor-method
+ #:standard-direct-slot-definition
+ #:standard-effective-slot-definition
+ #:standard-reader-method
+ #:standard-slot-definition
+ #:standard-writer-method
+
+ #:accessor-method-slot-definition
+ #:add-dependent
+ #:add-direct-method
+ #:add-direct-subclass
+ #:class-default-initargs
+ #:class-direct-default-initargs
+ #:class-direct-slots
+ #:class-direct-subclasses
+ #:class-direct-superclasses
+ #:class-finalized-p
+ #:class-precedence-list
+ #:class-prototype
+ #:class-slots
+ #-(or mcl openmcl) #:compute-applicable-methods-using-classes
+ #:compute-class-precedence-list
+ #:compute-default-initargs
+ #:compute-discriminating-function
+ #:compute-effective-method
+ #:compute-effective-slot-definition
+ #:compute-slots
+ #:direct-slot-definition-class
+ #:effective-slot-definition-class
+ #:ensure-class
+ #:ensure-class-using-class
+ #:ensure-generic-function-using-class
+ #:eql-specializer-object
+ #:extract-lambda-list
+ #:extract-specializer-names
+ #:finalize-inheritance
+ #:find-method-combination
+ #:funcallable-standard-instance-access
+ #:generic-function-argument-precedence-order
+ #:generic-function-declarations
+ #:generic-function-lambda-list
+ #:generic-function-method-class
+ #:generic-function-method-combination
+ #:generic-function-methods
+ #:generic-function-name
+ #:intern-eql-specializer
+ #-(or mcl openmcl) #:make-method-lambda
+ #:map-dependents
+ #:method-function
+ #:method-generic-function
+ #:method-lambda-list
+ #:method-specializers
+ #:reader-method-class
+ #:remove-dependent
+ #:remove-direct-method
+ #:remove-direct-subclass
+ #+openmcl #:set-funcallable-instance-function
+ #:slot-boundp-using-class
+ #:slot-definition-allocation
+ #:slot-definition-initargs
+ #:slot-definition-initform
+ #:slot-definition-initfunction
+ #:slot-definition-location
+ #:slot-definition-name
+ #:slot-definition-readers
+ #:slot-definition-writers
+ #:slot-definition-type
+ #:slot-makunbound-using-class
+ #:slot-value-using-class
+ #:specializer-direct-generic-functions
+ #:specializer-direct-methods
+ #:standard-instance-access
+ #:update-dependent
+ #:validate-superclass
+ #:writer-method-class)
+
+ (:export
+ #:direct-slot-definition
+ #:effective-slot-definition
+ #:eql-specializer
+ #:forward-referenced-class
+ #:funcallable-standard-class
+ #-(or mcl openmcl) #:funcallable-standard-object
+ #:metaobject
+ #:slot-definition
+ #:specializer
+ #:standard-accessor-method
+ #:standard-direct-slot-definition
+ #:standard-effective-slot-definition
+ #:standard-reader-method
+ #:standard-slot-definition
+ #:standard-writer-method
+
+ #:ensure-finalized
+ #:ensure-method
+ #:fix-slot-initargs
+ #:required-args
+
+ #:accessor-method-slot-definition
+ #:add-dependent
+ #:add-direct-method
+ #:add-direct-subclass
+ #:class-default-initargs
+ #:class-direct-default-initargs
+ #:class-direct-slots
+ #:class-direct-subclasses
+ #:class-direct-superclasses
+ #:class-finalized-p
+ #:class-precedence-list
+ #:class-prototype
+ #:class-slots
+ #-(or mcl openmcl) #:compute-applicable-methods-using-classes
+ #:compute-class-precedence-list
+ #:compute-default-initargs
+ #:compute-discriminating-function
+ #:compute-effective-method
+ #:compute-effective-slot-definition
+ #:compute-slots
+ #:direct-slot-definition-class
+ #:effective-slot-definition-class
+ #:ensure-class
+ #:ensure-class-using-class
+ #:ensure-generic-function-using-class
+ #:eql-specializer-object
+ #:extract-lambda-list
+ #:extract-specializer-names
+ #:finalize-inheritance
+ #:find-method-combination
+ #:funcallable-standard-instance-access
+ #:generic-function-argument-precedence-order
+ #:generic-function-declarations
+ #:generic-function-lambda-list
+ #:generic-function-method-class
+ #:generic-function-method-combination
+ #:generic-function-methods
+ #:generic-function-name
+ #:intern-eql-specializer
+ #-(or mcl openmcl) #:make-method-lambda
+ #:map-dependents
+ #:method-function
+ #:method-generic-function
+ #:method-lambda-list
+ #:method-specializers
+ #:reader-method-class
+ #:remove-dependent
+ #:remove-direct-method
+ #:remove-direct-subclass
+ #+openmcl #:set-funcallable-instance-function
+ #:slot-boundp-using-class
+ #:slot-definition-allocation
+ #:slot-definition-initargs
+ #:slot-definition-initform
+ #:slot-definition-initfunction
+ #:slot-definition-location
+ #:slot-definition-name
+ #:slot-definition-readers
+ #:slot-definition-writers
+ #:slot-definition-type
+ #:slot-makunbound-using-class
+ #:slot-value-using-class
+ #:specializer-direct-generic-functions
+ #:specializer-direct-methods
+ #:standard-instance-access
+ #-openmcl #:subtypep
+ #-openmcl #:typep
+ #:update-dependent
+ #:validate-superclass
+ #:writer-method-class))
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/mcl/closer-mop.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/mcl/closer-mop.lisp 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/mcl/closer-mop.lisp 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,177 @@
+(in-package :closer-mop)
+
+;; Some utility functions.
+
+(defun required-args (lambda-list &optional (collector #'identity))
+ (loop for arg in lambda-list
+ until (member arg lambda-list-keywords)
+ collect (funcall collector arg)))
+
+(defun ensure-finalized (class &optional (errorp t))
+ (if (typep class 'class)
+ (unless (class-finalized-p class)
+ (finalize-inheritance class))
+ (when errorp (error "~S is not a class." class)))
+ class)
+
+#-openmcl
+(progn
+ ;; We need a new standard-class for various things.
+
+ (cl:defclass standard-class (cl:standard-class)
+ ())
+
+ ;; validate-superclass for metaclass classes is a little bit
+ ;; more tricky than for class metaobject classes because
+ ;; we don't want to make all standard-classes compatible to
+ ;; each other.
+
+ ;; Our validate-superclass may get passed a class-prototype
+ ;; as its second argument, so don't expect its readers to
+ ;; yield useful information. (In ANSI parlance, "the
+ ;; consequences are undefined...")
+
+ (cl:defmethod validate-superclass
+ ((class standard-class)
+ (superclass cl:standard-class))
+ (or (when (eq (class-of class) (find-class 'standard-class))
+ (or (eq (class-of superclass) (find-class 'cl:standard-class))
+ (eq (class-of superclass) (find-class 'standard-class))))
+ (call-next-method)
+ (when (eq (class-of superclass) (find-class 'cl:standard-class))
+ (validate-superclass class (class-prototype (find-class 'standard-class))))))
+
+ ;; The following macro ensures that the new standard-class is used
+ ;; by default. It would have been useful to fix other deficiencies
+ ;; in a complete redefinition of defclass, but there is no portable
+ ;; way to ensure the necessary compile-time effects as specified
+ ;; by ANSI Common Lisp. Therefore, we just expand to the original
+ ;; cl:defclass.
+
+ (defmacro defclass (name (&rest supers) &body options)
+ (if (member :metaclass options :key #'car)
+ `(cl:defclass ,name ,supers ,@options)
+ `(cl:defclass ,name ,supers ,@options
+ (:metaclass standard-class))))
+
+ ;; In MCL, the list of direct superclasses passed by the
+ ;; defclass macro is not empty, as required by AMOP, but
+ ;; instead passes the class metaobject for standard-object
+ ;; or funcallable-standard-object respectively. This makes
+ ;; replacing the default superclass for a new metaclass a bit
+ ;; more complicated. In order to avoid the tricky bits in user
+ ;; code, the new standard-class adjusts possible incorrect
+ ;; direct superclasses by adding or removing the metaobject
+ ;; for standard-object as needed before passing them to
+ ;; the original standard-class. In user code, just use the
+ ;; idiom suggested by AMOP to APPEND your new default superclass
+ ;; to the list of direct superclasses.
+
+ (defun modify-superclasses (direct-superclasses)
+ (if (null direct-superclasses)
+ (list (find-class 'standard-object))
+ (let ((standard-object (find-class 'standard-object)))
+ (if (eq (car (last direct-superclasses)) standard-object)
+ direct-superclasses
+ (remove standard-object direct-superclasses)))))
+
+ (cl:defmethod initialize-instance :around
+ ((class standard-class) &rest initargs
+ &key (name (gensym)) (direct-superclasses ()))
+ (declare (dynamic-extent initargs))
+ (apply #'call-next-method class
+ :name name
+ :direct-superclasses (modify-superclasses direct-superclasses)
+ initargs))
+
+ (cl:defmethod reinitialize-instance :around
+ ((class standard-class) &rest initargs
+ &key (direct-superclasses () direct-superclasses-p))
+ (declare (dynamic-extent initargs))
+ (if direct-superclasses-p
+ (apply #'call-next-method class
+ :direct-superclasses (modify-superclasses direct-superclasses)
+ initargs)
+ (call-next-method)))
+
+ (defgeneric typep (object type)
+ (:method (object type)
+ (cl:typep object type))
+ (:method (object (type class))
+ (member (class-of object)
+ (class-precedence-list type))))
+
+ (defgeneric subtypep (type1 type2)
+ (:method (type1 type2)
+ (cl:subtypep type1 type2))
+ (:method ((type1 class) (type2 symbol))
+ (let ((class2 (find-class type2 nil)))
+ (if class2
+ (member class2 (class-precedence-list type1))
+ (cl:subtypep type1 type2))))
+ (:method ((type1 symbol) (type2 class))
+ (let ((class1 (find-class type1 nil)))
+ (if class1
+ (member type2 (class-precedence-list class1))
+ (cl:subtypep type1 type2))))
+ (:method ((type1 class) (type2 class))
+ (member type2 (class-precedence-list type1)))))
+
+(defun ensure-method (gf lambda-expression
+ &key (qualifiers ())
+ (lambda-list (cadr lambda-expression))
+ (specializers (required-args lambda-list (constantly (find-class 't)))))
+ (eval `(defmethod ,(generic-function-name gf) ,@qualifiers
+ ,(loop for specializer in specializers
+ for (arg . rest) on lambda-list
+ collect `(,arg ,specializer) into args
+ finally (return (nconc args rest)))
+ ,@(cddr lambda-expression))))
+
+;; The following ensures that slot definitions have a documentation in OpenMCL.
+
+#+openmcl
+(defmethod initialize-instance :after ((slot slot-definition) &key documentation)
+ (setf (documentation slot 't) documentation))
+
+;; The following can be used in direct-slot-definition-class to get the correct initargs
+;; for a slot. Use it like this:
+;;
+;; (defmethod direct-slot-definition-class
+;; ((class my-standard-class) &rest initargs)
+;; (declare (dynamic-extent initargs))
+;; (destructuring-bind
+;; (&key key-of-interest &allow-other-keys)
+;; (fix-slot-initargs initargs)
+;; ...))
+
+(defvar *standard-slot-keys*
+ '(:name :documentation
+ :initargs :initform :initfunction
+ :readers :writers))
+
+(defun fix-slot-initargs (initargs)
+ #+openmcl initargs
+ #-openmcl
+ (let* ((counts (loop with counts
+ for (key nil) on initargs by #'cddr
+ do (incf (getf counts key 0))
+ finally (return counts)))
+ (keys-to-fix (loop for (key value) on counts by #'cddr
+ if (> value 1) collect key)))
+ (if keys-to-fix
+ (let ((multiple-standard-keys
+ (intersection keys-to-fix *standard-slot-keys*)))
+ (if multiple-standard-keys
+ (error "Too many occurences of ~S in slot initargs ~S."
+ multiple-standard-keys initargs)
+ (loop with fixed-keys
+ for (key value) on initargs by #'cddr
+ if (member key keys-to-fix)
+ do (nconcf (getf fixed-keys key) (list value))
+ else nconc (list key value) into fixed-initargs
+ finally (return (nconc fixed-initargs fixed-keys)))))
+ initargs)))
+
+(eval-when (:compile-toplevel :load-toplevel :execute)
+ (pushnew :closer-mop *features*))
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/pcl/closer-mop-packages.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/pcl/closer-mop-packages.lisp 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/pcl/closer-mop-packages.lisp 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,190 @@
+(in-package :cl-user)
+
+(defpackage #:closer-mop
+ (:use #:common-lisp #:lispworks)
+ (:nicknames #:c2mop)
+
+ #-sbcl (:shadow #:typep #:subtypep)
+ #-sbcl (:export #:typep #:subtypep)
+
+ (:import-from
+ #+cmu #:clos-mop
+ #+sbcl #:sb-mop
+
+ #:direct-slot-definition
+ #:effective-slot-definition
+ #:eql-specializer
+ #:forward-referenced-class
+ #:funcallable-standard-class
+ #:funcallable-standard-object
+ #:metaobject
+ #:slot-definition
+ #:specializer
+ #:standard-accessor-method
+ #:standard-direct-slot-definition
+ #:standard-effective-slot-definition
+ #:standard-reader-method
+ #:standard-slot-definition
+ #:standard-writer-method
+
+ #:accessor-method-slot-definition
+ #:add-dependent
+ #:add-direct-method
+ #:add-direct-subclass
+ #:class-default-initargs
+ #:class-direct-default-initargs
+ #:class-direct-slots
+ #:class-direct-subclasses
+ #:class-direct-superclasses
+ #:class-finalized-p
+ #:class-precedence-list
+ #:class-prototype
+ #:class-slots
+ #:compute-applicable-methods-using-classes
+ #:compute-class-precedence-list
+ #:compute-default-initargs
+ #:compute-discriminating-function
+ #:compute-effective-method
+ #:compute-effective-slot-definition
+ #:compute-slots
+ #:direct-slot-definition-class
+ #:effective-slot-definition-class
+ #:ensure-class
+ #:ensure-class-using-class
+ #:ensure-generic-function-using-class
+ #:eql-specializer-object
+ #:extract-lambda-list
+ #:extract-specializer-names
+ #:finalize-inheritance
+ #:find-method-combination
+ #:funcallable-standard-instance-access
+ #:generic-function-argument-precedence-order
+ #:generic-function-declarations
+ #:generic-function-lambda-list
+ #:generic-function-method-class
+ #:generic-function-method-combination
+ #:generic-function-methods
+ #:generic-function-name
+ #:intern-eql-specializer
+ #:make-method-lambda
+ #:map-dependents
+ #:method-function
+ #:method-generic-function
+ #:method-lambda-list
+ #:method-specializers
+ #:reader-method-class
+ #:remove-dependent
+ #:remove-direct-method
+ #:remove-direct-subclass
+ #:set-funcallable-instance-function
+ #:slot-boundp-using-class
+ #:slot-definition-allocation
+ #:slot-definition-initargs
+ #:slot-definition-initform
+ #:slot-definition-initfunction
+ #:slot-definition-location
+ #:slot-definition-name
+ #:slot-definition-readers
+ #:slot-definition-writers
+ #:slot-definition-type
+ #:slot-makunbound-using-class
+ #:slot-value-using-class
+ #:specializer-direct-generic-functions
+ #:specializer-direct-methods
+ #:standard-instance-access
+ #:update-dependent
+ #:validate-superclass
+ #:writer-method-class)
+
+ (:export
+ #:direct-slot-definition
+ #:effective-slot-definition
+ #:eql-specializer
+ #:forward-referenced-class
+ #:funcallable-standard-class
+ #:funcallable-standard-object
+ #:metaobject
+ #:slot-definition
+ #:specializer
+ #:standard-accessor-method
+ #:standard-direct-slot-definition
+ #:standard-effective-slot-definition
+ #:standard-reader-method
+ #:standard-slot-definition
+ #:standard-writer-method
+
+ #:ensure-finalized
+ #:ensure-method
+ #:fix-slot-initargs
+ #:required-args
+
+ #:accessor-method-slot-definition
+ #:add-dependent
+ #:add-direct-method
+ #:add-direct-subclass
+ #:class-default-initargs
+ #:class-direct-default-initargs
+ #:class-direct-slots
+ #:class-direct-subclasses
+ #:class-direct-superclasses
+ #:class-finalized-p
+ #:class-precedence-list
+ #:class-prototype
+ #:class-slots
+ #:compute-applicable-methods-using-classes
+ #:compute-class-precedence-list
+ #:compute-default-initargs
+ #:compute-discriminating-function
+ #:compute-effective-method
+ #:compute-effective-slot-definition
+ #:compute-slots
+ #:direct-slot-definition-class
+ #:effective-slot-definition-class
+ #:ensure-class
+ #:ensure-class-using-class
+ #:ensure-generic-function-using-class
+ #:eql-specializer-object
+ #:extract-lambda-list
+ #:extract-specializer-names
+ #:finalize-inheritance
+ #:find-method-combination
+ #:funcallable-standard-instance-access
+ #:generic-function-argument-precedence-order
+ #:generic-function-declarations
+ #:generic-function-lambda-list
+ #:generic-function-method-class
+ #:generic-function-method-combination
+ #:generic-function-methods
+ #:generic-function-name
+ #:intern-eql-specializer
+ #:make-method-lambda
+ #:map-dependents
+ #:method-function
+ #:method-generic-function
+ #:method-lambda-list
+ #:method-specializers
+ #:reader-method-class
+ #:remove-dependent
+ #:remove-direct-method
+ #:remove-direct-subclass
+ #:set-funcallable-instance-function
+ #:slot-boundp-using-class
+ #:slot-definition-allocation
+ #:slot-definition-initargs
+ #:slot-definition-initform
+ #:slot-definition-initfunction
+ #:slot-definition-location
+ #:slot-definition-name
+ #:slot-definition-readers
+ #:slot-definition-writers
+ #:slot-definition-type
+ #:slot-makunbound-using-class
+ #:slot-value-using-class
+ #:specializer-direct-generic-functions
+ #:specializer-direct-methods
+ #:standard-instance-access
+ #:subtypep
+ #:typep
+ #:update-dependent
+ #:validate-superclass
+ #:writer-method-class))
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/pcl/closer-mop.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/pcl/closer-mop.lisp 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/pcl/closer-mop.lisp 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,284 @@
+(in-package :closer-mop)
+
+;; Some utility functions.
+
+(defun required-args (lambda-list &optional (collector #'identity))
+ (loop for arg in lambda-list
+ until (member arg lambda-list-keywords)
+ collect (funcall collector arg)))
+
+(defun ensure-finalized (class &optional (errorp t))
+ (if (typep class 'class)
+ (unless (class-finalized-p class)
+ (finalize-inheritance class))
+ (when errorp (error "~S is not a class." class)))
+ class)
+
+;; The following is commented out. SBCL now supports compatible standard-class and
+;; funcallable-standard-class metaclasses, but this requires that we don't mess with
+;; the class hierarchy anymore. So we will try the trick we have already used
+;; for generic functions: We just add methods for the existing metaclasses.
+;; This is not AMOP-compliant, but if it works it works.
+
+#|
+;; We need a new standard-class for various things.
+
+(cl:defclass standard-class (cl:standard-class)
+ ())
+
+;; validate-superclass for metaclass classes is a little bit
+;; more tricky than for class metaobject classes because
+;; we don't want to make all standard-classes compatible to
+;; each other.
+
+;; Our validate-superclass may get passed a class-prototype
+;; as its second argument, so don't expect its readers to
+;; yield useful information. (In ANSI parlance, "the
+;; consequences are undefined...")
+
+(cl:defmethod validate-superclass
+ ((class standard-class)
+ (superclass cl:standard-class))
+ (or (when (eq (class-of class) (find-class 'standard-class))
+ (or (eq (class-of superclass) (find-class 'cl:standard-class))
+ (eq (class-of superclass) (find-class 'standard-class))))
+ (call-next-method)
+ (when (eq (class-of superclass) (find-class 'cl:standard-class))
+ (validate-superclass class (class-prototype (find-class 'standard-class))))))
+
+#+sbcl
+(cl:defmethod validate-superclass
+ ((class funcallable-standard-class)
+ (superclass standard-class))
+ (and (eq (class-of class) (find-class 'funcallable-standard-class))
+ (eq (class-of superclass) (find-class 'standard-class))))
+
+;; The following macro ensures that the new standard-class is used
+;; by default. It would have been useful to fix other deficiencies
+;; in a complete redefinition of defclass, but there is no portable
+;; way to ensure the necessary compile-time effects as specified
+;; by ANSI Common Lisp. Therefore, we just expand to the original
+;; cl:defclass.
+
+(defmacro defclass (name (&rest supers) &body options)
+ (if (member :metaclass options :key #'car)
+ `(cl:defclass ,name ,supers ,@options)
+ `(cl:defclass ,name ,supers ,@options
+ (:metaclass standard-class))))
+|#
+
+;; In CMUCL, reader-method-class and writer-method-class are
+;; not used during class initialization. The following definitions
+;; correct this.
+
+#-sbcl
+(defun modify-accessors (class)
+ (loop with reader-specializers = (list class)
+ with writer-specializers = (list (find-class 't) class)
+ for slotd in (class-direct-slots class) do
+ (loop for reader in (slot-definition-readers slotd)
+ for reader-function = (fdefinition reader)
+ for reader-method = (find-method reader-function () reader-specializers)
+ for initargs = (list :qualifiers ()
+ :lambda-list '(object)
+ :specializers reader-specializers
+ :function (method-function reader-method)
+ :slot-definition slotd)
+ for method-class = (apply #'reader-method-class class slotd initargs)
+ unless (eq method-class (class-of reader-method))
+ do (add-method reader-function (apply #'make-instance method-class initargs)))
+ (loop for writer in (slot-definition-writers slotd)
+ for writer-function = (fdefinition writer)
+ for writer-method = (find-method writer-function () writer-specializers)
+ for initargs = (list :qualifiers ()
+ :lambda-list '(new-value object)
+ :specializers writer-specializers
+ :function (method-function writer-method)
+ :slot-definition slotd)
+ for method-class = (apply #'writer-method-class class slotd initargs)
+ unless (eq method-class (class-of writer-method))
+ do (add-method writer-function (apply #'make-instance method-class initargs)))))
+
+;; The following methods additionally create a gensym for the class name
+;; unless a name is explicitly provided. AMOP requires classes to be
+;; potentially anonymous.
+
+#-sbcl
+(cl:defmethod initialize-instance :around
+ ((class standard-class) &rest initargs
+ &key (name (gensym)))
+ (declare (dynamic-extent initargs))
+ (prog1 (apply #'call-next-method class :name name initargs)
+ (modify-accessors class)))
+
+#-sbcl
+(cl:defmethod initialize-instance :around
+ ((class funcallable-standard-class) &rest initargs
+ &key (name (gensym)))
+ (declare (dynamic-extent initargs))
+ (prog1 (apply #'call-next-method class :name name initargs)
+ (modify-accessors class)))
+
+#-sbcl
+(cl:defmethod reinitialize-instance :after
+ ((class standard-class) &key)
+ (modify-accessors class))
+
+#-sbcl
+(cl:defmethod reinitialize-instance :after
+ ((class funcallable-standard-class) &key)
+ (modify-accessors class))
+
+;;; The following three methods ensure that the dependent protocol
+;;; for generic function works.
+
+;; The following method additionally ensures that
+;; compute-discriminating-function is triggered.
+
+; Note that for CMUCL, these methods violate the AMOP specification
+; by specializing on the original standard-generic-function metaclass. However,
+; this is necassary because in CMUCL, only one subclass of
+; standard-generic-function can be created, and taking away that option from user
+; code doesn't make a lot of sense in our context.
+
+#-sbcl
+(cl:defmethod reinitialize-instance :after
+ ((gf standard-generic-function) &rest initargs)
+ (declare (dynamic-extent initargs))
+ (set-funcallable-instance-function
+ gf (compute-discriminating-function gf))
+ #-cmu
+ (map-dependents
+ gf (lambda (dep) (apply #'update-dependent gf dep initargs))))
+
+#-(or cmu sbcl)
+(cl:defmethod add-method :after
+ ((gf standard-generic-function) method)
+ (map-dependents
+ gf (lambda (dep) (update-dependent gf dep 'add-method method))))
+
+#-(or cmu sbcl)
+(cl:defmethod remove-method :after
+ ((gf standard-generic-function) method)
+ (map-dependents
+ gf (lambda (dep) (update-dependent gf dep 'remove-method method))))
+
+#+sbcl
+(defun ensure-method (gf lambda-expression
+ &key (method-class (generic-function-method-class gf))
+ (qualifiers ())
+ (lambda-list (cadr lambda-expression))
+ (specializers (required-args lambda-list (constantly (find-class 't)))))
+ (multiple-value-bind
+ (method-lambda method-args)
+ (make-method-lambda
+ gf (class-prototype method-class)
+ lambda-expression ())
+ (let ((method (apply #'make-instance
+ method-class
+ :qualifiers qualifiers
+ :lambda-list lambda-list
+ :specializers specializers
+ :function (compile nil method-lambda)
+ method-args)))
+ (add-method gf method)
+ method)))
+
+#|
+(defgeneric transform-specializer (specializer)
+ (:method (specializer) specializer)
+ (:method ((specializer class))
+ (class-name specializer))
+ (:method ((specializer eql-specializer))
+ `(eql ,(eql-specializer-object specializer))))
+|#
+
+#-sbcl
+(defun ensure-method (gf lambda-expression
+ &key (qualifiers ())
+ (lambda-list (cadr lambda-expression))
+ (specializers (required-args lambda-list (constantly 't))))
+ (funcall (compile nil `(lambda ()
+ (defmethod ,(generic-function-name gf) ,@qualifiers
+ ,(loop for specializer in specializers
+ for (arg . rest) on lambda-list
+ collect `(,arg ,specializer) into args
+ finally (return (nconc args rest)))
+ ,@(cddr lambda-expression))))))
+
+;; The following ensures that effective slot definitions have a documentation in CMUCL.
+
+#+cmu
+(defmethod compute-effective-slot-definition :around
+ ((class standard-class) name direct-slot-definitions)
+ (let ((effective-slot (call-next-method)))
+ (loop for direct-slot in direct-slot-definitions
+ for documentation = (documentation direct-slot 't)
+ when documentation do
+ (setf (documentation effective-slot 't) documentation)
+ (loop-finish))
+ effective-slot))
+
+;; The following can be used in direct-slot-definition-class to get the correct initargs
+;; for a slot. Use it like this:
+;;
+;; (defmethod direct-slot-definition-class
+;; ((class my-standard-class) &rest initargs)
+;; (declare (dynamic-extent initargs))
+;; (destructuring-bind
+;; (&key key-of-interest &allow-other-keys)
+;; (fix-slot-initargs initargs)
+;; ...))
+
+(defvar *standard-slot-keys*
+ '(:name :documentation
+ :initargs :initform :initfunction
+ :readers :writers))
+
+(defun fix-slot-initargs (initargs)
+ #+sbcl initargs
+ #+cmu
+ (let* ((counts (loop with counts
+ for (key nil) on initargs by #'cddr
+ do (incf (getf counts key 0))
+ finally (return counts)))
+ (keys-to-fix (loop for (key value) on counts by #'cddr
+ if (> value 1) collect key)))
+ (if keys-to-fix
+ (let ((multiple-standard-keys
+ (intersection keys-to-fix *standard-slot-keys*)))
+ (if multiple-standard-keys
+ (error "Too many occurences of ~S in slot initargs ~S."
+ multiple-standard-keys initargs)
+ (loop with fixed-keys
+ for (key value) on initargs by #'cddr
+ if (member key keys-to-fix)
+ do (nconcf (getf fixed-keys key) (list value))
+ else nconc (list key value) into fixed-initargs
+ finally (return (nconc fixed-initargs fixed-keys)))))
+ initargs)))
+
+;; In CMUCL, TYPEP and SUBTYPEP don't work as expected
+;; in conjunction with class metaobjects.
+
+#-sbcl
+(progn
+ (defgeneric typep (object type)
+ (:method (object type)
+ (cl:typep object type))
+ (:method (object (type class))
+ (cl:typep object (class-name type))))
+
+ (defgeneric subtypep (type1 type2)
+ (:method (type1 type2)
+ (cl:subtypep type1 type2))
+ (:method ((type1 class) type2)
+ (cl:subtypep (class-name type1) type2))
+ (:method (type1 (type2 class))
+ (cl:subtypep type1 (class-name type2)))
+ (:method ((type1 class) (type2 class))
+ (cl:subtypep (class-name type1)
+ (class-name type2)))))
+
+(eval-when (:compile-toplevel :load-toplevel :execute)
+ (pushnew :closer-mop *features*))
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/release-notes.txt
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/release-notes.txt 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/release-notes.txt 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,34 @@
+Closer to MOP Release Note
+
+v0.0 initial release
+
+v0.1
+- separated single implementation into several ones, one for each MOP implementation / implementation family, in order to improve maintainability
+- added support for LispWorks 4.4
+- removed extra method options from the LispWorks defmethod - it's a useful feature, but doesn't belong here
+- the automatically generated slot accessor methods in LispWorks closed over the wrong slot names. fixed. (obsolete because of the next issue)
+- In some cases, LispWorks deoptimizes slot access and reverts to the slot-value-using-class, etc., functions. This rendered the previously taken approach for fixing that protocol useless. Now, we have a much simpler fix. (Thanks to Jeff Caldwell.) Unfortunately, now some of the features that were previously fixed are missing again (correct initialization of accessor methods, accessor-method-slot-definition, reader-method-class and writer-method-class). Fortunately, LispWorks has already fixed those in 4.4, so this is no problem anymore in the long run.
+
+v0.2
+- The trick for reinitialization of generic-function-name or class-name in allegro, pcl, lispworks and mcl didn't work and had to be dropped.
+- In clisp, defgeneric does call ensure-generic-function-using-class. This wasn't detected before due to a bug in mop-feature-tests. (Thanks to Bruno Haible.)
+- Added the utility function ensure-method for programmatically creating methods, supported on all platforms.
+- The defmethod macro for LispWorks didn't have an implicit block with the name of the generic function. Fixed.
+- LispWorks 4.3 is not supported anymore. The existing conditionalizations are still available, though, and will be retained as long as they don't stand in the way of anything else.
+- Since I have to override some symbols from the common-lisp package, I provide two utility packages closer-common-lisp and closer-common-lisp-user, similar to common-lisp and common-lisp-user but with all the MOP symbols added. The default packages additionally added by the various Common Lisp implementations are not added here. (I think that's cleaner.)
+- Handling of pseudo-anonymous classes in CMU CL and SBCL had a copy&paste bug: The name was changed again in reinitialize-instance.
+- TYPEP and SUBTYPEP don't work as expected in CMU CL and SBCL in conjunction with class metaobjects. Same for MCL, but for different reasons. So I have shadowed them and provide a new definition. (In CMU CL and SBCL, class metaobject are not considered types. In MCL, type information for class metaobjects is not available at some stages. Unfortunately, it doesn't seem to be possible to fix this with finalize-inheritance, so I have to revert to membership tests on the class precedence list.)
+- MCL also doesn't like anonymous classes. So I have added a fix for that.
+- I have incorrectly reported that MAKE-METHOD-LAMBDA is unreliable in CMU CL and SBCL. This was due to a bug in my test suite. However, it is required that the respective generic function and method metaobject classes and make-method-lambda definitions are part of the compilation environment when you want to use them. I have updated the respective sections in features.lisp and features.txt.
+- Switched to an MIT/BSD-style license.
+
+v0.3
+- Now supports OpenMCL 1.0, LispWorks 4.4.6, SBCL 0.9.7 - 0.9.9, CMUCL 19C, Allegro 8.0, clisp 2.37 and 2.38.
+- STANDARD-CLASS and FUNCALLABLE-STANDARD-CLASS are now compatible in SBCL. This required some changes in the PCL support.
+- Dropped the reports for LispWorks 4.3.
+- Allegro 6.2 is not supported anymore. The existing conditionalizations are still available, though, and will be retained as long as they don't stand in the way of anything else.
+- The incorrect specialization of slot-boundp-using-class and slot-makunbound-using-class on symbols instead of slot definition metaobjects in Allegro is fixed.
+- SBCL 0.9.7 has improved a lot wrt MOP compatibility. This required some changes in the PCL support.
+- The lack of extensible :allocation kinds in Allegro is fixed. (Covers 6.2, 7.0 and 8.0. Thanks to John Foderaro for giving me the important hint on how to solve this.)
+
+After version 0.3, there are no separate release notes anymore, but they will be generated automatically by darcs in the future.
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/supported-cls.txt
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/supported-cls.txt 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/supported-cls.txt 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,10 @@
+Allegro 7.0, 8.0 & 8.1
+CLisp 2.35 - 2.41
+CMU Common Lisp 19c, 19d
+LispWorks 4.4.5, 4.4.6 Personal Edition
+LispWorks 4.4.5, 4.4.6 Professional Edition
+LispWorks 5.0, 5.0.1, Personal Edition
+LispWorks 5.0 - 5.0.2, Professional Edition
+Macintosh Common Lisp 5.1
+OpenMCL 1.0
+SBCL 0.9.16 - 0.9.18, 1.0.1 - 1.0.10
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/test/jeffs-code.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/test/jeffs-code.lisp 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/_darcs/current/test/jeffs-code.lisp 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,207 @@
+;;; Jeff Caldwell 2004-04-16
+;;; LWL 4.3
+;;;
+;;; To reproduce the issues I have come across:
+;;;
+;;; 1. (asdf:oos 'asdf:load-op 'closer-mop)
+;;; 2. (compile-file "c2mop-attributes.lisp" :load t)
+;;; 3. (in-package #:c2mop-test)
+;;; C2MOP-TEST> (setq cr (make-instance 'credit-rating))
+;;; => Stack overflow (stack size 16000).
+;;;
+;;; (In this code, I accidently took out the format statements
+;;; creating the output below. You may wish to put them back
+;;; in the slot-value-using-class and (setf slot-value-using-class)
+;;; methods at the bottom of this file.)
+;;;
+;;; slot-value-using-class class #<ATTRIBUTES-CLASS CREDIT-RATING 2134BF1C>
+;;; object #<CREDIT-RATING 21732B2C> slot-name ALL-ATTRIBUTES-2382
+;;; slot-value-using-class class #<ATTRIBUTES-CLASS CREDIT-RATING 2134BF1C>
+;;; object #<CREDIT-RATING 21732B2C> slot-name LEVEL
+;;; slot-value-using-class class #<ATTRIBUTES-CLASS CREDIT-RATING 2134BF1C>
+;;; object #<CREDIT-RATING 21732B2C>
+;;; slot-name #<ATTRIBUTES-EFFECTIVE-SLOT-DEFINITION LEVEL 2134396C>
+;;; slot-value-using-class class #<ATTRIBUTES-CLASS CREDIT-RATING 2134BF1C>
+;;; object #<CREDIT-RATING 21732B2C> slot-name LEVEL
+;;; slot-value-using-class class #<ATTRIBUTES-CLASS CREDIT-RATING 2134BF1C>
+;;; object #<CREDIT-RATING 21732B2C>
+;;; slot-name #<ATTRIBUTES-EFFECTIVE-SLOT-DEFINITION LEVEL 2134396C>
+;;; slot-value-using-class class #<ATTRIBUTES-CLASS CREDIT-RATING 2134BF1C>
+;;; object #<CREDIT-RATING 21732B2C> slot-name LEVEL
+;;; slot-value-using-class class #<ATTRIBUTES-CLASS CREDIT-RATING 2134BF1C>
+;;; object #<CREDIT-RATING 21732B2C>
+;;; slot-name #<ATTRIBUTES-EFFECTIVE-SLOT-DEFINITION LEVEL 2134396C>
+;;; ...
+;;;
+;;; Note that it alternates between slot-name LEVEL and
+;;; slot-name #<ATTRIBUTES-EFFECTIVE-...
+;;;
+;;; In closer-mop.lisp change
+;;;
+;;; (cl:defmethod slot-value-using-class
+;;; ((class standard-class) object (slot symbol))
+;;; (let ((slotd (find slot (class-slots class) :key #'slot-definition-name)))
+;;; (if slotd
+;;; (if (default-reader slotd)
+;;; (slot-value-using-class class object slotd)
+;;; (call-next-method))
+;;; (slot-missing class object slot 'slot-value))))
+;;;
+;;; to
+;;;
+;;; ...
+;;; (if slotd
+;;; (if (default-reader slotd)
+;;; (slot-value-using-class (find-class 'standard-class)
+;;; object slotd)
+;;; ...
+;;;
+;;; (I have no idea if that's a correct patch but it does stop
+;;; the recursive stack overflow.)
+;;;
+;;; Then
+;;; (asdf:oos 'asdf:load-op 'closer-mop)
+;;; (setq cr (make-instance 'credit-rating)
+;;; =>
+;;; The slot #<ATTRIBUTES-EFFECTIVE-SLOT-DEFINITION LEVEL 2133983C> is
+;;; missing from #<CREDIT-RATING 206F0864> (of class #<ATTRIBUTES-CLASS
+;;; CREDIT-RATING 2133B3DC>), when reading the value.
+;;;
+;;; At this point you also can remove the slot-value-using-class and
+;;; setf slot-value-using-class methods. They were no-ops in this
+;;; example, something I had run across in other code. I left them
+;;; here to show the recursive stack overflow. Now that it is "fixed",
+;;; we are left with the missing slot problem above.
+;;; (The problem above is somewhat different from what I reported
+;;; in my first email but the error above is what I'm getting now
+;;; with this example.)
+;;;
+;;; Simply using the LW MOP, instead of using closer-mop,
+;;; "fixes" the problem above. Quit using closer-mop and revert
+;;; to the LW-only MOP. Change the defpackage to
+;;;
+;;; (defpackage #:c2mop-test
+;;; (:use :cl :cl-user :clos))
+;;;
+;;; (cl-user::quit) ;; Make really sure everything's fresh
+;;; M-x slime
+;;; (compile-file "c2mop-attributes.lisp" :load t)
+;;; CL-USER> (in-package #:c2mop-test)
+;;; #<PACKAGE C2MOP-TEST>
+;;; C2MOP-TEST> (setq cr (make-instance 'credit-rating))
+;;; #<CREDIT-RATING 206EDFAC>
+;;; C2MOP-TEST> (setf (level cr) 42)
+;;; 42
+;;; C2MOP-TEST> (level cr)
+;;; 42
+;;; C2MOP-TEST> (setf (slot-attribute cr 'level 'date-set) 20040416)
+;;; 20040416
+;;; C2MOP-TEST> (slot-attribute cr 'level 'date-set)
+;;; 20040416
+;;;
+
+
+;;;
+(defpackage #:c2mop-test
+; (:use :cl :cl-user :clos)
+ (:use :cl :cl-user :closer-mop)
+ (:shadowing-import-from :closer-mop
+ #:defclass #:defmethod #:standard-class
+ #:ensure-generic-function #:defgeneric
+ #:standard-generic-function #:class-name)
+)
+
+(in-package #:c2mop-test)
+
+(eval-when (:compile-toplevel :load-toplevel :execute)
+
+(defvar *all-attributes* (gensym "ALL-ATTRIBUTES-"))
+(defvar *current-direct-slot-definitions* nil)
+
+(defclass attributes-class (standard-class) ())
+
+(defclass attributes-mixin
+ (standard-slot-definition)
+ ((attributes :initarg :attributes :accessor slot-definition-attributes
+ :initform nil)))
+
+(defclass attributes-direct-slot-definition
+ (standard-direct-slot-definition attributes-mixin)
+ ())
+
+(defclass attributes-effective-slot-definition
+ (standard-effective-slot-definition attributes-mixin)
+ ())
+
+(defmethod effective-slot-definition-class ((class attributes-class)
+ &rest initargs)
+ (find-class 'attributes-effective-slot-definition))
+
+(defmethod compute-effective-slot-definition ((class attributes-class)
+ name direct-slots)
+ (let* ((normal-slot (call-next-method)))
+ (setf (slot-definition-attributes normal-slot)
+ (remove-duplicates
+ (apply #'append (mapcar #'slot-definition-attributes
+ direct-slots))))
+ normal-slot))
+
+(defmethod direct-slot-definition-class
+ ((class attributes-class) &rest initargs)
+ (find-class 'attributes-direct-slot-definition))
+
+(defmethod process-a-slot-option
+ ((class attributes-class) option value
+ already-processed-options slot)
+ (princ "process-a-slot-option") (princ option)
+ (if (eq option :attributes)
+ (list* :attributes `',value already-processed-options)
+ (call-next-method)))
+
+(defmethod compute-slots ((class attributes-class))
+ (let* ((normal-slots (call-next-method))
+ (alist (mapcar (lambda (slot)
+ (cons (slot-definition-name slot)
+ (mapcar (lambda (attr) (cons attr nil))
+ (slot-definition-attributes
+ slot))))
+ normal-slots)))
+ (cons (make-instance 'attributes-effective-slot-definition
+ :name *all-attributes*
+ :initform alist
+ :initfunction (lambda () alist))
+ normal-slots)))
+
+(defun slot-attribute (instance slot-name attribute)
+ (cdr (slot-attribute-bucket instance slot-name attribute)))
+
+(defun (setf slot-attribute) (new-value instance slot-name attribute)
+ (setf (cdr (slot-attribute-bucket instance slot-name attribute))
+ new-value))
+
+(defun slot-attribute-bucket (instance slot-name attribute)
+ (let* ((all-buckets (slot-value instance *all-attributes*))
+ (slot-bucket (assoc slot-name all-buckets)))
+ (unless slot-bucket
+ (error "Slot ~S of ~S has no attributes."
+ slot-name instance))
+ (let ((attr-bucket (assoc attribute (cdr slot-bucket))))
+ (unless attr-bucket
+ (error "Slot ~S of ~S has no attribute ~S."
+ slot-name instance attribute))
+ attr-bucket)))
+
+(defmethod clos:slot-value-using-class
+ ((class attributes-class) object (slot-name attributes-effective-slot-definition))
+ (call-next-method))
+
+(defmethod (setf clos:slot-value-using-class)
+ (value (class attributes-class) object (slot-name attributes-effective-slot-definition))
+ (call-next-method))
+
+) ; eval-when
+
+(defclass credit-rating ()
+ ((level :attributes (date-set time-set) :accessor level)
+ (desc :accessor desc))
+ (:metaclass attributes-class))
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/inventories/20070421193107-dccf3-e9d51ab58efdffe18510bddafbfa450f276c224f.gz
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/_darcs/inventories/20070421193107-dccf3-e9d51ab58efdffe18510bddafbfa450f276c224f.gz 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/_darcs/inventories/20070421193107-dccf3-e9d51ab58efdffe18510bddafbfa450f276c224f.gz 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,239 @@
+[Initial revision (v0.2).
+pc(a)p-cos.net**20050802151239]
+[Class initialization patches.
+pc(a)p-cos.net**20050816144718
+ The correction of lists of direct superclasses was done at the wrong place (in :around methods on initialize-instance and reinitialize-instance). The MOP specification doesn't allow to define primary methods for initialize-instance and reinitialize-instance, but these are the only places where those lists can be corrected in a reasonable way. This affects LispWorks and MCL.
+
+ Further changes:
+ - The typep implementation for MCL was incorrect.
+ - reinitialize-instance for standard-class could be simplified.
+ - reinitialize-instance for standard-generic-function could be simplified.
+]
+[Class initialization patch.
+pc(a)p-cos.net**20050816231151
+ The previous patch was partially incorrect. LispWorks and MCL don't need the change of the direct superclasses in primary methods on initialize-instance / reinitialize-instance. I have rearranged that part of the code back to what it was before.
+]
+[Checked with new versions of CLisp and SBCL.
+pc(a)p-cos.net**20050904001359]
+[Removed spurious &allow-other-keys declarations.
+pc(a)p-cos.net**20050910092744]
+[Minor edit.
+pc(a)p-cos.net**20050910103331]
+[Special cased defmethod macro for LispWorks.
+pc(a)p-cos.net**20050910110130
+
+ The defmethod macro in LispWorks (i.e., the new definition in closer-mop) now checks whether only the default methods for make-method-lambda are applicable. If so, defmethod expands into an equivalent cl:defmethod form. This is a workaround to make keyword argument checking for standard generic functions work.
+
+]
+[Changes triggered by Christophe Rhodes / SBCL.
+pc(a)p-cos.net**20051029013651]
+[Documentation update.
+pc(a)p-cos.net**20051029115614]
+[Supports OpenMCL 1.0 - no changes necessary.
+pc(a)p-cos.net**20051029224040]
+[Checked against LispWorks 4.4.6 - no changes.
+pc(a)p-cos.net**20051103084956]
+[Added reports for lack of extensible :allocation types.
+pc(a)p-cos.net**20051105150436
+
+ See MOP Feature Tests for more details.
+
+]
+[Rewired slot access protocol for slot-boundp-using-class and slot-makunbound-using-class in Allegro.
+pc(a)p-cos.net**20051117200922]
+[Updated reports on supported/fixed features and release notes.
+pc(a)p-cos.net**20051117201142]
+[CMUCL 19c now supports the dependent protocol correctly, so the corresponding fixes could be removed.
+pc(a)p-cos.net**20051117201252]
+[Added support for SBCL 0.9.7.
+pc(a)p-cos.net**20051130202445]
+[Checked against clisp 2.36.
+pc(a)p-cos.net**20051205134118]
+[Switched to symbols in the asdf definition.
+pc(a)p-cos.net**20051220162014]
+[Checked against SBCL 0.9.8.
+pc(a)p-cos.net**20051228150237]
+[Checked against clisp 2.37.
+pc(a)p-cos.net**20060103112938]
+[Fixed lack of extensible allocation kinds in Allegro Common Lisp.
+pc(a)p-cos.net**20060119133808]
+[Support for Allegro Common Lisp 8.0 added. (8.0b removed.)
+pc(a)p-cos.net**20060119133914]
+[TAG 0.3
+pc(a)p-cos.net**20060119202553]
+[Fixed a bug in the loop form for some implementations of ensure-method.
+pc(a)p-cos.net**20060127142634]
+[Checked against clisp 2.38 and SBCL 0.9.9.
+pc(a)p-cos.net**20060127142903]
+[Replaced programmatic implementation of ensure-method in CMUCL and SBCL.
+pc(a)p-cos.net**20060127142950
+
+ In CMUCL and SBCL, ensure-method was implemented as proposed in AMOP. However in some cases, this seems to lead to problems with method combination. For the time being, I have replaced the implementation by using a generated defmethod form instead, like in some of the other CL implementations. (In SBCL, this isn't as straightforward because SBCL doesn't accept class metaobjects as specializers.)
+]
+[Added a utility function required-args.
+pc(a)p-cos.net**20060127214635]
+[Documented the results of the more detailed checks for metaobject readers in MOP Feature Tests.
+pc(a)p-cos.net**20060201000120]
+[The function documentation now returns the documentation strings for slot definition metaobjects in OpenMCL.
+pc(a)p-cos.net**20060201000253]
+[The function documentation now returns the documentation strings for effective slot definition metaobjects in CMUCL.
+pc(a)p-cos.net**20060201000433]
+[Finalized the separate release notes.
+pc(a)p-cos.net**20060201000511]
+[TAG 0.31
+pc(a)p-cos.net**20060203120853]
+[Added reports about the results of the tests whether subclasses of specified metaobject classes inherit any exported slots. See MOP Feature Tests for more details.
+pc(a)p-cos.net**20060211193158]
+[Changed system def to handle ASDF-Install bug
+Gary King <gwking(a)metabang.com>**20051216174627]
+[Updated system defs because MCL is disappearing from OpenMCL's features list
+Gary King <gwking(a)metabang.com>**20060216145216]
+[Removed a conflict between Gary's and my code.
+pc(a)p-cos.net**20060224212121]
+[Updated more code to reflect the disappearance of MCL from OpenMCL's feature list
+pc(a)p-cos.net**20060224212657]
+[Checked against SBCL 0.9.10 - no changes, except for a few specified metaclass that don't define slots with exported symbols anymore.
+pc(a)p-cos.net**20060301115916]
+[Updated the version number and copyright information in the system definition.
+pc(a)p-cos.net**20060301200956]
+[Removed a superfluous export from clisp's c2mop.
+pc(a)p-cos.net**20060302093912]
+[Recorded the results from running MOP Feature Tests on ECL.
+pc(a)p-cos.net**20060325171005]
+[Checked against SBCL 0.9.11. SBCL is now safe from making subclasses of specified metaobject classes inherit slots that they shouldn't see.
+pc(a)p-cos.net**20060327120633]
+[Checked againts SBCL 0.9.12 - no changes.
+pc(a)p-cos.net**20060427163929]
+[Added support for ecl.
+pc(a)p-cos.net**20060501082945]
+[Checked against SBCL 0.9.13 - no changes.
+pc(a)p-cos.net**20060529180600]
+[Added the standard accessor classes to ecl.
+pc(a)p-cos.net**20060531202150]
+[Changed a slot name in the class eql-specializer* in LispWorks that was previously accessible in commen-lisp-user.
+pc(a)p-cos.net**20060531203220]
+[Checked against sbcl 0.9.14 - no changes.
+pc(a)p-cos.net**20060629175352]
+[MCL and OpenMCL don't reinitialize argument-precedence-order properly when a lambda list of a generic function is reinitialized.
+pc(a)p-cos.net**20060711121904]
+[Updated the reports for :reinitialize-instance-calls-finalize-inheritance. See MOP Feature Tests for more details.
+pc(a)p-cos.net**20060720085220]
+[Added a new utility function ensure-finalized.
+pc(a)p-cos.net**20060720105100
+
+ A pretty common idiom is this:
+
+ (unless (class-finalized-p class)
+ (finalize-inheritance class))
+ class
+
+ This is captured in the new utility function ensure-finalized.
+
+]
+[Checked against clisp 2.39 - no changes.
+pc(a)p-cos.net**20060720105302]
+[Updated report for :reinitialize-instance-calls-finalize-inheritance.
+pc(a)p-cos.net**20060721125623]
+[TAG 0.32
+pc(a)p-cos.net**20060729125750]
+[Checked against sbcl 0.9.15 - several changes.
+pc(a)p-cos.net**20060729134152
+
+ SBCL 0.9.15 now has support for anonymous classes and correctly calls finalize-inheritance when reinitialize-instance is invoked on a class metaobject.
+
+ This makes several changes necessary in the Closer to MOP support for SBCL. Therefore, support for versions of SBCL before 0.9.15 is dropped. The darcs repository has been tagged with '0.32' in case you need a version that works on older SBCL versions, up to and including SBCL 0.9.14.
+
+]
+[SBCL 0.9.15 now correctly supports typep and subtypep for class metaobjects, so Closer to MOP's versions thereof are not needed anymore.
+pc(a)p-cos.net**20060729134711]
+[Class metaobjects in SBCL can be anonymous now, so we don't have to force a generated name.
+pc(a)p-cos.net**20060729134940]
+[Removed a spurious call to print.
+pc(a)p-cos.net**20060729135119]
+[SBCL now supports class metaobjects in specializers in defmethod forms, so we don't have to replace them with their names.
+pc(a)p-cos.net**20060729135149]
+[Noted support for clisp 2.39.
+pc(a)p-cos.net**20060729135435]
+[Fixed features.txt: it still claimed that SBCL had a problem with calling finalize-inheritance again.
+pc(a)p-cos.net**20060802122101]
+[Removed a spurious in-package declaration in the .asd file.
+pc(a)p-cos.net**20060821203834]
+[TAG 0.33
+pc(a)p-cos.net**20060826084425]
+[Checked against sbcl 0.9.16 - several changes.
+pc(a)p-cos.net**20060826103957
+
+ SBCL 0.9.16 now passes all MOP Feature Tests.
+
+ This makes several changes necessary in the Closer to MOP support for SBCL, again. Therefore, support for SBCL 0.9.15 is dropped. The darcs repository has been tagged with '0.33' in case you need a version that works with SBCL 0.9.15.
+
+]
+[TAG 0.4
+pc(a)p-cos.net**20060826124935]
+[Updated version number in the .asd file.
+pc(a)p-cos.net**20060826130127]
+[Checked against SBCL 0.9.17 - no changes.
+pc(a)p-cos.net**20060927161258]
+[Checked against clisp 2.40. REINITIALIZE-INSTANCE now calls FINALIZE-INHERITANCE correctly in clisp.
+pc(a)p-cos.net**20061001221204]
+[Fixed a problem in the handling of initial-methods in LispWorks.
+pc(a)p-cos.net**20061010173021]
+[Fixed another issue with initial-methods in LispWorks.
+pc(a)p-cos.net**20061010174147]
+[Checked against clisp 2.41 - no changes.
+pc(a)p-cos.net**20061013081525]
+[Added support for LispWorks 5.0 - numerous changes.
+pc(a)p-cos.net**20061014113836]
+[Fixed a bug in some (loop var on list ...) idioms. Thanks to Attila Lendvai.
+pc(a)p-cos.net**20061028113627]
+[Checked against sbcl 0.9.18 - no changes.
+pc(a)p-cos.net**20061031090315]
+[Checked against CMU 19d - no changes.
+pc(a)p-cos.net**20061116132730]
+[Checked against SBCL 1.0. Modified ensure-method for SBCL.
+pc(a)p-cos.net**20061130202814
+
+ The programmatic version of ensure-method in SBCL has problems again. Therefore, it is replaced with a version that evaluates a defmethod form for the time being.
+]
+[Noted support for SBCL 1.0.
+pc(a)p-cos.net**20061130203424]
+[Checked against LispWorks 5.0.1. No changes.
+pc(a)p-cos.net**20061218222443]
+[Noted support for SBCL 1.0.
+pc(a)p-cos.net**20061218222546]
+[Checked against SBCL 1.0.1. Reinstated the former ensure-method implementation for SBCL.
+pc(a)p-cos.net**20061227142245]
+[Simplified the implementation of some validate-superclass methods. (Reduced consing.)
+pc(a)p-cos.net**20061228002510]
+[Exported set-funcallable-instance-function in ecl and OpenMCL.
+pc(a)p-cos.net**20061228002726]
+[Changed the format of the contents of features.lisp. Better support for comparing feature changes between different versions of a given CL implementation.
+pc(a)p-cos.net**20061228002856]
+[Corrected and added a few feature reports to features.txt.
+pc(a)p-cos.net**20061228003007]
+[Updated version number in the .asd file.
+pc(a)p-cos.net**20061228151904]
+[TAG 0.41
+pc(a)p-cos.net**20061228151916]
+[Noted lack of use of FUNCALLABLE-STANDARD-OBJECT as the default superclass for FUNCALLABLE-STANDARD-CLASS in Allegro Common Lisp.
+pc(a)p-cos.net**20061228161029]
+[Noted support for SBCL 1.0.1.
+pc(a)p-cos.net**20061228161128]
+[Checked against SBCL 1.0.2 - no changes.
+pc(a)p-cos.net**20070127192325]
+[Noted support for SBCL 1.0.1 and 1.0.2.
+pc(a)p-cos.net**20070127192925]
+[Checked against LispWorks 5.0.1 Personal Edition - no changes.
+pc(a)p-cos.net**20070127195002]
+[Fixed a typo in the SBCL version numbers.
+pc(a)p-cos.net**20070127201814]
+[Fixed a bug in the creation of congruent lambda lists for generic functions in c2mop for LispWorks.
+pc(a)p-cos.net**20070206104737]
+[Checked against SBCL 1.0.3 - no changes.
+pc(a)p-cos.net**20070228193530]
+[Checked against SBCL 1.0.4 - no changes.
+pc(a)p-cos.net**20070327202949]
+[Checked against LispWorks 5.0.2 - no changes.
+pc(a)p-cos.net**20070421192516]
+[Incremented version number to 0.42.
+pc(a)p-cos.net**20070421193020]
\ No newline at end of file
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/inventory
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/_darcs/inventory 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/_darcs/inventory 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,21 @@
+Starting with tag:
+[TAG 0.42
+pc(a)p-cos.net**20070421193107]
+[Checked against SBCL 1.0.5 - no changes.
+pc(a)p-cos.net**20070501115057]
+[Checked against SBCL 1.0.6 - no changes.
+pc(a)p-cos.net**20070528145132]
+[Checked against SBCL 1.0.7 - no changes.
+pc(a)p-cos.net**20070628201619]
+[Checked against SBCL 1.0.8 and 1.0.9 - no changes.
+pc(a)p-cos.net**20070831233438]
+[Fixed a copy&paste bug in the description for funcallable instances for MCL and OpenMCL.
+pc(a)p-cos.net**20070916181018]
+[Checked against SBCL 1.0.10 - no changes.
+pc(a)p-cos.net**20070926164316]
+[Checked against Allegro 8.1. Dropped fix for SLOT-BOUNDP-USING-CLASS for that version.
+pc(a)p-cos.net**20070926172622
+
+ SLOT-BOUNDP-USING-CLASS now works correctly by default in Allegro 8.1.
+
+]
\ No newline at end of file
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20050802151239-dccf3-e268d42f1d0bfb9c7ef64135393a2f63b243ed54.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20050802151239-dccf3-e268d42f1d0bfb9c7ef64135393a2f63b243ed54.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20050816144718-dccf3-c8e542ff6d11161f8c50c8595710590711c6732b.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20050816144718-dccf3-c8e542ff6d11161f8c50c8595710590711c6732b.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20050816231151-dccf3-e3829cce37824704fb39f3cafdc3c6a92f2d3cf3.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20050816231151-dccf3-e3829cce37824704fb39f3cafdc3c6a92f2d3cf3.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20050904001359-dccf3-914880d9d7054a58ddf886f661065a9352df6e08.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20050904001359-dccf3-914880d9d7054a58ddf886f661065a9352df6e08.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20050910092744-dccf3-87b02abfabbf534e03e82a45a96521a1d7c7a3b2.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20050910092744-dccf3-87b02abfabbf534e03e82a45a96521a1d7c7a3b2.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20050910103331-dccf3-6311e556632ec0e01cc952b75171e77536716c0c.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20050910103331-dccf3-6311e556632ec0e01cc952b75171e77536716c0c.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20050910110130-dccf3-c6296b87c9e0e39bf7e938444dbd278fbba606c3.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20050910110130-dccf3-c6296b87c9e0e39bf7e938444dbd278fbba606c3.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20051029013651-dccf3-b4be9c6147a26c1e9767e9951f49aee2c898655b.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20051029013651-dccf3-b4be9c6147a26c1e9767e9951f49aee2c898655b.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20051029115614-dccf3-65351c2ca451aceaa696ac89c9c8223199afae00.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20051029115614-dccf3-65351c2ca451aceaa696ac89c9c8223199afae00.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20051029224040-dccf3-98657977f7a5a7dc1dce7fc2b536413116b1e9cb.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20051029224040-dccf3-98657977f7a5a7dc1dce7fc2b536413116b1e9cb.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20051103084956-dccf3-bc5ad826d6d0c656f1e9f7af023c238ad5a5fade.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20051103084956-dccf3-bc5ad826d6d0c656f1e9f7af023c238ad5a5fade.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20051105150436-dccf3-42c062a8ce5e51a74d47911cbf0aed17761f25d3.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20051105150436-dccf3-42c062a8ce5e51a74d47911cbf0aed17761f25d3.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20051117200922-dccf3-2a2e5386869e5788124740a6796aa8d93fe88a07.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20051117200922-dccf3-2a2e5386869e5788124740a6796aa8d93fe88a07.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20051117201142-dccf3-2700459573f278c02078ef40150f7d92fcb4ed5a.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20051117201142-dccf3-2700459573f278c02078ef40150f7d92fcb4ed5a.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20051117201252-dccf3-5469d4a6ff03e37238daa28708a8727f2f88fdd9.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20051117201252-dccf3-5469d4a6ff03e37238daa28708a8727f2f88fdd9.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20051130202445-dccf3-d3d97662bf9052129efdf34c4af8cb75d437eb27.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20051130202445-dccf3-d3d97662bf9052129efdf34c4af8cb75d437eb27.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20051205134118-dccf3-8045f8a6023f1067bf862213cd46cd07363ce091.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20051205134118-dccf3-8045f8a6023f1067bf862213cd46cd07363ce091.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20051216174627-3cc5d-3c778eca546a1cdb364885cd436fc275f71cb71e.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20051216174627-3cc5d-3c778eca546a1cdb364885cd436fc275f71cb71e.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20051220162014-dccf3-5541c25791f62d836e27802984f53014e2cfc72e.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20051220162014-dccf3-5541c25791f62d836e27802984f53014e2cfc72e.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20051228150237-dccf3-fc2c4ab8e8c0798d200109ffc20b79259c28258c.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20051228150237-dccf3-fc2c4ab8e8c0798d200109ffc20b79259c28258c.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060103112938-dccf3-2f91b0e195aba3b348283c9c21f36d356db9d32b.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060103112938-dccf3-2f91b0e195aba3b348283c9c21f36d356db9d32b.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060119133808-dccf3-905164dbf83a727c6875e534c8afc7712adde1e2.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060119133808-dccf3-905164dbf83a727c6875e534c8afc7712adde1e2.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060119133914-dccf3-df1b6582ea4210cf1a697b8c75238342e465d444.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060119133914-dccf3-df1b6582ea4210cf1a697b8c75238342e465d444.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060119202553-dccf3-9e87c4d4d342a8a7fe01167b143ed5e67a08fa8c.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060119202553-dccf3-9e87c4d4d342a8a7fe01167b143ed5e67a08fa8c.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060127142634-dccf3-0cbc9730e904db90c5598f37d28ed2a5d01e8060.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060127142634-dccf3-0cbc9730e904db90c5598f37d28ed2a5d01e8060.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060127142903-dccf3-114489c1437896299eba5cb5e1abcdcee3588f4d.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060127142903-dccf3-114489c1437896299eba5cb5e1abcdcee3588f4d.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060127142950-dccf3-a9161a505f3d6fc1376d2e9d065da70c59ec99e2.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060127142950-dccf3-a9161a505f3d6fc1376d2e9d065da70c59ec99e2.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060127214635-dccf3-a6d51c1d634b093f9403635cb3ec6230bba703b1.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060127214635-dccf3-a6d51c1d634b093f9403635cb3ec6230bba703b1.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060201000120-dccf3-b4333796ffe0fe6f5c99603b29cc995508b8dcae.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060201000120-dccf3-b4333796ffe0fe6f5c99603b29cc995508b8dcae.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060201000253-dccf3-6886af50a43d5a624a196f587acf8ef183c6946d.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060201000253-dccf3-6886af50a43d5a624a196f587acf8ef183c6946d.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060201000433-dccf3-825ddee7bae9c308010ec376b13fe5d4038687d5.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060201000433-dccf3-825ddee7bae9c308010ec376b13fe5d4038687d5.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060201000511-dccf3-b67c903a0922806dde28834fef9548e1a19450df.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060201000511-dccf3-b67c903a0922806dde28834fef9548e1a19450df.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060203120853-dccf3-d772fe3f3f39f4c7114b18ba7dd1ce5c4eaf1896.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060203120853-dccf3-d772fe3f3f39f4c7114b18ba7dd1ce5c4eaf1896.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060211193158-dccf3-4534d4b849a303f855c692e41232ca1db1c18614.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060211193158-dccf3-4534d4b849a303f855c692e41232ca1db1c18614.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060216145216-3cc5d-508513582f98be0b13ac28491b590ae926133b98.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060216145216-3cc5d-508513582f98be0b13ac28491b590ae926133b98.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060224212121-dccf3-4e71a819e03eb87e7e41b8bbb88758857ff26099.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060224212121-dccf3-4e71a819e03eb87e7e41b8bbb88758857ff26099.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060224212657-dccf3-068ab07c914a910ead2cf314711aec15c95b3f47.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060224212657-dccf3-068ab07c914a910ead2cf314711aec15c95b3f47.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060301115916-dccf3-319e857c38bf42decd2c98fc3df4208011590dd2.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060301115916-dccf3-319e857c38bf42decd2c98fc3df4208011590dd2.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060301200956-dccf3-d0315e6cf06746cfa4d2f9aae97af7ff6b95f979.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060301200956-dccf3-d0315e6cf06746cfa4d2f9aae97af7ff6b95f979.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060302093912-dccf3-77419535e33067767884542db7d015cfccb3ac61.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060302093912-dccf3-77419535e33067767884542db7d015cfccb3ac61.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060325171005-dccf3-c26bf0552b60f9e02107614b0fd23b84650b82c6.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060325171005-dccf3-c26bf0552b60f9e02107614b0fd23b84650b82c6.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060327120633-dccf3-c7f73a665f3f8fcd0d666ae7a08eaa1d586e6be5.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060327120633-dccf3-c7f73a665f3f8fcd0d666ae7a08eaa1d586e6be5.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060427163929-dccf3-7c2b0e9aa58e3f5a27375162e099f2c8451137ca.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060427163929-dccf3-7c2b0e9aa58e3f5a27375162e099f2c8451137ca.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060501082945-dccf3-f330509c7bf886ad34c63a9fa7386a0a458b34ac.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060501082945-dccf3-f330509c7bf886ad34c63a9fa7386a0a458b34ac.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060529180600-dccf3-62cfd9621e1802d45cd4459d96f367f7a10b5ca1.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060529180600-dccf3-62cfd9621e1802d45cd4459d96f367f7a10b5ca1.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060531202150-dccf3-686d5ba89231851614891f21e29033003105888d.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060531202150-dccf3-686d5ba89231851614891f21e29033003105888d.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060531203220-dccf3-32e3cf5199ceaf2d34b7b9ed3732e923b6a6de53.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060531203220-dccf3-32e3cf5199ceaf2d34b7b9ed3732e923b6a6de53.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060629175352-dccf3-2a287976284aa6a523d7918f4747cf593174ebe7.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060629175352-dccf3-2a287976284aa6a523d7918f4747cf593174ebe7.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060711121904-dccf3-e427b977f9fa61ac7615b3f9266b3c09f6ab394c.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060711121904-dccf3-e427b977f9fa61ac7615b3f9266b3c09f6ab394c.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060720085220-dccf3-8733e01e9790f1929009378878359e13931ff231.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060720085220-dccf3-8733e01e9790f1929009378878359e13931ff231.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060720105100-dccf3-7d147f9c086e13bd2b83e670953ac124ec7dcb27.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060720105100-dccf3-7d147f9c086e13bd2b83e670953ac124ec7dcb27.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060720105302-dccf3-70b8a60a40352e9ffa430467b36b41d9e785561b.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060720105302-dccf3-70b8a60a40352e9ffa430467b36b41d9e785561b.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060721125623-dccf3-c9a6e3c8ab13d7545401922436152ef6039f35b8.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060721125623-dccf3-c9a6e3c8ab13d7545401922436152ef6039f35b8.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060729125750-dccf3-677f12862b02fb3e369b3855c7a82fc9c9f07e28.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060729125750-dccf3-677f12862b02fb3e369b3855c7a82fc9c9f07e28.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060729134152-dccf3-ee40ebb2ef710ff23053b2765dfd8f5e5adeeb5b.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060729134152-dccf3-ee40ebb2ef710ff23053b2765dfd8f5e5adeeb5b.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060729134711-dccf3-dbcf08303fe3f2e8ad195382c90e88cb5fa0fda7.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060729134711-dccf3-dbcf08303fe3f2e8ad195382c90e88cb5fa0fda7.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060729134940-dccf3-c4c1848e22a3d8293090441fd1a1b39670067107.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060729134940-dccf3-c4c1848e22a3d8293090441fd1a1b39670067107.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060729135119-dccf3-62cbac84437b668d5c7b4222d3ffcd9b743a2067.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060729135119-dccf3-62cbac84437b668d5c7b4222d3ffcd9b743a2067.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060729135149-dccf3-615006dc944f3c9c6e15b57467e597f67a40ad77.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060729135149-dccf3-615006dc944f3c9c6e15b57467e597f67a40ad77.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060729135435-dccf3-a6554658258dcdada3b08ad08e6dd17657c7c974.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060729135435-dccf3-a6554658258dcdada3b08ad08e6dd17657c7c974.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060802122101-dccf3-c0ae6510f6436c0fb88bb5ff92a25c9ae529ad17.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060802122101-dccf3-c0ae6510f6436c0fb88bb5ff92a25c9ae529ad17.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060821203834-dccf3-d6305a3e3412ff99beace007948dafc3100e1d6e.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060821203834-dccf3-d6305a3e3412ff99beace007948dafc3100e1d6e.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060826084425-dccf3-1cb35238f9645cd1d5d4e477a9234fc583e0dc6f.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060826084425-dccf3-1cb35238f9645cd1d5d4e477a9234fc583e0dc6f.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060826103957-dccf3-4bfdc272ae29918f08b54d0bdc14fed29b443814.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060826103957-dccf3-4bfdc272ae29918f08b54d0bdc14fed29b443814.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060826124935-dccf3-2a4546691b80a18783c5421d46ac3d72a2c252fb.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060826124935-dccf3-2a4546691b80a18783c5421d46ac3d72a2c252fb.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060826130127-dccf3-eec66c0522b0ab74d72bfdd61250f0ffaae584c6.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060826130127-dccf3-eec66c0522b0ab74d72bfdd61250f0ffaae584c6.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060927161258-dccf3-649ad24438070167a2f0100bb9b8f62601147f6d.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20060927161258-dccf3-649ad24438070167a2f0100bb9b8f62601147f6d.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061001221204-dccf3-56ed441636d15f7f23de7b76b6be8222fb9b67f8.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061001221204-dccf3-56ed441636d15f7f23de7b76b6be8222fb9b67f8.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061010173021-dccf3-159ee4ddbabc437a75ebf561e3301e92327dadf2.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061010173021-dccf3-159ee4ddbabc437a75ebf561e3301e92327dadf2.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061010174147-dccf3-d08093855647506dfbfe1c8263a3555f7a08541a.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061010174147-dccf3-d08093855647506dfbfe1c8263a3555f7a08541a.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061013081525-dccf3-fe4c6c81952c166149c00b1fe0df0834743ea370.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061013081525-dccf3-fe4c6c81952c166149c00b1fe0df0834743ea370.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061014113836-dccf3-f117c253f5ab3d478f32c411f076a5b9d90f28be.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061014113836-dccf3-f117c253f5ab3d478f32c411f076a5b9d90f28be.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061028113627-dccf3-5f62832804d6c3dc544bd00341a7551fce46af78.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061028113627-dccf3-5f62832804d6c3dc544bd00341a7551fce46af78.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061031090315-dccf3-42d2030266347debf49e4bf88a13abdcffb4eac1.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061031090315-dccf3-42d2030266347debf49e4bf88a13abdcffb4eac1.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061116132730-dccf3-e92c87581e04f60c7a029bbe6d7cdd6958319ff7.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061116132730-dccf3-e92c87581e04f60c7a029bbe6d7cdd6958319ff7.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061130202814-dccf3-3120d1936aca4182a1f8fd2e9076e84e1404d7d5.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061130202814-dccf3-3120d1936aca4182a1f8fd2e9076e84e1404d7d5.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061130203424-dccf3-74301ed5df59c70046119acac59c5ceef0c00ecf.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061130203424-dccf3-74301ed5df59c70046119acac59c5ceef0c00ecf.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061218222443-dccf3-edde41dbcc6152e160bfc02201985e577adc11b0.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061218222443-dccf3-edde41dbcc6152e160bfc02201985e577adc11b0.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061218222546-dccf3-81a4963703b080a4230de18285fcc7f4f8f076a8.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061218222546-dccf3-81a4963703b080a4230de18285fcc7f4f8f076a8.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061227142245-dccf3-9eee2aa05227bdf4f4eeaf45e58c845a4707ffff.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061227142245-dccf3-9eee2aa05227bdf4f4eeaf45e58c845a4707ffff.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061228002510-dccf3-163cba8d0d6e4c7548bcac17463887b52d482b11.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061228002510-dccf3-163cba8d0d6e4c7548bcac17463887b52d482b11.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061228002726-dccf3-2abe813153b4868c6219d045cba84119bbe37b62.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061228002726-dccf3-2abe813153b4868c6219d045cba84119bbe37b62.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061228002856-dccf3-af055d64a95a072906b14cf1713d04f171fae53d.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061228002856-dccf3-af055d64a95a072906b14cf1713d04f171fae53d.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061228003007-dccf3-19d3d52b67d6752806ade229cc573df39fefd736.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061228003007-dccf3-19d3d52b67d6752806ade229cc573df39fefd736.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061228151904-dccf3-ef3232d3763a7a5fcfd18bd92b289590e8dfbb77.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061228151904-dccf3-ef3232d3763a7a5fcfd18bd92b289590e8dfbb77.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061228151916-dccf3-82758310329d2019305d44c787c6ff559720c202.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061228151916-dccf3-82758310329d2019305d44c787c6ff559720c202.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061228161029-dccf3-89435e9661c27dc9251269f3e035574cce8ccc6b.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061228161029-dccf3-89435e9661c27dc9251269f3e035574cce8ccc6b.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061228161128-dccf3-0adc1e659006165544e9d15583841f321aca1b4e.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20061228161128-dccf3-0adc1e659006165544e9d15583841f321aca1b4e.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070127192325-dccf3-d77060b4d6264e601b0a0456c59bc0f9b6b39d42.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070127192325-dccf3-d77060b4d6264e601b0a0456c59bc0f9b6b39d42.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070127192925-dccf3-0f0f5a0c26d9089334b2f54ae13cea2ddc4cd881.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070127192925-dccf3-0f0f5a0c26d9089334b2f54ae13cea2ddc4cd881.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070127195002-dccf3-314892775fb8ae67ee688777168326daba80b565.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070127195002-dccf3-314892775fb8ae67ee688777168326daba80b565.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070127201814-dccf3-128f7776110f2b6673a72a9e5c97d3a090cd028f.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070127201814-dccf3-128f7776110f2b6673a72a9e5c97d3a090cd028f.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070206104737-dccf3-e8605c338153ef4cfca23e2691bdbd8220ed9c17.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070206104737-dccf3-e8605c338153ef4cfca23e2691bdbd8220ed9c17.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070228193530-dccf3-b0fe50e904a9f06b680ab19c79d5e375c45bb4e1.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070228193530-dccf3-b0fe50e904a9f06b680ab19c79d5e375c45bb4e1.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070327202949-dccf3-77b1abaa2cd6661419f04d3c1422ee0e4970e2d5.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070327202949-dccf3-77b1abaa2cd6661419f04d3c1422ee0e4970e2d5.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070421192516-dccf3-13d712262e80609ffa3e44656a11ddf1eb8c5ba2.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070421192516-dccf3-13d712262e80609ffa3e44656a11ddf1eb8c5ba2.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070421193020-dccf3-46cccd00d206b252681348edde6d08b9f8c12744.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070421193020-dccf3-46cccd00d206b252681348edde6d08b9f8c12744.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070421193107-dccf3-e9d51ab58efdffe18510bddafbfa450f276c224f.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070421193107-dccf3-e9d51ab58efdffe18510bddafbfa450f276c224f.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070501115057-dccf3-fd3901cf565e463eddafaf82e6f526d9403f5f29.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070501115057-dccf3-fd3901cf565e463eddafaf82e6f526d9403f5f29.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070528145132-dccf3-e1d978c1cd424af7cfabb1d036d07a10a7a4ed62.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070528145132-dccf3-e1d978c1cd424af7cfabb1d036d07a10a7a4ed62.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070628201619-dccf3-6697990e3daa875937fba6209b49f9700ce5f98f.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070628201619-dccf3-6697990e3daa875937fba6209b49f9700ce5f98f.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070831233438-dccf3-551d9afcedf44d0735b330c50be407619f4cb8e0.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070831233438-dccf3-551d9afcedf44d0735b330c50be407619f4cb8e0.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070916181018-dccf3-e11c738d92d8e1b2dbc979a10f258a647e164022.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070916181018-dccf3-e11c738d92d8e1b2dbc979a10f258a647e164022.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070926164316-dccf3-0399c8966f70466f0bb3f1abd28f14b7698f542f.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070926164316-dccf3-0399c8966f70466f0bb3f1abd28f14b7698f542f.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070926172622-dccf3-0c2318248afb60197e6986c33794e0f97e43cfa2.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/closer-mop/_darcs/patches/20070926172622-dccf3-0c2318248afb60197e6986c33794e0f97e43cfa2.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/prefs/binaries
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/_darcs/prefs/binaries 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/_darcs/prefs/binaries 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,39 @@
+# Binary file regexps:
+\.png$
+\.PNG$
+\.gz$
+\.GZ$
+\.pdf$
+\.PDF$
+\.jpg$
+\.JPG$
+\.gif$
+\.GIF$
+\.tar$
+\.TAR$
+\.bz2$
+\.BZ2$
+\.z$
+\.Z$
+\.zip$
+\.ZIP$
+\.jar$
+\.JAR$
+\.so$
+\.SO$
+\.a$
+\.A$
+\.tgz$
+\.TGZ$
+\.jpeg$
+\.JPEG$
+\.mpg$
+\.MPG$
+\.mpeg$
+\.MPEG$
+\.iso$
+\.ISO$
+\.exe$
+\.EXE$
+\.doc$
+\.DOC$
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/prefs/boring
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/_darcs/prefs/boring 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/_darcs/prefs/boring 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,34 @@
+# Boring file regexps:
+\.hi$
+\.o$
+\.o\.cmd$
+# *.ko files aren't boring by default because they might
+# be Korean translations rather than kernel modules.
+# \.ko$
+\.ko\.cmd$
+\.mod\.c$
+(^|/)\.tmp_versions($|/)
+(^|/)CVS($|/)
+(^|/)RCS($|/)
+~$
+#(^|/)\.[^/]
+(^|/)_darcs($|/)
+\.bak$
+\.BAK$
+\.orig$
+(^|/)vssver\.scc$
+\.swp$
+(^|/)MT($|/)
+(^|/)\{arch\}($|/)
+(^|/).arch-ids($|/)
+(^|/),
+\.class$
+\.prof$
+(^|/)\.DS_Store$
+(^|/)BitKeeper($|/)
+(^|/)ChangeSet($|/)
+(^|/)\.svn($|/)
+\.py[co]$
+\#
+\.cvsignore$
+(^|/)Thumbs\.db$
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/prefs/defaultrepo
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/_darcs/prefs/defaultrepo 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/_darcs/prefs/defaultrepo 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1 @@
+http://common-lisp.net/project/closer/repos/closer-mop
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/prefs/motd
===================================================================
Added: branches/trunk-reorg/thirdparty/closer-mop/_darcs/prefs/repos
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/_darcs/prefs/repos 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/_darcs/prefs/repos 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1 @@
+http://common-lisp.net/project/closer/repos/closer-mop
Added: branches/trunk-reorg/thirdparty/closer-mop/allegro/closer-mop-packages.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/allegro/closer-mop-packages.lisp 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/allegro/closer-mop-packages.lisp 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,190 @@
+(in-package :cl-user)
+
+(defpackage #:closer-mop
+ (:use #:common-lisp #:lispworks)
+ (:nicknames #:c2mop)
+
+ (:shadow
+ #:defclass #:defgeneric #:ensure-generic-function
+ #:standard-class #:standard-generic-function)
+ (:export
+ #:defclass #:defgeneric #:ensure-generic-function
+ #:standard-class #:standard-generic-function)
+
+ (:import-from #:mop
+
+ #:direct-slot-definition
+ #:effective-slot-definition
+ #:eql-specializer
+ #:forward-referenced-class
+ #:funcallable-standard-class
+ #:funcallable-standard-object
+ #:metaobject
+ #:slot-definition
+ #:specializer
+ #:standard-accessor-method
+ #:standard-direct-slot-definition
+ #:standard-effective-slot-definition
+ #:standard-reader-method
+ #:standard-slot-definition
+ #:standard-writer-method
+
+ #:accessor-method-slot-definition
+ #:add-dependent
+ #:add-direct-method
+ #:add-direct-subclass
+ #:class-default-initargs
+ #:class-direct-default-initargs
+ #:class-direct-slots
+ #:class-direct-subclasses
+ #:class-direct-superclasses
+ #:class-finalized-p
+ #:class-precedence-list
+ #:class-prototype
+ #:class-slots
+ #:compute-applicable-methods-using-classes
+ #:compute-class-precedence-list
+ #:compute-default-initargs
+ #:compute-discriminating-function
+ #:compute-effective-method
+ #:compute-effective-slot-definition
+ #:compute-slots
+ #:direct-slot-definition-class
+ #:effective-slot-definition-class
+ #:ensure-class
+ #:ensure-class-using-class
+ #:ensure-generic-function-using-class
+ #:eql-specializer-object
+ #:extract-lambda-list
+ #:extract-specializer-names
+ #:finalize-inheritance
+ #:find-method-combination
+ #:funcallable-standard-instance-access
+ #:generic-function-argument-precedence-order
+ #:generic-function-declarations
+ #:generic-function-lambda-list
+ #:generic-function-method-class
+ #:generic-function-method-combination
+ #:generic-function-methods
+ #:generic-function-name
+ #:intern-eql-specializer
+ #-allegro #:make-method-lambda
+ #:map-dependents
+ #:method-function
+ #:method-generic-function
+ #:method-lambda-list
+ #:method-specializers
+ #:reader-method-class
+ #:remove-dependent
+ #:remove-direct-method
+ #:remove-direct-subclass
+ #:set-funcallable-instance-function
+ #:slot-boundp-using-class
+ #:slot-definition-allocation
+ #:slot-definition-initargs
+ #:slot-definition-initform
+ #:slot-definition-initfunction
+ #:slot-definition-location
+ #:slot-definition-name
+ #:slot-definition-readers
+ #:slot-definition-writers
+ #:slot-definition-type
+ #:slot-makunbound-using-class
+ #:slot-value-using-class
+ #:specializer-direct-generic-functions
+ #:specializer-direct-methods
+ #:standard-instance-access
+ #:update-dependent
+ #:validate-superclass
+ #:writer-method-class)
+
+ (:export
+ #:direct-slot-definition
+ #:effective-slot-definition
+ #:eql-specializer
+ #:forward-referenced-class
+ #:funcallable-standard-class
+ #:funcallable-standard-object
+ #:metaobject
+ #:slot-definition
+ #:specializer
+ #:standard-accessor-method
+ #:standard-direct-slot-definition
+ #:standard-effective-slot-definition
+ #:standard-reader-method
+ #:standard-slot-definition
+ #:standard-writer-method
+
+ #:ensure-finalized
+ #:ensure-method
+ #:fix-slot-initargs
+ #:required-args
+
+ #:accessor-method-slot-definition
+ #:add-dependent
+ #:add-direct-method
+ #:add-direct-subclass
+ #:class-default-initargs
+ #:class-direct-default-initargs
+ #:class-direct-slots
+ #:class-direct-subclasses
+ #:class-direct-superclasses
+ #:class-finalized-p
+ #:class-precedence-list
+ #:class-prototype
+ #:class-slots
+ #:compute-applicable-methods-using-classes
+ #:compute-class-precedence-list
+ #:compute-default-initargs
+ #:compute-discriminating-function
+ #:compute-effective-method
+ #:compute-effective-slot-definition
+ #:compute-slots
+ #:direct-slot-definition-class
+ #:effective-slot-definition-class
+ #:ensure-class
+ #:ensure-class-using-class
+ #:ensure-generic-function-using-class
+ #:eql-specializer-object
+ #:extract-lambda-list
+ #:extract-specializer-names
+ #:finalize-inheritance
+ #:find-method-combination
+ #:funcallable-standard-instance-access
+ #:generic-function-argument-precedence-order
+ #:generic-function-declarations
+ #:generic-function-lambda-list
+ #:generic-function-method-class
+ #:generic-function-method-combination
+ #:generic-function-methods
+ #:generic-function-name
+ #:intern-eql-specializer
+ #-allegro #:make-method-lambda
+ #:map-dependents
+ #:method-function
+ #:method-generic-function
+ #:method-lambda-list
+ #:method-specializers
+ #:reader-method-class
+ #:remove-dependent
+ #:remove-direct-method
+ #:remove-direct-subclass
+ #:set-funcallable-instance-function
+ #:slot-boundp-using-class
+ #:slot-definition-allocation
+ #:slot-definition-initargs
+ #:slot-definition-initform
+ #:slot-definition-initfunction
+ #:slot-definition-location
+ #:slot-definition-name
+ #:slot-definition-readers
+ #:slot-definition-writers
+ #:slot-definition-type
+ #:slot-makunbound-using-class
+ #:slot-value-using-class
+ #:specializer-direct-generic-functions
+ #:specializer-direct-methods
+ #:standard-instance-access
+ #:update-dependent
+ #:validate-superclass
+ #:writer-method-class))
Added: branches/trunk-reorg/thirdparty/closer-mop/allegro/closer-mop.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/allegro/closer-mop.lisp 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/allegro/closer-mop.lisp 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,197 @@
+(in-package :closer-mop)
+
+;; Some utility functions.
+
+(defun required-args (lambda-list &optional (collector #'identity))
+ (loop for arg in lambda-list
+ until (member arg lambda-list-keywords)
+ collect (funcall collector arg)))
+
+(defun ensure-finalized (class &optional (errorp t))
+ (if (typep class 'class)
+ (unless (class-finalized-p class)
+ (finalize-inheritance class))
+ (when errorp (error "~S is not a class." class)))
+ class)
+
+;; We need a new standard-class for various things.
+
+(cl:defclass standard-class (cl:standard-class)
+ ((valid-slot-allocations :initform '(:instance :class)
+ :accessor valid-slot-allocations
+ :reader excl::valid-slot-allocation-list)))
+
+;; validate-superclass for metaclass classes is a little bit
+;; more tricky than for class metaobject classes because
+;; we don't want to make all standard-classes compatible to
+;; each other.
+
+;; Our validate-superclass may get passed a class-prototype
+;; as its second argument, so don't expect its readers to
+;; yield useful information. (In ANSI parlance, "the
+;; consequences are undefined...")
+
+(cl:defmethod validate-superclass
+ ((class standard-class)
+ (superclass cl:standard-class))
+ (or (when (eq (class-of class) (find-class 'standard-class))
+ (or (eq (class-of superclass) (find-class 'cl:standard-class))
+ (eq (class-of superclass) (find-class 'standard-class))))
+ (call-next-method)
+ (when (eq (class-of superclass) (find-class 'cl:standard-class))
+ (validate-superclass class (class-prototype (find-class 'standard-class))))))
+
+;; The following macro ensures that the new standard-class is used by default.
+
+(defmacro defclass (name (&rest supers) &body options)
+ (if (member :metaclass options :key #'car)
+ `(cl:defclass ,name ,supers ,@options)
+ `(cl:defclass ,name ,supers ,@options
+ (:metaclass standard-class))))
+
+;; Allegro defines an extra check for :allocation kinds. AMOP expects any kind to be
+;; permissible, though. This is corrected here.
+
+(defmethod direct-slot-definition-class :before ((class standard-class) &key allocation &allow-other-keys)
+ (unless (eq (class-of class) (find-class 'standard-class))
+ (pushnew allocation (valid-slot-allocations class))))
+
+;;; In Allegro, slot-boundp-using-class and slot-makunbound-using-class are specialized
+;;; on slot names instead of effective slot definitions. In order to fix this,
+;;; we need to rewire the slot access protocol.
+
+#-(version>= 8 1)
+(progn
+ (cl:defmethod slot-boundp-using-class
+ ((class standard-class) object (slot symbol))
+ (declare (optimize (speed 3) (debug 0) (safety 0)
+ (compilation-speed 0)))
+ (let ((slotd (find slot (class-slots class)
+ :test #'eq
+ :key #'slot-definition-name)))
+ (if slotd
+ (slot-boundp-using-class class object slotd)
+ (slot-missing class object slot 'slot-boundp))))
+
+ (cl:defmethod slot-boundp-using-class
+ ((class standard-class) object (slotd standard-effective-slot-definition))
+ (declare (optimize (speed 3) (debug 0) (safety 0)
+ (compilation-speed 0)))
+ (slot-boundp-using-class
+ (load-time-value (class-prototype (find-class 'cl:standard-class)))
+ object
+ (slot-definition-name slotd))))
+
+(cl:defmethod slot-makunbound-using-class
+ ((class standard-class) object (slot symbol))
+ (declare (optimize (speed 3) (debug 0) (safety 0)
+ (compilation-speed 0)))
+ (let ((slotd (find slot (class-slots class)
+ :test #'eq
+ :key #'slot-definition-name)))
+ (if slotd
+ (slot-makunbound-using-class class object slotd)
+ (slot-missing class object slot 'slot-makunbound))))
+
+(cl:defmethod slot-makunbound-using-class
+ ((class standard-class) object (slotd standard-effective-slot-definition))
+ (declare (optimize (speed 3) (debug 0) (safety 0)
+ (compilation-speed 0)))
+ (slot-makunbound-using-class
+ (load-time-value (class-prototype (find-class 'cl:standard-class)))
+ object
+ (slot-definition-name slotd)))
+
+;; We need a new standard-generic-function for various things.
+
+(cl:defclass standard-generic-function (cl:standard-generic-function)
+ ()
+ (:metaclass clos:funcallable-standard-class))
+
+;; The following ensures that the new standard-generic-function is used.
+
+(defun ensure-generic-function
+ (name &rest args
+ &key (generic-function-class 'standard-generic-function)
+ &allow-other-keys)
+ (declare (dynamic-extent args))
+ (when (fboundp name)
+ (let ((function (fdefinition name)))
+ (unless (typep function 'generic-function)
+ (cerror "Discard existing definition and create generic function."
+ "~S is already fbound, but not as a generic function." name)
+ (fmakunbound name))))
+ (if (fboundp name)
+ (let ((function (fdefinition name)))
+ (apply #'ensure-generic-function-using-class
+ function name args))
+ (apply #'ensure-generic-function-using-class nil name
+ :generic-function-class generic-function-class
+ args)))
+
+;; The following macro ensures that the new standard-generic-function
+;; is used by default.
+
+(defmacro defgeneric (name (&rest args) &body options)
+ (if (member :generic-function-class options :key #'car)
+ `(cl:defgeneric ,name ,args ,@options)
+ `(cl:defgeneric ,name ,args ,@options
+ (:generic-function-class standard-generic-function))))
+
+;;; The following three methods ensure that the dependent protocol
+;;; for generic function works.
+
+;; The following method additionally ensures that
+;; compute-discriminating-function is triggered.
+
+(cl:defmethod reinitialize-instance :after
+ ((gf standard-generic-function) &rest initargs)
+ (declare (dynamic-extent initargs))
+ (set-funcallable-instance-function
+ gf (compute-discriminating-function gf))
+ (map-dependents
+ gf (lambda (dep) (apply #'update-dependent gf dep initargs))))
+
+(cl:defmethod add-method :after
+ ((gf standard-generic-function) method)
+ (map-dependents
+ gf (lambda (dep) (update-dependent gf dep 'add-method method))))
+
+(cl:defmethod remove-method :after
+ ((gf standard-generic-function) method)
+ (map-dependents
+ gf (lambda (dep) (update-dependent gf dep 'remove-method method))))
+
+(defun ensure-method (gf lambda-expression
+ &key (qualifiers ())
+ (lambda-list (cadr lambda-expression))
+ (specializers (required-args lambda-list (constantly (find-class 't)))))
+ (funcall (compile nil `(lambda ()
+ (defmethod ,(generic-function-name gf) ,@qualifiers
+ ,(loop for specializer in specializers
+ for (arg . rest) on lambda-list
+ collect `(,arg ,specializer) into args
+ finally (return (nconc args rest)))
+ ,@(cddr lambda-expression))))))
+
+;; The following can be used in direct-slot-definition-class to get the correct initargs
+;; for a slot. Use it like this:
+;;
+;; (defmethod direct-slot-definition-class
+;; ((class my-standard-class) &rest initargs)
+;; (declare (dynamic-extent initargs))
+;; (destructuring-bind
+;; (&key key-of-interest &allow-other-keys)
+;; (fix-slot-initargs initargs)
+;; ...))
+
+(defvar *standard-slot-keys*
+ '(:name :documentation
+ :initargs :initform :initfunction
+ :readers :writers))
+
+(defun fix-slot-initargs (initargs)
+ initargs)
+
+(eval-when (:compile-toplevel :load-toplevel :execute)
+ (pushnew :closer-mop *features*))
Added: branches/trunk-reorg/thirdparty/closer-mop/clisp/closer-mop-packages.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/clisp/closer-mop-packages.lisp 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/clisp/closer-mop-packages.lisp 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,183 @@
+(in-package :cl-user)
+
+(defpackage #:closer-mop
+ (:use #:common-lisp #:lispworks)
+ (:nicknames #:c2mop)
+
+ (:import-from #:clos
+
+ #:direct-slot-definition
+ #:effective-slot-definition
+ #:eql-specializer
+ #:forward-referenced-class
+ #:funcallable-standard-class
+ #:funcallable-standard-object
+ #:metaobject
+ #:slot-definition
+ #:specializer
+ #:standard-accessor-method
+ #:standard-direct-slot-definition
+ #:standard-effective-slot-definition
+ #:standard-reader-method
+ #:standard-slot-definition
+ #:standard-writer-method
+
+ #:accessor-method-slot-definition
+ #:add-dependent
+ #:add-direct-method
+ #:add-direct-subclass
+ #:class-default-initargs
+ #:class-direct-default-initargs
+ #:class-direct-slots
+ #:class-direct-subclasses
+ #:class-direct-superclasses
+ #:class-finalized-p
+ #:class-precedence-list
+ #:class-prototype
+ #:class-slots
+ #:compute-applicable-methods-using-classes
+ #:compute-class-precedence-list
+ #:compute-default-initargs
+ #:compute-discriminating-function
+ #:compute-effective-method
+ #:compute-effective-slot-definition
+ #:compute-slots
+ #:direct-slot-definition-class
+ #:effective-slot-definition-class
+ #:ensure-class
+ #:ensure-class-using-class
+ #:ensure-generic-function-using-class
+ #:eql-specializer-object
+ #:extract-lambda-list
+ #:extract-specializer-names
+ #:finalize-inheritance
+ #:find-method-combination
+ #:funcallable-standard-instance-access
+ #:generic-function-argument-precedence-order
+ #:generic-function-declarations
+ #:generic-function-lambda-list
+ #:generic-function-method-class
+ #:generic-function-method-combination
+ #:generic-function-methods
+ #:generic-function-name
+ #:intern-eql-specializer
+ #-clisp #:make-method-lambda
+ #:map-dependents
+ #:method-function
+ #:method-generic-function
+ #:method-lambda-list
+ #:method-specializers
+ #:reader-method-class
+ #:remove-dependent
+ #:remove-direct-method
+ #:remove-direct-subclass
+ #:set-funcallable-instance-function
+ #:slot-boundp-using-class
+ #:slot-definition-allocation
+ #:slot-definition-initargs
+ #:slot-definition-initform
+ #:slot-definition-initfunction
+ #:slot-definition-location
+ #:slot-definition-name
+ #:slot-definition-readers
+ #:slot-definition-writers
+ #:slot-definition-type
+ #:slot-makunbound-using-class
+ #:slot-value-using-class
+ #:specializer-direct-generic-functions
+ #:specializer-direct-methods
+ #:standard-instance-access
+ #:update-dependent
+ #:validate-superclass
+ #:writer-method-class)
+
+ (:export
+ #:direct-slot-definition
+ #:effective-slot-definition
+ #:eql-specializer
+ #:forward-referenced-class
+ #:funcallable-standard-class
+ #:funcallable-standard-object
+ #:metaobject
+ #:slot-definition
+ #:specializer
+ #:standard-accessor-method
+ #:standard-direct-slot-definition
+ #:standard-effective-slot-definition
+ #:standard-reader-method
+ #:standard-slot-definition
+ #:standard-writer-method
+
+ #:ensure-finalized
+ #:ensure-method
+ #:fix-slot-initargs
+ #:required-args
+
+ #:accessor-method-slot-definition
+ #:add-dependent
+ #:add-direct-method
+ #:add-direct-subclass
+ #:class-default-initargs
+ #:class-direct-default-initargs
+ #:class-direct-slots
+ #:class-direct-subclasses
+ #:class-direct-superclasses
+ #:class-finalized-p
+ #:class-precedence-list
+ #:class-prototype
+ #:class-slots
+ #:compute-applicable-methods-using-classes
+ #:compute-class-precedence-list
+ #:compute-default-initargs
+ #:compute-discriminating-function
+ #:compute-effective-method
+ #:compute-effective-slot-definition
+ #:compute-slots
+ #:direct-slot-definition-class
+ #:effective-slot-definition-class
+ #:ensure-class
+ #:ensure-class-using-class
+ #:ensure-generic-function-using-class
+ #:eql-specializer-object
+ #:extract-lambda-list
+ #:extract-specializer-names
+ #:finalize-inheritance
+ #:find-method-combination
+ #:funcallable-standard-instance-access
+ #:generic-function-argument-precedence-order
+ #:generic-function-declarations
+ #:generic-function-lambda-list
+ #:generic-function-method-class
+ #:generic-function-method-combination
+ #:generic-function-methods
+ #:generic-function-name
+ #:intern-eql-specializer
+ #-clisp #:make-method-lambda
+ #:map-dependents
+ #:method-function
+ #:method-generic-function
+ #:method-lambda-list
+ #:method-specializers
+ #:reader-method-class
+ #:remove-dependent
+ #:remove-direct-method
+ #:remove-direct-subclass
+ #:set-funcallable-instance-function
+ #:slot-boundp-using-class
+ #:slot-definition-allocation
+ #:slot-definition-initargs
+ #:slot-definition-initform
+ #:slot-definition-initfunction
+ #:slot-definition-location
+ #:slot-definition-name
+ #:slot-definition-readers
+ #:slot-definition-writers
+ #:slot-definition-type
+ #:slot-makunbound-using-class
+ #:slot-value-using-class
+ #:specializer-direct-generic-functions
+ #:specializer-direct-methods
+ #:standard-instance-access
+ #:update-dependent
+ #:validate-superclass
+ #:writer-method-class))
Added: branches/trunk-reorg/thirdparty/closer-mop/clisp/closer-mop.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/clisp/closer-mop.lisp 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/clisp/closer-mop.lisp 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,49 @@
+(in-package :closer-mop)
+
+;; Some utility functions.
+
+(defun required-args (lambda-list &optional (collector #'identity))
+ (loop for arg in lambda-list
+ until (member arg lambda-list-keywords)
+ collect (funcall collector arg)))
+
+(defun ensure-finalized (class &optional (errorp t))
+ (if (typep class 'class)
+ (unless (class-finalized-p class)
+ (finalize-inheritance class))
+ (when errorp (error "~S is not a class." class)))
+ class)
+
+(defun ensure-method (gf lambda-expression
+ &key (qualifiers ())
+ (lambda-list (cadr lambda-expression))
+ (specializers (required-args lambda-list (constantly 't))))
+ (funcall (compile nil `(lambda ()
+ (defmethod ,(generic-function-name gf) ,@qualifiers
+ ,(loop for specializer in specializers
+ for (arg . rest) on lambda-list
+ collect `(,arg ,specializer) into args
+ finally (return (nconc args rest)))
+ ,@(cddr lambda-expression))))))
+
+;; The following can be used in direct-slot-definition-class to get the correct initargs
+;; for a slot. Use it like this:
+;;
+;; (defmethod direct-slot-definition-class
+;; ((class my-standard-class) &rest initargs)
+;; (declare (dynamic-extent initargs))
+;; (destructuring-bind
+;; (&key key-of-interest &allow-other-keys)
+;; (fix-slot-initargs initargs)
+;; ...))
+
+(defvar *standard-slot-keys*
+ '(:name :documentation
+ :initargs :initform :initfunction
+ :readers :writers))
+
+(defun fix-slot-initargs (initargs)
+ initargs)
+
+(eval-when (:compile-toplevel :load-toplevel :execute)
+ (pushnew :closer-mop *features*))
Added: branches/trunk-reorg/thirdparty/closer-mop/closer-mop-utility-packages.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/closer-mop-utility-packages.lisp 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/closer-mop-utility-packages.lisp 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,18 @@
+(in-package :cl-user)
+
+(defpackage #:closer-common-lisp
+ (:nicknames #:c2cl)
+ (:use))
+
+(let ((syms (nunion (loop for sym being the external-symbols of :common-lisp
+ if (find-symbol (symbol-name sym) :c2mop)
+ collect it
+ else collect sym)
+ (loop for sym being the external-symbols of :c2mop
+ collect sym))))
+ (import syms :c2cl)
+ (export syms :c2cl))
+
+(defpackage #:closer-common-lisp-user
+ (:nicknames #:c2cl-user)
+ (:use #:closer-common-lisp))
Added: branches/trunk-reorg/thirdparty/closer-mop/closer-mop.asd
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/closer-mop.asd 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/closer-mop.asd 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,47 @@
+(asdf:defsystem #:closer-mop
+ :name "Closer to MOP"
+ :author "Pascal Costanza"
+ :version "0.42"
+ :licence "
+Copyright (c) 2005 - 2007 Pascal Costanza
+
+Permission is hereby granted, free of charge, to any person
+obtaining a copy of this software and associated documentation
+files (the \"Software\"), to deal in the Software without
+restriction, including without limitation the rights to use,
+copy, modify, merge, publish, distribute, sublicense, and/or
+sell copies of the Software, and to permit persons to whom the
+Software is furnished to do so, subject to the following
+conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED \"AS IS\", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES
+OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
+HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
+WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
+FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
+OTHER DEALINGS IN THE SOFTWARE.
+"
+ :depends-on (#-lispworks #:lw-compat)
+ :components
+ ((:module
+ #+allegro "allegro"
+ #+clisp "clisp"
+ #+ecl "ecl"
+ #+lispworks "lispworks"
+ #+(or mcl openmcl) "mcl"
+ #+(or cmu sbcl) "pcl"
+ :components ((:file "closer-mop-packages")
+ (:file "closer-mop"
+ :depends-on ("closer-mop-packages"))))
+ (:file "closer-mop-utility-packages"
+ :depends-on (#+allegro "allegro"
+ #+clisp "clisp"
+ #+ecl "ecl"
+ #+lispworks "lispworks"
+ #+(or mcl openmcl) "mcl"
+ #+(or cmu sbcl) "pcl"))))
Added: branches/trunk-reorg/thirdparty/closer-mop/ecl/closer-mop-packages.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/ecl/closer-mop-packages.lisp 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/ecl/closer-mop-packages.lisp 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,190 @@
+(in-package :cl-user)
+
+(defpackage #:closer-mop
+ (:use #:common-lisp #:lispworks)
+ (:nicknames #:c2mop)
+
+ (:shadow #:defgeneric #:ensure-generic-function #:find-method
+ #:remove-method #:standard-generic-function)
+ (:export #:defgeneric #:ensure-generic-function #:find-method
+ #:remove-method #:standard-generic-function)
+
+ (:import-from #:clos
+
+ #:direct-slot-definition
+ #:effective-slot-definition
+ #-ecl #:eql-specializer
+ #:forward-referenced-class
+ #-ecl #:funcallable-standard-class
+ #-ecl #:funcallable-standard-object
+ #-ecl #:metaobject
+ #:slot-definition
+ #-ecl #:specializer
+ #-ecl #:standard-accessor-method
+ #:standard-direct-slot-definition
+ #:standard-effective-slot-definition
+ #-ecl #:standard-reader-method
+ #:standard-slot-definition
+ #-ecl #:standard-writer-method
+
+ #-ecl #:accessor-method-slot-definition
+ #-ecl #:add-dependent
+ #-ecl #:add-direct-method
+ #:add-direct-subclass
+ #:class-default-initargs
+ #:class-direct-default-initargs
+ #:class-direct-slots
+ #:class-direct-subclasses
+ #:class-direct-superclasses
+ #:class-finalized-p
+ #:class-precedence-list
+ #:class-prototype
+ #:class-slots
+ #-ecl #:compute-applicable-methods-using-classes
+ #:compute-class-precedence-list
+ #:compute-default-initargs
+ #:compute-discriminating-function
+ #:compute-effective-method
+ #:compute-effective-slot-definition
+ #:compute-slots
+ #:direct-slot-definition-class
+ #:effective-slot-definition-class
+ #:ensure-class
+ #:ensure-class-using-class
+ #:ensure-generic-function-using-class
+ #-ecl #:eql-specializer-object
+ #-ecl #:extract-lambda-list
+ #-ecl #:extract-specializer-names
+ #:finalize-inheritance
+ #-ecl #:find-method-combination
+ #:funcallable-standard-instance-access
+ #:generic-function-argument-precedence-order
+ #-ecl #:generic-function-declarations
+ #:generic-function-lambda-list
+ #:generic-function-method-class
+ #:generic-function-method-combination
+ #:generic-function-methods
+ #:generic-function-name
+ #-ecl #:intern-eql-specializer
+ #-ecl #:make-method-lambda
+ #-ecl #:map-dependents
+ #:method-function
+ #:method-generic-function
+ #:method-lambda-list
+ #:method-specializers
+ #-ecl #:reader-method-class
+ #-ecl #:remove-dependent
+ #-ecl #:remove-direct-method
+ #:remove-direct-subclass
+ #:set-funcallable-instance-function
+ #:slot-boundp-using-class
+ #:slot-definition-allocation
+ #:slot-definition-initargs
+ #:slot-definition-initform
+ #:slot-definition-initfunction
+ #:slot-definition-location
+ #:slot-definition-name
+ #:slot-definition-readers
+ #:slot-definition-writers
+ #:slot-definition-type
+ #:slot-makunbound-using-class
+ #:slot-value-using-class
+ #-ecl #:specializer-direct-generic-functions
+ #-ecl #:specializer-direct-methods
+ #:standard-instance-access
+ #-ecl #:update-dependent
+ #-ecl #:validate-superclass
+ #-ecl #:writer-method-class)
+
+ (:export
+ #:direct-slot-definition
+ #:effective-slot-definition
+ #:eql-specializer
+ #:forward-referenced-class
+ #-ecl #:funcallable-standard-class
+ #-ecl #:funcallable-standard-object
+ #-ecl #:metaobject
+ #:slot-definition
+ #-ecl #:specializer
+ #:standard-accessor-method
+ #:standard-direct-slot-definition
+ #:standard-effective-slot-definition
+ #:standard-reader-method
+ #:standard-slot-definition
+ #:standard-writer-method
+
+ #:ensure-finalized
+ #:ensure-method
+ #:fix-slot-initargs
+ #:required-args
+
+ #:accessor-method-slot-definition
+ #-ecl #:add-dependent
+ #:add-direct-method
+ #:add-direct-subclass
+ #:class-default-initargs
+ #:class-direct-default-initargs
+ #:class-direct-slots
+ #:class-direct-subclasses
+ #:class-direct-superclasses
+ #:class-finalized-p
+ #:class-precedence-list
+ #:class-prototype
+ #:class-slots
+ #-ecl #:compute-applicable-methods-using-classes
+ #:compute-class-precedence-list
+ #:compute-default-initargs
+ #:compute-discriminating-function
+ #:compute-effective-method
+ #:compute-effective-slot-definition
+ #:compute-slots
+ #:direct-slot-definition-class
+ #:effective-slot-definition-class
+ #:ensure-class
+ #:ensure-class-using-class
+ #:ensure-generic-function-using-class
+ #:eql-specializer-object
+ #:eql-specializer-object*
+ #:extract-lambda-list
+ #:extract-specializer-names
+ #:finalize-inheritance
+ #-ecl #:find-method-combination
+ #:funcallable-standard-instance-access
+ #:generic-function-argument-precedence-order
+ #-ecl #:generic-function-declarations
+ #:generic-function-lambda-list
+ #:generic-function-method-class
+ #:generic-function-method-combination
+ #:generic-function-methods
+ #:generic-function-name
+ #:intern-eql-specializer
+ #:intern-eql-specializer*
+ #-ecl #:make-method-lambda
+ #-ecl #:map-dependents
+ #:method-function
+ #:method-generic-function
+ #:method-lambda-list
+ #:method-specializers
+ #:reader-method-class
+ #-ecl #:remove-dependent
+ #:remove-direct-method
+ #:remove-direct-subclass
+ #:set-funcallable-instance-function
+ #:slot-boundp-using-class
+ #:slot-definition-allocation
+ #:slot-definition-initargs
+ #:slot-definition-initform
+ #:slot-definition-initfunction
+ #:slot-definition-location
+ #:slot-definition-name
+ #:slot-definition-readers
+ #:slot-definition-writers
+ #:slot-definition-type
+ #:slot-makunbound-using-class
+ #:slot-value-using-class
+ #:specializer-direct-generic-functions
+ #:specializer-direct-methods
+ #:standard-instance-access
+ #-ecl #:update-dependent
+ #-ecl #:validate-superclass
+ #:writer-method-class))
Added: branches/trunk-reorg/thirdparty/closer-mop/ecl/closer-mop.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/ecl/closer-mop.lisp 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/ecl/closer-mop.lisp 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,312 @@
+(in-package :closer-mop)
+
+;; Some utility functions.
+
+(defun required-args (lambda-list &optional (collector #'identity))
+ (loop for arg in lambda-list
+ until (member arg lambda-list-keywords)
+ collect (funcall collector arg)))
+
+(defun ensure-finalized (class &optional (errorp t))
+ (if (typep class 'class)
+ (unless (class-finalized-p class)
+ (finalize-inheritance class))
+ (when errorp (error "~S is not a class." class)))
+ class)
+
+(defun extract-lambda-list (lambda-list)
+ (loop for (arg . rest) on lambda-list
+ until (member arg lambda-list-keywords)
+ if (consp arg)
+ collect (car arg) into args
+ else collect arg into args
+ finally (return (if arg
+ (nconc args (cons arg rest))
+ args))))
+
+(defun extract-specializer-names (lambda-list)
+ (loop for arg in lambda-list
+ until (member arg lambda-list-keywords)
+ if (consp arg)
+ collect (cadr arg)
+ else collect 't))
+
+;; We need a new standard-generic-function for various things.
+
+(cl:defclass standard-generic-function (cl:standard-generic-function)
+ ())
+
+;; The following ensures that the new standard-generic-function is used.
+
+(defun ensure-generic-function
+ (name &rest args
+ &key (generic-function-class 'standard-generic-function)
+ &allow-other-keys)
+ (declare (dynamic-extent args))
+ (apply #'cl:ensure-generic-function name
+ :generic-function-class generic-function-class
+ args))
+
+#|
+(defun ensure-generic-function
+ (name &rest args
+ &key (generic-function-class 'standard-generic-function)
+ &allow-other-keys)
+ (declare (dynamic-extent args))
+ (when (fboundp name)
+ (let ((function (fdefinition name)))
+ (unless (typep function 'generic-function)
+ (cerror "Discard existing definition and create generic function."
+ "~S is already fbound, but not as a generic function." name)
+ (fmakunbound name))))
+ (if (fboundp name)
+ (let ((function (fdefinition name)))
+ (apply #'ensure-generic-function-using-class
+ function name args))
+ (apply #'ensure-generic-function-using-class nil name
+ :generic-function-class generic-function-class
+ args)))
+|#
+
+;; The standard accessor classes.
+
+(cl:defclass standard-accessor-method (standard-method)
+ ((slotd :initarg :slot-definition
+ :reader accessor-method-slot-definition)))
+
+(cl:defclass standard-reader-method (standard-accessor-method)
+ ())
+
+(cl:defclass standard-writer-method (standard-accessor-method)
+ ())
+
+;; In ECL, reader-method-class and writer-method-class are
+;; not used during class initialization. The following definitions
+;; correct this.
+
+(cl:defgeneric reader-method-class (class slot-definition &rest initargs)
+ (:method ((class class) slot-definition &rest initargs)
+ (declare (ignore slot-definition initargs))
+ (load-time-value (find-class 'standard-reader-method))))
+
+(cl:defgeneric writer-method-class (class slot-definition &rest initargs)
+ (:method ((class class) slot-definition &rest initargs)
+ (declare (ignore slot-definition initargs))
+ (load-time-value (find-class 'standard-writer-method))))
+
+(cl:defgeneric find-method (gf qualifiers specializers &optional errorp)
+ (:method ((gf generic-function) qualifiers specializers &optional (errorp t))
+ (cl:find-method gf qualifiers specializers errorp)))
+
+(defun modify-accessors (class)
+ (loop with reader-specializers = (list class)
+ with writer-specializers = (list (find-class 't) class)
+ for slotd in (class-direct-slots class) do
+ (loop for reader in (slot-definition-readers slotd)
+ for reader-function = (fdefinition reader)
+ for reader-method = (find-method reader-function () reader-specializers)
+ for initargs = (list :qualifiers ()
+ :lambda-list '(object)
+ :specializers reader-specializers
+ :function (method-function reader-method)
+ :slot-definition slotd)
+ for method-class = (apply #'reader-method-class class slotd initargs)
+ unless (eq method-class (class-of reader-method))
+ do (add-method reader-function (apply #'make-instance method-class initargs)))
+ (loop for writer in (slot-definition-writers slotd)
+ for writer-function = (fdefinition writer)
+ for writer-method = (find-method writer-function () writer-specializers)
+ for initargs = (list :qualifiers ()
+ :lambda-list '(new-value object)
+ :specializers writer-specializers
+ :function (method-function writer-method)
+ :slot-definition slotd)
+ for method-class = (apply #'writer-method-class class slotd initargs)
+ unless (eq method-class (class-of writer-method))
+ do (add-method writer-function (apply #'make-instance method-class initargs)))))
+
+;; During class re/initialization, we take care of the following things:
+;; - Optimization of slot accessors is deactivated.
+;; - Removal of direct subclasses.
+
+(cl:defmethod initialize-instance :around
+ ((class standard-class) &rest initargs)
+ (declare (dynamic-extent initargs))
+ (prog1 (apply #'call-next-method class
+ :optimize-slot-access nil
+ initargs)
+ (modify-accessors class)))
+
+(cl:defmethod reinitialize-instance :around
+ ((class standard-class) &rest initargs
+ &key (direct-superclasses () direct-superclasses-p))
+ (declare (dynamic-extent initargs))
+ (when direct-superclasses-p
+ (loop for superclass in (copy-list (class-direct-superclasses class))
+ unless (member superclass direct-superclasses)
+ do (remove-direct-subclass superclass class)))
+ (prog1 (apply #'call-next-method class
+ :optimize-slot-access nil
+ initargs)
+ (modify-accessors class)))
+
+;; In ECL, eql specializers are lists. We cannot change this
+;; but we can soften some of the incompatibilities.
+
+(defun eql-specializer-p (cons)
+ (and (consp cons)
+ (eq (car cons) 'eql)
+ (null (cddr cons))))
+
+(deftype eql-specializer ()
+ '(or eql-specializer*
+ (satisfies eql-specializer-p)))
+
+(cl:defgeneric eql-specializer-object (eql-specializer)
+ (:method ((cons cons))
+ (if (eql-specializer-p cons)
+ (cadr cons)
+ (error "~S is not an eql-specializer." cons))))
+
+(defun intern-eql-specializer (object)
+ `(eql ,object))
+
+(cl:defgeneric specializer-direct-methods (specializer))
+
+(cl:defclass eql-specializer* (standard-object)
+ ((obj :reader eql-specializer-object
+ :initarg eso
+ :initform (error "Use intern-eql-specializer to create eql-specializers."))
+ (direct-methods :reader specializer-direct-methods
+ :accessor es-direct-methods
+ :initform ())))
+
+(defvar *eql-specializers* (make-hash-table))
+
+(defun intern-eql-specializer* (object)
+ (or (gethash object *eql-specializers*)
+ (setf (gethash object *eql-specializers*)
+ (make-instance 'eql-specializer* 'eso object))))
+
+(defvar *direct-methods* (make-hash-table :test #'eq))
+
+(cl:defgeneric add-direct-method (specializer method)
+ (:method ((specializer class) (method method))
+ (pushnew method (gethash specializer *direct-methods*)))
+ (:method ((specializer eql-specializer*) (method method))
+ (pushnew method (es-direct-methods specializer))))
+
+(cl:defgeneric remove-direct-method (specializer method)
+ (:method ((specializer class) (method method))
+ (removef (gethash specializer *direct-methods*) method))
+ (:method ((specializer eql-specializer*) (method method))
+ (removef (es-direct-methods specializer) method)))
+
+(cl:defmethod specializer-direct-methods ((class class))
+ (gethash class *direct-methods*))
+
+(cl:defgeneric specializer-direct-generic-functions (specializer)
+ (:method ((class class))
+ (remove-duplicates
+ (mapcar #'method-generic-function
+ (specializer-direct-methods class))))
+ (:method ((eql-specializer eql-specializer*))
+ (remove-duplicates
+ (mapcar #'method-generic-function
+ (specializer-direct-methods eql-specializer))))
+ (:method ((cons cons))
+ (specializer-direct-generic-functions
+ (intern-eql-specializer*
+ (eql-specializer-object cons)))))
+
+;; The following method ensures that remove-method is called.
+
+(cl:defmethod add-method :before ((gf standard-generic-function) (method method))
+ (when-let (old-method (find-method gf (method-qualifiers method)
+ (method-specializers method) nil))
+ (remove-method gf old-method)))
+
+;; The following two methods ensure that add/remove-direct-method is called,
+;; and that the dependent protocol for generic function works.
+
+(cl:defmethod add-method :after ((gf standard-generic-function) (method method))
+ (loop for specializer in (method-specializers method)
+ do (add-direct-method
+ (if (consp specializer)
+ (intern-eql-specializer*
+ (eql-specializer-object specializer))
+ specializer)
+ method)))
+
+(cl:defgeneric remove-method (generic-function method)
+ (:method ((gf generic-function) (method method))
+ (cl:remove-method gf method)))
+
+(cl:defmethod remove-method :after ((gf generic-function) (method method))
+ (loop for specializer in (method-specializers method)
+ do (remove-direct-method
+ (if (consp specializer)
+ (intern-eql-specializer*
+ (eql-specializer-object specializer))
+ specializer)
+ method)))
+
+(defun ensure-method (gf lambda-expression
+ &key (qualifiers ())
+ (lambda-list (cadr lambda-expression))
+ (specializers (required-args lambda-list (constantly (find-class 't)))))
+ (funcall (compile nil `(lambda ()
+ (defmethod ,(generic-function-name gf) ,@qualifiers
+ ,(loop for specializer in specializers
+ for (arg . rest) on lambda-list
+ collect `(,arg ,specializer) into args
+ finally (return (nconc args rest)))
+ ,@(cddr lambda-expression))))))
+
+(defmacro defgeneric (&whole form name (&rest args) &body options)
+ (unless (every #'consp options)
+ (error "Illegal generic functions options in defgeneric form ~S." form))
+ `(cl:defgeneric ,name ,args
+ ,@options
+ ,@(unless (member :generic-function-class options :key #'car :test #'eq)
+ '((:generic-function-class standard-generic-function)))))
+
+;; The following can be used in direct-slot-definition-class to get the correct initargs
+;; for a slot. Use it like this:
+;;
+;; (defmethod direct-slot-definition-class
+;; ((class my-standard-class) &rest initargs)
+;; (declare (dynamic-extent initargs))
+;; (destructuring-bind
+;; (&key key-of-interest &allow-other-keys)
+;; (fix-slot-initargs initargs)
+;; ...))
+
+(defvar *standard-slot-keys*
+ '(:name :documentation
+ :initargs :initform :initfunction
+ :readers :writers))
+
+(defun fix-slot-initargs (initargs)
+ (let* ((counts (loop with counts
+ for (key nil) on initargs by #'cddr
+ do (incf (getf counts key 0))
+ finally (return counts)))
+ (keys-to-fix (loop for (key value) on counts by #'cddr
+ if (> value 1) collect key)))
+ (if keys-to-fix
+ (let ((multiple-standard-keys
+ (intersection keys-to-fix *standard-slot-keys*)))
+ (if multiple-standard-keys
+ (error "Too many occurences of ~S in slot initargs ~S."
+ multiple-standard-keys initargs)
+ (loop with fixed-keys
+ for (key value) on initargs by #'cddr
+ if (member key keys-to-fix)
+ do (nconcf (getf fixed-keys key) (list value))
+ else nconc (list key value) into fixed-initargs
+ finally (return (nconc fixed-initargs fixed-keys)))))
+ initargs)))
+
+(eval-when (:compile-toplevel :load-toplevel :execute)
+ (pushnew :closer-mop *features*))
Added: branches/trunk-reorg/thirdparty/closer-mop/features.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/features.lisp 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/features.lisp 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,498 @@
+
+:allegro7.0
+((:class-default-initargs)
+ (:class-direct-default-initargs)
+ (:compute-default-initargs) ; -> :compute-default-initargs-allegro
+ (:default-superclass-for-funcallable-standard-class-is-funcallable-standard-object)
+ (:defgeneric-calls-find-method-combination)
+ (:defmethod-calls-make-method-lambda)
+ (:dependent-protocol-for-generic-functions fixed)
+ (:extensible-allocation fixed)
+ (:function-invocation-calls-compute-applicable-methods)
+ (:function-invocation-calls-compute-applicable-methods-using-classes)
+ (:function-invocation-calls-compute-effective-method)
+ (:make-method-lambda)
+ (:method-functions-take-processed-parameters)
+ (:method-lambdas-are-processed)
+ (:multiple-qualifiers)
+ (:reinitialize-instance-calls-compute-discriminating-function fixed)
+ (:setf-class-name-calls-reinitialize-instance)
+ (:setf-generic-function-name-calls-reinitialize-instance)
+ (:slot-boundp-using-class-specialized-on-slot-definition fixed)
+ (:slot-makunbound-using-class-specialized-on-slot-definition fixed)
+ (:standard-class-and-funcallable-standard-class-are-compatible)
+ (:subclasses-of-built-in-class-do-not-inherit-exported-slots)
+ (:subclasses-of-forward-referenced-class-do-not-inherit-exported-slots)
+ (:subclasses-of-funcallable-standard-class-do-not-inherit-exported-slots)
+ (:subclasses-of-method-combination-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-accessor-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-class-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-direct-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-effective-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-generic-function-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-reader-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-writer-method-do-not-inherit-exported-slots)
+ (:t-is-always-a-valid-superclass))
+
+:allegro8.0
+((:class-default-initargs)
+ (:class-direct-default-initargs)
+ (:compute-default-initargs) ; -> :compute-default-initargs-allegro
+ (:default-superclass-for-funcallable-standard-class-is-funcallable-standard-object)
+ (:defgeneric-calls-find-method-combination)
+ (:defmethod-calls-make-method-lambda)
+ (:dependent-protocol-for-generic-functions fixed)
+ (:extensible-allocation fixed)
+ (:function-invocation-calls-compute-applicable-methods)
+ (:function-invocation-calls-compute-applicable-methods-using-classes)
+ (:function-invocation-calls-compute-effective-method)
+ (:make-method-lambda)
+ (:method-functions-take-processed-parameters)
+ (:method-lambdas-are-processed)
+ (:reinitialize-instance-calls-compute-discriminating-function fixed)
+ (:setf-class-name-calls-reinitialize-instance)
+ (:setf-generic-function-name-calls-reinitialize-instance)
+ (:slot-boundp-using-class-specialized-on-slot-definition fixed)
+ (:slot-makunbound-using-class-specialized-on-slot-definition fixed)
+ (:standard-class-and-funcallable-standard-class-are-compatible)
+ (:subclasses-of-built-in-class-do-not-inherit-exported-slots)
+ (:subclasses-of-forward-referenced-class-do-not-inherit-exported-slots)
+ (:subclasses-of-funcallable-standard-class-do-not-inherit-exported-slots)
+ (:subclasses-of-method-combination-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-accessor-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-class-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-direct-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-effective-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-generic-function-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-reader-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-writer-method-do-not-inherit-exported-slots)
+ (:t-is-always-a-valid-superclass))
+
+:allegro8.1
+((:class-default-initargs)
+ (:class-direct-default-initargs)
+ (:compute-default-initargs) ; -> :compute-default-initargs-allegro
+ (:default-superclass-for-funcallable-standard-class-is-funcallable-standard-object)
+ (:defgeneric-calls-find-method-combination)
+ (:defmethod-calls-make-method-lambda)
+ (:dependent-protocol-for-generic-functions fixed)
+ (:extensible-allocation fixed)
+ (:function-invocation-calls-compute-applicable-methods)
+ (:function-invocation-calls-compute-applicable-methods-using-classes)
+ (:function-invocation-calls-compute-effective-method)
+ (:make-method-lambda)
+ (:method-functions-take-processed-parameters)
+ (:method-lambdas-are-processed)
+ (:reinitialize-instance-calls-compute-discriminating-function fixed)
+ (:setf-class-name-calls-reinitialize-instance)
+ (:setf-generic-function-name-calls-reinitialize-instance)
+ (:slot-makunbound-using-class-specialized-on-slot-definition fixed)
+ (:standard-class-and-funcallable-standard-class-are-compatible)
+ (:subclasses-of-built-in-class-do-not-inherit-exported-slots)
+ (:subclasses-of-forward-referenced-class-do-not-inherit-exported-slots)
+ (:subclasses-of-funcallable-standard-class-do-not-inherit-exported-slots)
+ (:subclasses-of-method-combination-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-accessor-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-class-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-direct-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-effective-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-generic-function-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-reader-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-writer-method-do-not-inherit-exported-slots)
+ (:t-is-always-a-valid-superclass))
+
+:clisp2.35-2.36
+((:accessor-method-initialized-with-function)
+ (:add-method-calls-compute-discriminating-function)
+ (:compute-slots-requested-slot-order-honoured)
+ (:defmethod-calls-make-method-lambda)
+ (:extensible-allocation)
+ (:forward-referenced-class-changed-by-change-class)
+ (:initialize-instance-calls-compute-discriminating-function)
+ (:make-method-lambda)
+ (:method-initialized-with-function)
+ (:method-lambdas-are-processed)
+ (:reinitialize-instance-calls-compute-discriminating-function)
+ (:reinitialize-instance-calls-finalize-inheritance)
+ (:remove-method-calls-compute-discriminating-function)
+ (:subclasses-of-method-combination-do-not-inherit-exported-slots))
+
+:clisp2.37-2.39
+((:accessor-method-initialized-with-function)
+ (:add-method-calls-compute-discriminating-function)
+ (:compute-slots-requested-slot-order-honoured)
+ (:defmethod-calls-make-method-lambda)
+ (:forward-referenced-class-changed-by-change-class)
+ (:initialize-instance-calls-compute-discriminating-function)
+ (:make-method-lambda)
+ (:method-initialized-with-function)
+ (:method-lambdas-are-processed)
+ (:reinitialize-instance-calls-compute-discriminating-function)
+ (:reinitialize-instance-calls-finalize-inheritance)
+ (:remove-method-calls-compute-discriminating-function)
+ (:subclasses-of-method-combination-do-not-inherit-exported-slots))
+
+:clisp2.40-2.41
+((:accessor-method-initialized-with-function)
+ (:add-method-calls-compute-discriminating-function)
+ (:compute-slots-requested-slot-order-honoured)
+ (:defmethod-calls-make-method-lambda)
+ (:forward-referenced-class-changed-by-change-class)
+ (:initialize-instance-calls-compute-discriminating-function)
+ (:make-method-lambda)
+ (:method-initialized-with-function)
+ (:method-lambdas-are-processed)
+ (:reinitialize-instance-calls-compute-discriminating-function)
+ (:remove-method-calls-compute-discriminating-function)
+ (:subclasses-of-method-combination-do-not-inherit-exported-slots))
+
+:cmu19c-19d
+((:accessor-method-initialized-with-function fixed)
+ (:accessor-method-initialized-with-lambda-list fixed)
+ (:accessor-method-initialized-with-slot-definition fixed)
+ (:accessor-method-initialized-with-specializers fixed)
+ (:anonymous-classes fixed)
+ (:class-default-initargs)
+ (:class-direct-default-initargs)
+ (:class-initialization-calls-reader-method-class fixed)
+ (:class-initialization-calls-writer-method-class fixed)
+ (:discriminating-functions-can-be-closures)
+ (:discriminating-functions-can-be-funcalled)
+ (:documentation-passed-to-effective-slot-definition-class)
+ (:effective-slot-definition-initialized-with-documentation)
+ (:method-initialized-with-function)
+ (:multiple-slot-options-passed-as-list-to-direct-slot-definition-class) ; fix with fix-slot-initargs
+ (:reinitialize-instance-calls-compute-discriminating-function fixed)
+ (:reinitialize-instance-calls-finalize-inheritance)
+ (:setf-class-name-calls-reinitialize-instance)
+ (:setf-generic-function-name-calls-reinitialize-instance)
+ (:slot-definition-documentation fixed)
+ (:standard-class-and-funcallable-standard-class-are-compatible)
+ (:subclasses-of-built-in-class-do-not-inherit-exported-slots)
+ (:subclasses-of-class-do-not-inherit-exported-slots)
+ (:subclasses-of-direct-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-effective-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-eql-specializer-do-not-inherit-exported-slots)
+ (:subclasses-of-forward-referenced-class-do-not-inherit-exported-slots)
+ (:subclasses-of-funcallable-standard-class-do-not-inherit-exported-slots)
+ (:subclasses-of-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-specializer-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-accessor-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-class-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-direct-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-effective-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-generic-function-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-reader-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-writer-method-do-not-inherit-exported-slots))
+
+:ecl0.9i
+((:accessor-method-initialized-with-function fixed)
+ (:accessor-method-initialized-with-lambda-list fixed)
+ (:accessor-method-initialized-with-slot-definition fixed)
+ (:accessor-method-initialized-with-specializers fixed)
+ (:accessor-method-slot-definition fixed)
+ (:add-direct-method fixed)
+ (:add-method-calls-add-direct-method fixed)
+ (:add-method-calls-compute-discriminating-function)
+ (:add-method-calls-remove-method fixed)
+ (:add-method-updates-specializer-direct-generic-functions fixed)
+ (:add-method-updates-specializer-direct-methods fixed)
+ (:class-default-initargs)
+ (:class-direct-default-initargs)
+ (:class-initialization-calls-reader-method-class fixed)
+ (:class-initialization-calls-writer-method-class fixed)
+ (:class-reinitialization-calls-remove-direct-subclass fixed)
+ (:classes-are-always-their-own-valid-superclasses)
+ (:compute-applicable-methods-is-generic)
+ (:compute-applicable-methods-using-classes)
+ (:compute-effective-method-is-generic)
+ (:default-superclass-for-funcallable-standard-class-is-funcallable-standard-object)
+ (:default-reader-methods-are-standard-reader-methods fixed)
+ (:default-writer-methods-are-standard-writer-methods fixed)
+ (:defgeneric-calls-find-method-combination)
+ (:defmethod-calls-generic-function-method-class)
+ (:defmethod-calls-initialize-instance)
+ (:defmethod-calls-make-method-lambda)
+ (:dependent-protocol-for-classes)
+ (:dependent-protocol-for-generic-functions)
+ (:direct-slot-definition-initialized-with-type)
+ (:discriminating-functions-can-be-closures)
+ (:discriminating-functions-can-be-funcalled)
+ (:eql-specializer)
+ (:eql-specializer-object fixed)
+ (:eql-specializers-are-objects)
+ (:extract-lambda-list fixed)
+ (:extract-specializer-names fixed)
+ (:find-method-combination)
+ (:find-method-is-generic fixed)
+ (:funcallable-standard-class)
+ (:funcallable-standard-object)
+ (:function-invocation-calls-compute-applicable-methods)
+ (:function-invocation-calls-compute-applicable-methods-using-classes)
+ (:function-invocation-calls-compute-effective-method)
+ (:generic-function-declarations)
+ (:generic-function-method-class-is-generic)
+ (:generic-function-method-combination)
+ (:generic-functions-can-be-empty)
+ (:initform-passed-to-direct-slot-definition-class)
+ (:initform-passed-to-effective-slot-definition-class)
+ (:initialize-instance-calls-compute-discriminating-function)
+ (:intern-eql-specializer fixed)
+ (:make-method-lambda)
+ (:metaobject)
+ (:method-functions-take-processed-parameters)
+ (:method-initialized-with-documentation)
+ (:method-initialized-with-function)
+ (:method-initialized-with-lambda-list)
+ (:method-initialized-with-qualifiers)
+ (:method-initialized-with-specializers)
+ (:method-lambdas-are-processed)
+ (:multiple-slot-options-passed-as-list-to-direct-slot-definition-class)
+ (:reader-method-class fixed)
+ (:reinitialize-instance-calls-compute-discriminating-function)
+ (:remove-direct-method fixed)
+ (:remove-method-calls-compute-discriminating-function)
+ (:remove-method-calls-remove-direct-method fixed)
+ (:remove-method-is-generic fixed)
+ (:setf-class-name-calls-reinitialize-instance)
+ (:setf-generic-function-name)
+ (:setf-generic-function-name-calls-reinitialize-instance)
+ (:slot-definition-documentation)
+ (:slot-definition-initform)
+ (:slot-definition-initfunction)
+ (:slot-definition-type)
+ (:slot-reader-calls-slot-value-using-class fixed)
+ (:slot-writer-calls-slot-value-using-class fixed)
+ (:specializer)
+ (:specializer-direct-generic-functions fixed)
+ (:specializer-direct-methods fixed)
+ (:standard-accessor-method fixed)
+ (:standard-class-and-funcallable-standard-class-are-compatible)
+ (:standard-reader-method fixed)
+ (:standard-writer-method fixed)
+ (:subclasses-of-built-in-class-do-not-inherit-exported-slots)
+ (:subclasses-of-class-do-not-inherit-exported-slots)
+ (:subclasses-of-direct-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-effective-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-forward-referenced-class-do-not-inherit-exported-slots)
+ (:subclasses-of-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-class-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-direct-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-effective-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-generic-function-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-slot-definition-do-not-inherit-exported-slots)
+ (:t-is-always-a-valid-superclass)
+ (:type-passed-to-direct-slot-definition-class)
+ (:validate-superclass)
+ (:writer-method-class fixed))
+
+:lispworks4.4
+((:add-method-calls-add-direct-method fixed)
+ (:add-method-calls-compute-discriminating-function)
+ (:add-method-calls-remove-method fixed)
+ (:add-method-updates-specializer-direct-generic-functions fixed)
+ (:allocation-passed-to-effective-slot-definition-class) ; instead :flags-passed-to-effective-slot-definition-class
+ (:class-default-initargs)
+ (:class-direct-default-initargs)
+ (:class-initialized-with-direct-default-initargs) ; instead: conditionalization
+ (:class-reinitialization-calls-remove-direct-subclass fixed)
+ (:compute-applicable-methods-using-classes)
+ (:compute-default-initargs)
+ (:defgeneric-calls-find-method-combination)
+ (:direct-superclasses-by-default-empty) ; not fixed, but direct superclasses are automatically adjusted
+ (:effective-slot-definition-initialized-with-allocation) ; instead :effective-slot-definition-initialized-with-flags
+ (:eql-specializer) ; partially fixed
+ (:eql-specializer-object fixed)
+ (:eql-specializers-are-objects)
+ (:extensible-allocation)
+ (:finalize-inheritance-calls-compute-default-initargs)
+ (:find-method-combination fixed) ; partially
+ (:funcallable-standard-instance-access)
+ (:function-invocation-calls-compute-applicable-methods)
+ (:function-invocation-calls-compute-applicable-methods-using-classes)
+ (:generic-function-initialized-with-declarations) ; map from generic-function-initialized-with-declare
+ (:initialize-instance-calls-compute-discriminating-function)
+ (:intern-eql-specializer fixed) ; partially
+ (:make-method-lambda fixed) ; partially
+ (:method-functions-take-processed-parameters)
+ (:reinitialize-instance-calls-compute-discriminating-function)
+ (:remove-method-calls-compute-discriminating-function)
+ (:remove-method-calls-remove-direct-method fixed)
+ (:setf-class-name-calls-reinitialize-instance)
+ (:setf-generic-function-name-calls-reinitialize-instance)
+ (:setf-slot-value-using-class-specialized-on-slot-definition fixed)
+ (:slot-boundp-using-class-specialized-on-slot-definition fixed)
+ (:slot-makunbound-using-class-specialized-on-slot-definition fixed)
+ (:slot-reader-calls-slot-value-using-class fixed)
+ (:slot-value-using-class-specialized-on-slot-definition fixed)
+ (:slot-writer-calls-slot-value-using-class fixed)
+ (:specializer)
+ (:specializer-direct-generic-functions fixed)
+ (:standard-class-and-funcallable-standard-class-are-compatible)
+ (:standard-instance-access)
+ (:subclasses-of-built-in-class-do-not-inherit-exported-slots fixed)
+ (:subclasses-of-class-do-not-inherit-exported-slots fixed)
+ (:subclasses-of-direct-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-effective-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-forward-referenced-class-do-not-inherit-exported-slots fixed)
+ (:subclasses-of-funcallable-standard-class-do-not-inherit-exported-slots fixed)
+ (:subclasses-of-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-accessor-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-class-do-not-inherit-exported-slots fixed)
+ (:subclasses-of-standard-direct-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-effective-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-generic-function-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-reader-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-writer-method-do-not-inherit-exported-slots))
+
+:lispworks5.0-5.0.2
+((:add-method-calls-compute-discriminating-function)
+ (:add-method-updates-specializer-direct-generic-functions fixed)
+ (:class-default-initargs)
+ (:class-direct-default-initargs)
+ (:compute-applicable-methods-using-classes)
+ (:compute-default-initargs)
+ (:defgeneric-calls-find-method-combination)
+ (:eql-specializer) ; partially fixed
+ (:eql-specializer-object fixed)
+ (:eql-specializers-are-objects)
+ (:extensible-allocation)
+ (:finalize-inheritance-calls-compute-default-initargs)
+ (:find-method-combination fixed) ; partially
+ (:funcallable-standard-instance-access)
+ (:function-invocation-calls-compute-applicable-methods)
+ (:function-invocation-calls-compute-applicable-methods-using-classes)
+ (:initialize-instance-calls-compute-discriminating-function)
+ (:intern-eql-specializer fixed) ; partially
+ (:make-method-lambda fixed) ; partially
+ (:method-functions-take-processed-parameters)
+ (:reinitialize-instance-calls-compute-discriminating-function)
+ (:remove-method-calls-compute-discriminating-function)
+ (:setf-slot-value-using-class-specialized-on-slot-definition fixed)
+ (:slot-boundp-using-class-specialized-on-slot-definition fixed)
+ (:slot-makunbound-using-class-specialized-on-slot-definition fixed)
+ (:slot-reader-calls-slot-value-using-class fixed)
+ (:slot-value-using-class-specialized-on-slot-definition fixed)
+ (:slot-writer-calls-slot-value-using-class fixed)
+ (:specializer)
+ (:specializer-direct-generic-functions fixed)
+ (:standard-class-and-funcallable-standard-class-are-compatible)
+ (:standard-instance-access)
+ (:subclasses-of-built-in-class-do-not-inherit-exported-slots fixed)
+ (:subclasses-of-class-do-not-inherit-exported-slots fixed)
+ (:subclasses-of-direct-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-effective-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-forward-referenced-class-do-not-inherit-exported-slots fixed)
+ (:subclasses-of-funcallable-standard-class-do-not-inherit-exported-slots fixed)
+ (:subclasses-of-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-accessor-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-class-do-not-inherit-exported-slots fixed)
+ (:subclasses-of-standard-direct-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-effective-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-generic-function-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-reader-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-writer-method-do-not-inherit-exported-slots))
+
+:mcl
+((:add-method-calls-compute-discriminating-function)
+ (:compute-applicable-methods-using-classes)
+ (:default-superclass-for-funcallable-standard-class-is-funcallable-standard-object)
+ (:defmethod-calls-generic-function-method-class)
+ (:defmethod-calls-make-method-lambda)
+ (:discriminating-functions-can-be-closures)
+ (:discriminating-functions-can-be-funcalled)
+ (:funcallable-standard-object)
+ (:function-invocation-calls-compute-applicable-methods)
+ (:function-invocation-calls-compute-applicable-methods-using-classes)
+ (:function-invocation-calls-compute-effective-method)
+ (:generic-function-declarations)
+ (:generic-function-initialized-with-declarations)
+ (:generic-functions-can-be-empty)
+ (:initialize-instance-calls-compute-discriminating-function)
+ (:make-method-lambda)
+ (:method-functions-take-processed-parameters)
+ (:method-lambdas-are-processed)
+ (:reinitialize-instance-calls-compute-discriminating-function)
+ (:reinitialize-lambda-list-reinitializes-argument-precedence-order)
+ (:remove-method-calls-compute-discriminating-function)
+ (:set-funcallable-instance-function)
+ (:setf-generic-function-name)
+ (:setf-generic-function-name-calls-reinitialize-instance)
+; ---
+ (:compute-slots-requested-slot-order-honoured)
+ (:direct-slot-definition fixed)
+ (:direct-superclasses-by-default-empty) ; not fixed, but direct superclasses are automatically adjusted, not for funcallable-standard-class though
+ (:effective-slot-definition fixed)
+ (:eql-specializer fixed)
+ (:extensible-allocation)
+ (:multiple-slot-options-passed-as-list-to-direct-slot-definition-class) ; fix with fix-slot-initargs
+ (:reinitialize-instance-calls-finalize-inheritance)
+ (:setf-class-name-calls-reinitialize-instance)
+ (:slot-definition fixed)
+ (:standard-slot-definition fixed)
+ (:subclasses-of-direct-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-effective-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-accessor-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-direct-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-effective-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-generic-function-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-reader-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-writer-method-do-not-inherit-exported-slots))
+
+:openmcl
+((:add-method-calls-compute-discriminating-function)
+ (:compute-applicable-methods-using-classes)
+ (:default-superclass-for-funcallable-standard-class-is-funcallable-standard-object)
+ (:defmethod-calls-generic-function-method-class)
+ (:defmethod-calls-make-method-lambda)
+ (:discriminating-functions-can-be-closures)
+ (:discriminating-functions-can-be-funcalled)
+ (:funcallable-standard-object)
+ (:function-invocation-calls-compute-applicable-methods)
+ (:function-invocation-calls-compute-applicable-methods-using-classes)
+ (:function-invocation-calls-compute-effective-method)
+ (:generic-functions-can-be-empty)
+ (:initialize-instance-calls-compute-discriminating-function)
+ (:make-method-lambda)
+ (:method-functions-take-processed-parameters)
+ (:method-lambdas-are-processed)
+ (:reinitialize-instance-calls-compute-discriminating-function)
+ (:reinitialize-lambda-list-reinitializes-argument-precedence-order)
+ (:remove-method-calls-compute-discriminating-function)
+; ---
+ (:compute-slots-requested-slot-order-honoured)
+ (:eql-specializer fixed)
+ (:reinitialize-instance-calls-finalize-inheritance)
+ (:slot-definition-documentation fixed)
+ (:subclasses-of-direct-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-effective-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-generic-function-do-not-inherit-exported-slots)
+ (:subclasses-of-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-accessor-method-do-not-inherit-exported-slot)
+ (:subclasses-of-standard-direct-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-effective-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-generic-function-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-reader-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-slot-definition-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-accessor-method-do-not-inherit-exported-slots)
+ (:subclasses-of-standard-writer-method-do-not-inherit-exported-slots))
+
+:sbcl 0.9.16-1.0.10
+#| all features implemented |#
Added: branches/trunk-reorg/thirdparty/closer-mop/features.txt
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/features.txt 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/features.txt 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,225 @@
+Features that don't adhere to AMOP in various CLOS MOP implementations, and whether and how they are resolved in Closer to MOP.
+
+Allegro Common Lisp 7.0
+
+- CLASS-DIRECT-DEFAULT-INITARGS and CLASS-DEFAULT-INITARGS don't return canonicalized default initargs as specified. Not fixed.
+- COMPUTE-DEFAULT-INITARGS takes more parameters than specified. Not fixed. Conditionalize on #+allegro for your own methods instead.
+- FUNCALLABLE-STANDARD-OBJECT is not used as the default superclass for classes with :metaclass FUNCALLABLE-STANDARD-CLASS.
+- DEFGENERIC does not call FIND-METHOD-COMBINATION. Not fixed.
+- DEFMETHOD doesn't call MAKE-METHOD-LAMBDA. Not fixed.
+- The dependent protocol for generic functions doesn't work fully. Fixed.
+- The function invocation protocol doesn't call COMPUTE-APPLICABLE-METHODS, COMPUTE-APPLICABLE-METHODS-USING-CLASSES and COMPUTE-EFFECTIVE-METHOD. Not fixed.
+- The :ALLOCATION type cannot be extended. Fixed.
+- MAKE-METHOD-LAMBDA is not provided. Not fixed.
+- Method functions don't take parameters as specified in AMOP, but instead just the parameters that the generic function receives. Not fixed.
+- The defmethod form does not accept multiple qualifiers. Not fixed.
+- REINITIALIZE-INSTANCE doesn't determine a new discriminating function. Fixed.
+- (SETF CLASS-NAME) and (SETF GENERIC-FUNCTION-NAME) do not use REINITIALIZE-INSTANCE for changing the names. Not fixed.
+- SLOT-BOUNDP-USING-CLASS and SLOT-MAKUNBOUND-USING-CLASS are not specialized on slot definition metaobjects, but on symbols. Fixed.
+- STANDARD-CLASS and FUNCALLABLE-STANDARD-CLASS are not compatible. Not fixed.
+- VALIDATE-SUPERCLASS doesn't recognize T as a valid superclass. Not fixed.
+- Subclasses of BUILT-IN-CLASS, FORWARD-REFERENCED-CLASS, FUNCALLABLE-STANDARD-CLASS, METHOD-COMBINATION, STANDARD-ACCESSOR-METHOD, STANDARD-CLASS, STANDARD-DIRECT-SLOT-DEFINITION, STANDARD-EFFECTIVE-SLOT-DEFINITION, STANDARD-GENERIC-FUNCTION, STANDARD-METHOD, STANDARD-READER-METHOD, STANDARD-SLOT-DEFINITION and STANDARD-WRITER-METHOD will inherit slots whose names are exported symbols and/or accessible in the package common-lisp-user. Not fixed.
+
+Allegro Common Lisp 8.0
+
+- CLASS-DIRECT-DEFAULT-INITARGS and CLASS-DEFAULT-INITARGS don't return canonicalized default initargs as specified. Not fixed.
+- COMPUTE-DEFAULT-INITARGS takes more parameters than specified. Not fixed. Conditionalize on #+allegro for your own methods instead.
+- FUNCALLABLE-STANDARD-OBJECT is not used as the default superclass for classes with :metaclass FUNCALLABLE-STANDARD-CLASS.
+- DEFGENERIC does not call FIND-METHOD-COMBINATION. Not fixed.
+- DEFMETHOD doesn't call MAKE-METHOD-LAMBDA. Not fixed.
+- The dependent protocol for generic functions doesn't work fully. Fixed.
+- The function invocation protocol doesn't call COMPUTE-APPLICABLE-METHODS, COMPUTE-APPLICABLE-METHODS-USING-CLASSES and COMPUTE-EFFECTIVE-METHOD. Not fixed.
+- The :ALLOCATION type cannot be extended. Fixed.
+- MAKE-METHOD-LAMBDA is not provided. Not fixed.
+- Method functions don't take parameters as specified in AMOP, but instead just the parameters that the generic function receives. Not fixed.
+- REINITIALIZE-INSTANCE doesn't determine a new discriminating function. Fixed.
+- (SETF CLASS-NAME) and (SETF GENERIC-FUNCTION-NAME) do not use REINITIALIZE-INSTANCE for changing the names. Not fixed.
+- SLOT-BOUNDP-USING-CLASS and SLOT-MAKUNBOUND-USING-CLASS are not specialized on slot definition metaobjects, but on symbols. Fixed.
+- STANDARD-CLASS and FUNCALLABLE-STANDARD-CLASS are not compatible. Not fixed.
+- VALIDATE-SUPERCLASS doesn't recognize T as a valid superclass. Not fixed.
+- Subclasses of BUILT-IN-CLASS, FORWARD-REFERENCED-CLASS, FUNCALLABLE-STANDARD-CLASS, METHOD-COMBINATION, STANDARD-ACCESSOR-METHOD, STANDARD-CLASS, STANDARD-DIRECT-SLOT-DEFINITION, STANDARD-EFFECTIVE-SLOT-DEFINITION, STANDARD-GENERIC-FUNCTION, STANDARD-METHOD, STANDARD-READER-METHOD, STANDARD-SLOT-DEFINITION and STANDARD-WRITER-METHOD will inherit slots whose names are exported symbols and/or accessible in the package common-lisp-user. Not fixed.
+
+Allegro Common Lisp 8.1
+
+- CLASS-DIRECT-DEFAULT-INITARGS and CLASS-DEFAULT-INITARGS don't return canonicalized default initargs as specified. Not fixed.
+- COMPUTE-DEFAULT-INITARGS takes more parameters than specified. Not fixed. Conditionalize on #+allegro for your own methods instead.
+- FUNCALLABLE-STANDARD-OBJECT is not used as the default superclass for classes with :metaclass FUNCALLABLE-STANDARD-CLASS.
+- DEFGENERIC does not call FIND-METHOD-COMBINATION. Not fixed.
+- DEFMETHOD doesn't call MAKE-METHOD-LAMBDA. Not fixed.
+- The dependent protocol for generic functions doesn't work fully. Fixed.
+- The function invocation protocol doesn't call COMPUTE-APPLICABLE-METHODS, COMPUTE-APPLICABLE-METHODS-USING-CLASSES and COMPUTE-EFFECTIVE-METHOD. Not fixed.
+- The :ALLOCATION type cannot be extended. Fixed.
+- MAKE-METHOD-LAMBDA is not provided. Not fixed.
+- Method functions don't take parameters as specified in AMOP, but instead just the parameters that the generic function receives. Not fixed.
+- REINITIALIZE-INSTANCE doesn't determine a new discriminating function. Fixed.
+- (SETF CLASS-NAME) and (SETF GENERIC-FUNCTION-NAME) do not use REINITIALIZE-INSTANCE for changing the names. Not fixed.
+- SLOT-MAKUNBOUND-USING-CLASS is not specialized on slot definition metaobjects, but on symbols. Fixed.
+- STANDARD-CLASS and FUNCALLABLE-STANDARD-CLASS are not compatible. Not fixed.
+- VALIDATE-SUPERCLASS doesn't recognize T as a valid superclass. Not fixed.
+- Subclasses of BUILT-IN-CLASS, FORWARD-REFERENCED-CLASS, FUNCALLABLE-STANDARD-CLASS, METHOD-COMBINATION, STANDARD-ACCESSOR-METHOD, STANDARD-CLASS, STANDARD-DIRECT-SLOT-DEFINITION, STANDARD-EFFECTIVE-SLOT-DEFINITION, STANDARD-GENERIC-FUNCTION, STANDARD-METHOD, STANDARD-READER-METHOD, STANDARD-SLOT-DEFINITION and STANDARD-WRITER-METHOD will inherit slots whose names are exported symbols and/or accessible in the package common-lisp-user. Not fixed.
+
+CLisp 2.35 and 2.36
+
+None of the incompatibilities in CLisp are fixed.
+
+- Methods are not initialized with :function.
+- ADD-METHOD, REMOVE-METHOD, INITIALIZE-INSTANCE and REINITIALIZE-INSTANCE do not determine a new discriminating function. This is postponed until function invocation instead, so shouldn't be a problem in practice.
+- The slot order requested by a primary method for COMPUTE-SLOTS is not honoured by this MOP.
+- DEFMETHOD does not call MAKE-METHOD-LAMBDA.
+- The :ALLOCATION type cannot be extended. Not fixed.
+- A FORWARD-REFERENCED-CLASS is not changed via CHANGE-CLASS (but is correctly reinitialized via REINITIALIZE-INSTANCE).
+- MAKE-METHOD-LAMBDA is not provided.
+- REINITIALIZE-INSTANCE of a class metaobject doesn't invoke FINALIZE-INHERITANCE again. Not fixed.
+- Subclasses of METHOD-COMBINATION will inherit slots whose names are exported symbols and/or accessible in the package common-lisp-user. Not fixed.
+
+CLisp 2.37 - 2.39
+
+None of the incompatibilities in CLisp are fixed.
+
+- Methods are not initialized with :function.
+- ADD-METHOD, REMOVE-METHOD, INITIALIZE-INSTANCE and REINITIALIZE-INSTANCE do not determine a new discriminating function. This is postponed until function invocation instead, so shouldn't be a problem in practice.
+- The slot order requested by a primary method for COMPUTE-SLOTS is not honoured by this MOP.
+- DEFMETHOD does not call MAKE-METHOD-LAMBDA.
+- A FORWARD-REFERENCED-CLASS is not changed via CHANGE-CLASS (but is correctly reinitialized via REINITIALIZE-INSTANCE).
+- MAKE-METHOD-LAMBDA is not provided.
+- REINITIALIZE-INSTANCE of a class metaobject doesn't invoke FINALIZE-INHERITANCE again. Not fixed.
+- Subclasses of METHOD-COMBINATION will inherit slots whose names are exported symbols and/or accessible in the package common-lisp-user. Not fixed.
+
+CLisp 2.40 and 2.41
+
+None of the incompatibilities in CLisp are fixed.
+
+- Methods are not initialized with :function.
+- ADD-METHOD, REMOVE-METHOD, INITIALIZE-INSTANCE and REINITIALIZE-INSTANCE do not determine a new discriminating function. This is postponed until function invocation instead, so shouldn't be a problem in practice.
+- The slot order requested by a primary method for COMPUTE-SLOTS is not honoured by this MOP.
+- DEFMETHOD does not call MAKE-METHOD-LAMBDA.
+- A FORWARD-REFERENCED-CLASS is not changed via CHANGE-CLASS (but is correctly reinitialized via REINITIALIZE-INSTANCE).
+- MAKE-METHOD-LAMBDA is not provided.
+- Subclasses of METHOD-COMBINATION will inherit slots whose names are exported symbols and/or accessible in the package common-lisp-user. Not fixed.
+
+CMUCL 19c, 19d
+
+- CLASS-DIRECT-DEFAULT-INITARGS and CLASS-DEFAULT-INITARGS don't return canonicalized default initargs as specified. Not fixed.
+- Accessor methods are not initialized with :function, :lambda-list, :slot-definition and :specializers. Fixed.
+- Classes cannot be anonymous. Fixed.
+- Class initialization doesn't call READER-METHOD-CLASS and WRITER-METHOD-CLASS for accessor methods. Fixed.
+- The object returned by compute-discriminating-function cannot be a closure. Likewise, the second parameter to set-funcallable-instance-function cannot be a closure, but only a "pure" function/thunk. Not fixed.
+- Effective slot definitions are not initialized with :documentation, and EFFECTIVE-SLOT-DEFINITION-CLASS also doesn't receive that initarg. Not fixed.
+- Calling DOCUMENTATION on effective slot definition metaobjects don't return their documentation as specified in ANSI Common Lisp. Fixed.
+- Methods are not initialized with :function. Not fixed.
+- Multiple slot options are not passed as lists to DIRECT-SLOT-DEFINITION-CLASS. Not fixed, but use FIX-SLOT-INITARGS as a workaround.
+- REINITIALIZE-INSTANCE doesn't determine a new discriminating function. Fixed.
+- REINITIALIZE-INSTANCE of a class metaobject doesn't invoke FINALIZE-INHERITANCE again. Not fixed.
+- (SETF CLASS-NAME) and (SETF GENERIC-FUNCTION-NAME) do not use REINITIALIZE-INSTANCE for changing the names. Fixed.
+- STANDARD-CLASS and FUNCALLABLE-STANDARD-CLASS are not compatible. Not fixed.
+- Subclasses of BUILT-IN-CLASS, CLASS, DIRECT-SLOT-DEFINITION, EFFECTIVE-SLOT-DEFINITION, EQL-SPECIALIZER, FORWARD-REFERENCED-CLASS, FUNCALLABLE-STANDARD-CLASS, SLOT-DEFINITION, SPECIALIZER, STANDARD-ACCESSOR-METHOD, STANDARD-CLASS, STANDARD-DIRECT-SLOT-DEFINITION, STANDARD-EFFECTIVE-SLOT-DEFINITION, STANDARD-GENERIC-FUNCTION, STANDARD-METHOD, STANDARD-READER-METHOD, STANDARD-SLOT-DEFINITION and STANDARD-WRITER-METHOD will inherit slots whose names are exported symbols and/or accessible in the package common-lisp-user. Not fixed.
+
+LispWorks, 4.4.5, 4.4.6, Personal and Professional Editions
+
+- CLASS-DIRECT-DEFAULT-INITARGS and CLASS-DEFAULT-INITARGS don't return canonicalized default initargs as specified. Not fixed.
+- ADD-METHOD doesn't call ADD-DIRECT-METHOD and REMOVE-METHOD. Fixed.
+- ADD-METHOD, REMOVE-METHOD, INITIALIZE-INSTANCE and REINITIALIZE-INSTANCE do not determine a new discriminating function. This is postponed until function invocation instead, so shouldn't be a problem in practice.
+- Effective slot definitions are not initialized with :allocation, and EFFECTIVE-SLOT-DEFINITION-CLASS also doesn't receive that initarg. Not fixed. This information is encoded in the initarg :flags, but I don't have any detailed information about that parameter.
+- Classes are not initialized with :direct-default-initargs, but with :default-initargs. Conditionalize on #+lispworks to fix this.
+- Class reinitialization does not call REMOVE-DIRECT-SUBCLASS. Fixed.
+- COMPUTE-APPLICABLE-METHODS-USING-CLASSES doesn't exist. Not fixed.
+- COMPUTE-DEFAULT-INITARGS doesn't exist. Not fixed.
+- DEFGENERIC does not call FIND-METHOD-COMBINATION. Not fixed.
+- When classes are initialized, :direct-superclasses are by default not empty. Not fixed, but direct superclasses are automatically adjusted when you use the standard idiom for adding a new default superclass.
+- EQL-SPECIALIZER, EQL-SPECIALIZER-OBJECT and INTERN-EQL-SPECIALIZER don't exist. In LispWorks, eql specializers are lists not objects. I have provided EQL-SPECIALIZER as a type (not as a class) and EQL-SPECIALIZER-OBJECT and INTERN-EQL-SPECIALIZER to work on lists, and a class EQL-SPECIALIZER* and corresponding EQL-SPECIALIZER-OBJECT* and INTERN-EQL-SPECILAIZER* to soften the incompatibilities.
+- The :ALLOCATION type cannot be extended. Not fixed.
+- FIND-METHOD-COMBINATION doesn't exist. Fixed, but fixed version doesn't work with method combination options.
+- FUNCALLABLE-STANDARD-INSTANCE-ACCESS and STANDARD-INSTANCE-ACCESS don't exist. Not fixed.
+- The function invocation protocol doesn't call COMPUTE-APPLICABLE-METHODS and COMPUTE-APPLICABLE-METHODS-USING-CLASSES. Not fixed.
+- Generic functions are not initialized with :declarations, but with 'declare. Not fixed. Conditionalize on #+lispworks instead.
+- MAKE-METHOD-LAMBDA expects other parameters than specified. Fixed.
+- Method functions don't take parameters as specified in AMOP, but instead just the parameters that the generic function receives. Not fixed.
+- REMOVE-METHOD doesn't call REMOVE-DIRECT-METHOD. Fixed.
+- (SETF CLASS-NAME) and (SETF GENERIC-FUNCTION-NAME) do not use REINITIALIZE-INSTANCE for changing the names. Not fixed.
+- The slot methods (SLOT-VALUE-USING-CLASS, etc.) are not specialized on effective slot definitions, but on slot names. Fixed.
+- The generated accessor methods don't use the slot methods for accessing slots. Fixed. (Don't use :optimize-slot-access to deoptimize slot access, or otherwise the fixed slot access protocol doesn't work anymore!)
+- SPECIALIZER doesn't exist. Not fixed.
+- SPECIALIZER-DIRECT-GENERIC-FUNCTIONS doesn't exist. Fixed.
+- STANDARD-CLASS and FUNCALLABLE-STANDARD-CLASS are not compatible. Not fixed.
+- Subclasses of BUILT-IN-CLASS (fixed), CLASS (fixed), DIRECT-SLOT-DEFINITION, EFFECTIVE-SLOT-DEFINITION, FORWARD-REFERENCED-CLASS (fixed), FUNCALLABLE-STANDARD-CLASS (fixed), SLOT-DEFINITION, STANDARD-ACCESSOR-METHOD, STANDARD-CLASS (fixed), STANDARD-DIRECT-SLOT-DEFINITION, STANDARD-EFFECTIVE-SLOT-DEFINITION, STANDARD-GENERIC-FUNCTION, STANDARD-METHOD, STANDARD-READER-METHOD, STANDARD-SLOT-DEFINITION and STANDARD-WRITER-METHOD will inherit slots whose names are exported symbols and/or accessible in the package common-lisp-user. Not fixed, except where indicated otherwise.
+
+
+LispWorks, 5.0 and 5.0.1, Personal Edition
+LispWorks, 5.0 - 5.0.2, Professional Edition
+
+- CLASS-DIRECT-DEFAULT-INITARGS and CLASS-DEFAULT-INITARGS don't return canonicalized default initargs as specified. Not fixed.
+- ADD-METHOD, REMOVE-METHOD, INITIALIZE-INSTANCE and REINITIALIZE-INSTANCE do not determine a new discriminating function. This is postponed until function invocation instead, so shouldn't be a problem in practice.
+- COMPUTE-APPLICABLE-METHODS-USING-CLASSES doesn't exist. Not fixed.
+- COMPUTE-DEFAULT-INITARGS doesn't exist. Not fixed.
+- DEFGENERIC does not call FIND-METHOD-COMBINATION. Not fixed.
+- EQL-SPECIALIZER, EQL-SPECIALIZER-OBJECT and INTERN-EQL-SPECIALIZER don't exist. In LispWorks, eql specializers are lists not objects. I have provided EQL-SPECIALIZER as a type (not as a class) and EQL-SPECIALIZER-OBJECT and INTERN-EQL-SPECIALIZER to work on lists, and a class EQL-SPECIALIZER* and corresponding EQL-SPECIALIZER-OBJECT* and INTERN-EQL-SPECILAIZER* to soften the incompatibilities.
+- The :ALLOCATION type cannot be extended. Not fixed.
+- FIND-METHOD-COMBINATION doesn't exist. Fixed, but fixed version doesn't work with method combination options.
+- FUNCALLABLE-STANDARD-INSTANCE-ACCESS and STANDARD-INSTANCE-ACCESS don't exist. Not fixed.
+- The function invocation protocol doesn't call COMPUTE-APPLICABLE-METHODS and COMPUTE-APPLICABLE-METHODS-USING-CLASSES. Not fixed.
+- MAKE-METHOD-LAMBDA expects other parameters than specified. Fixed.
+- Method functions don't take parameters as specified in AMOP, but instead just the parameters that the generic function receives. Not fixed.
+- The slot methods (SLOT-VALUE-USING-CLASS, etc.) are not specialized on effective slot definitions, but on slot names. Fixed.
+- The generated accessor methods don't use the slot methods for accessing slots. Fixed. (Don't use :optimize-slot-access to deoptimize slot access, or otherwise the fixed slot access protocol doesn't work anymore!)
+- SPECIALIZER doesn't exist. Not fixed.
+- SPECIALIZER-DIRECT-GENERIC-FUNCTIONS doesn't exist. Fixed.
+- STANDARD-CLASS and FUNCALLABLE-STANDARD-CLASS are not compatible. Not fixed.
+- Subclasses of BUILT-IN-CLASS (fixed), CLASS (fixed), DIRECT-SLOT-DEFINITION, EFFECTIVE-SLOT-DEFINITION, FORWARD-REFERENCED-CLASS (fixed), FUNCALLABLE-STANDARD-CLASS (fixed), SLOT-DEFINITION, STANDARD-ACCESSOR-METHOD, STANDARD-CLASS (fixed), STANDARD-DIRECT-SLOT-DEFINITION, STANDARD-EFFECTIVE-SLOT-DEFINITION, STANDARD-GENERIC-FUNCTION, STANDARD-METHOD, STANDARD-READER-METHOD, STANDARD-SLOT-DEFINITION and STANDARD-WRITER-METHOD will inherit slots whose names are exported symbols and/or accessible in the package common-lisp-user. Not fixed, except where indicated otherwise.
+
+
+MCL 5.1
+
+In MCL, generic functions work completely differently than specified. The specific incompatibilities are not listed and are not fixed.
+
+- The slot order requested by a primary method for COMPUTE-SLOTS is not honoured by this MOP. Not fixed.
+- DIRECT-SLOT-DEFINITION, EFFECTIVE-SLOT-DEFINITION, EQL-SPECIALIZER, SLOT-DEFINITION and STANDARD-SLOT-DEFINITION are not exported. Fixed.
+- When classes are initialized, :direct-superclasses are by default not empty. Not fixed, but direct superclasses are automatically adjusted when you use the standard idiom for adding a new default superclass.
+- The :ALLOCATION type cannot be extended. Not fixed.
+- Multiple slot options are not passed as lists to DIRECT-SLOT-DEFINITION-CLASS. Not fixed, but use FIX-SLOT-INITARGS as a workaround.
+- (SETF CLASS-NAME) doesn't use REINITIALIZE-INSTANCE for changing the names. Fixed.
+- REINITIALIZE-INSTANCE of a class metaobject doesn't invoke FINALIZE-INHERITANCE again. Not fixed.
+- Subclasses of DIRECT-SLOT-DEFINITION, EFFECTIVE-SLOT-DEFINITION, SLOT-DEFINITION, STANDARD-ACCESSOR-METHOD, STANDARD-DIRECT-SLOT-DEFINITION, STANDARD-EFFECTIVE-SLOT-DEFINITION, STANDARD-GENERIC-FUNCTION, STANDARD-METHOD, STANDARD-READER-METHOD, STANDARD-SLOT-DEFINITION and STANDARD-WRITER-METHOD will inherit slots whose names are exported symbols and/or accessible in the package common-lisp-user. Not fixed.
+
+OpenMCL 1.0
+
+In OpenMCL, generic functions work completely differently than specified. The specific incompatibilities are not listed and are not fixed.
+
+- The slot order requested by a primary method for COMPUTE-SLOTS is not honoured by this MOP. Not fixed.
+- EQL-SPECIALIZER is not exported. Fixed.
+- DOCUMENTATION doesn't return the documentation strings for slot definition metaobjects. Fixed.
+- REINITIALIZE-INSTANCE of a class metaobject doesn't invoke FINALIZE-INHERITANCE again. Not fixed.
+- Subclasses of DIRECT-SLOT-DEFINITION, EFFECTIVE-SLOT-DEFINITION, GENERIC-FUNCTION, SLOT-DEFINITION, STANDARD-ACCESSOR-METHOD, STANDARD-DIRECT-SLOT-DEFINITION, STANDARD-EFFECTIVE-SLOT-DEFINITION, STANDARD-GENERIC-FUNCTION, STANDARD-METHOD, STANDARD-READER-METHOD, STANDARD-SLOT-DEFINITION and STANDARD-WRITER-METHOD will inherit slots whose names are exported symbols and/or accessible in the package common-lisp-user. Not fixed.
+
+SBCL 0.9.16 - 1.0.10
+
+All features implemented.
+
+
+Summary:
+
+- CLASS-DIRECT-DEFAULT-INITARGS and CLASS-DEFAULT-INITARGS exist, but don't work as expected in Allegro Common Lisp, CMUCL and LispWorks.
+- If you specialize COMPUTE-DEFAULT-INITAGS, conditionalize for the extra parameters in Allegro Common Lisp.
+- In Allegro Common Lisp, FUNCALLABLE-STANDARD-OBJECT is not used as the default superclass for classes with :metaclass FUNCALLABLE-STANDARD-CLASS.
+- In CMUCL, the object returned by compute-discriminating-function cannot be a closure. Likewise, the second parameter to set-funcallable-instance-function cannot be a closure, but only a "pure" function/thunk.
+- In CLisp, MCL and OpenMCL, the slot order requested by a primary method for COMPUTE-SLOTS is not honoured by the respective MOPs.
+- Don't rely on FIND-METHOD-COMBINATION to do its job correctly, only when you don't provide method combination options.
+- MAKE-METHOD-LAMBDA only works in CMUCL and SBCL as specified (but make sure that the respective generic function and method metaobject classes and make-method-lambda definitions are part of your compilation enviroment). MAKE-METHOD-LAMBDA also works in LispWorks, but the returned lambda expressions don't adhere to the AMOP specification (which may be good enough for your purposes).
+- Specialize the methods for the dependent protocol on the class or generic function metaobject class. The example in AMOP doesn't do this but that is fragile code.
+- Don't rely on methods being initialized with the specified initargs from inside the MOP.
+- CLisp doesn't change a FORWARD-REFERENCED-CLASS via CHANGE-CLASS. Apart from that, FORWARD-REFERENCED-CLASS works reliably across all MOPs.
+- Effective slot definitions and EFFECTIVE-SLOT-DEFINITION-CLASS don't receive :documentation in CMUCL, and no :allocation (!) in LispWorks before 5.0.
+- If you specialize DIRECT-SLOT-DEFINITION-CLASS, use FIX-SLOT-INITARGS in portable code.
+- If you want to use :ALLOCATION types other than :CLASS or :INSTANCE, you cannot use CLisp before 2.37, LispWorks or MCL. Only Allegro Common Lisp, CLisp from 2.37 on, CMUCL, OpenMCL and SBCL support this.
+- In Allegro, CMUCL and LispWorks, STANDARD-CLASS and FUNCALLABLE-STANDARD-CLASS are not compatible.
+- The function invocation protocol only works in CMUCL, SBCL and CLisp.
+- If you need to see :direct-default-initargs when classes are initialized, conditionalize on #+lispworks to receive :default-initargs instead for LispWorks version before 5.0.
+- COMPUTE-DEFAULT-INITARGS doesn't exist (and isn't called) in LispWorks.
+- In LispWorks, eql specializers are lists.
+- FUNCALLABLE-STANDARD-INSTANCE-ACCESS and STANDARD-INSTANCE-ACCESS doesn't exist / should not be used in LispWorks.
+- In CLisp before version 2.40, and in CMUCL, MCL and OpenMCL, the reinitialization of a class metaobject does not lead to a call of FINALIZE-INHERITANCE, so methods defined on FINALIZE-INHERITANCE won't be called again in that case.
+- If you need to see :declarations when generic functions are initialized, conditionalize on #+lispworks to receive 'declare instead for LispWorks versions before 5.0. (Actually, AMOP and ANSI Common Lisp diverge in this regard. AMOP specifies that :declarations is used whereas ANSI Common Lisp specifies that 'declare is used. Since most MOP implementations adhere to AMOP in this regard, I have also chosen that path.)
+- In Allegro Common Lisp and LispWorks, method functions take the original parameters that a generic function has received.
+- In LispWorks before 5.0, the class SPECIALIZER doesn't exist.
+- If you need to rely on the generic function protocols, don't use MCL or OpenMCL (or be very careful - some minor things work there as specified).
+- The declarations for a generic function cannot be inspected in MCL.
+- All implementations define slots on various specified metaobject classes that are exported from some package and/or accessible in the package common-lisp-user. Only sbcl is safe from this, and clisp is relatively safe in that it does that only for the class METHOD-COMBINATION.
Added: branches/trunk-reorg/thirdparty/closer-mop/lispworks/closer-mop-packages.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/lispworks/closer-mop-packages.lisp 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/lispworks/closer-mop-packages.lisp 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,194 @@
+(in-package :cl-user)
+
+(defpackage #:closer-mop
+ (:use #:common-lisp #:lispworks)
+ (:nicknames #:c2mop)
+
+ (:shadow
+ #:defclass #:defgeneric #:defmethod
+ #:ensure-generic-function
+ #:standard-class #:standard-generic-function)
+ (:export
+ #:defclass #:defgeneric #:defmethod
+ #:ensure-generic-function
+ #:standard-class #:standard-generic-function)
+
+ (:import-from #:clos
+
+ #:direct-slot-definition
+ #:effective-slot-definition
+ #-lispworks #:eql-specializer
+ #:forward-referenced-class
+ #-lispworks #:funcallable-standard-class
+ #+lispworks5.0 #:funcallable-standard-object
+ #:metaobject
+ #:slot-definition
+ #-lispworks #:specializer
+ #:standard-accessor-method
+ #:standard-direct-slot-definition
+ #:standard-effective-slot-definition
+ #:standard-reader-method
+ #:standard-slot-definition
+ #:standard-writer-method
+
+ #-lispworks4.3 #:accessor-method-slot-definition
+ #:add-dependent
+ #:add-direct-method
+ #:add-direct-subclass
+ #:class-default-initargs
+ #:class-direct-default-initargs
+ #:class-direct-slots
+ #:class-direct-subclasses
+ #:class-direct-superclasses
+ #:class-finalized-p
+ #:class-precedence-list
+ #:class-prototype
+ #:class-slots
+ #-lispworks #:compute-applicable-methods-using-classes
+ #:compute-class-precedence-list
+ #-lispworks #:compute-default-initargs
+ #:compute-discriminating-function
+ #:compute-effective-method
+ #:compute-effective-slot-definition
+ #:compute-slots
+ #:direct-slot-definition-class
+ #:effective-slot-definition-class
+ #:ensure-class
+ #:ensure-class-using-class
+ #:ensure-generic-function-using-class
+ #-lispworks #:eql-specializer-object
+ #:extract-lambda-list
+ #:extract-specializer-names
+ #:finalize-inheritance
+ #-lispworks #:find-method-combination
+ #-lispworks #:funcallable-standard-instance-access
+ #:generic-function-argument-precedence-order
+ #:generic-function-declarations
+ #:generic-function-lambda-list
+ #:generic-function-method-class
+ #:generic-function-method-combination
+ #:generic-function-methods
+ #:generic-function-name
+ #-lispworks #:intern-eql-specializer
+ #-lispworks #:make-method-lambda
+ #:map-dependents
+ #:method-function
+ #:method-generic-function
+ #:method-lambda-list
+ #:method-specializers
+ #-lispworks4.3 #:reader-method-class
+ #:remove-dependent
+ #:remove-direct-method
+ #:remove-direct-subclass
+ #:set-funcallable-instance-function
+ #:slot-boundp-using-class
+ #:slot-definition-allocation
+ #:slot-definition-initargs
+ #:slot-definition-initform
+ #:slot-definition-initfunction
+ #:slot-definition-location
+ #:slot-definition-name
+ #:slot-definition-readers
+ #:slot-definition-writers
+ #:slot-definition-type
+ #:slot-makunbound-using-class
+ #:slot-value-using-class
+ #-lispworks #:specializer-direct-generic-functions
+ #:specializer-direct-methods
+ #-lispworks #:standard-instance-access
+ #:update-dependent
+ #:validate-superclass
+ #-lispworks4.3 #:writer-method-class)
+
+ (:export
+ #:direct-slot-definition
+ #:effective-slot-definition
+ #:eql-specializer
+ #+lispworks #:eql-specializer*
+ #:forward-referenced-class
+ #:funcallable-standard-class
+ #:funcallable-standard-object
+ #:metaobject
+ #:slot-definition
+ #-lispworks #:specializer
+ #:standard-accessor-method
+ #:standard-direct-slot-definition
+ #:standard-effective-slot-definition
+ #:standard-reader-method
+ #:standard-slot-definition
+ #:standard-writer-method
+
+ #:ensure-finalized
+ #:ensure-method
+ #:fix-slot-initargs
+ #:required-args
+
+ #-lispworks4.3 #:accessor-method-slot-definition
+ #:add-dependent
+ #:add-direct-method
+ #:add-direct-subclass
+ #:class-default-initargs
+ #:class-direct-default-initargs
+ #:class-direct-slots
+ #:class-direct-subclasses
+ #:class-direct-superclasses
+ #:class-finalized-p
+ #:class-precedence-list
+ #:class-prototype
+ #:class-slots
+ #-lispworks #:compute-applicable-methods-using-classes
+ #:compute-class-precedence-list
+ #-lispworks #:compute-default-initargs
+ #:compute-discriminating-function
+ #:compute-effective-method
+ #:compute-effective-slot-definition
+ #:compute-slots
+ #:direct-slot-definition-class
+ #:effective-slot-definition-class
+ #:ensure-class
+ #:ensure-class-using-class
+ #:ensure-generic-function-using-class
+ #:eql-specializer-object
+ #:extract-lambda-list
+ #:extract-specializer-names
+ #:finalize-inheritance
+ #:find-method-combination
+ #-lispworks #:funcallable-standard-instance-access
+ #:generic-function-argument-precedence-order
+ #:generic-function-declarations
+ #:generic-function-lambda-list
+ #:generic-function-method-class
+ #:generic-function-method-combination
+ #:generic-function-methods
+ #:generic-function-name
+ #:intern-eql-specializer
+ #+lispworks #:intern-eql-specializer*
+ #:make-method-lambda
+ #:map-dependents
+ #:method-function
+ #:method-generic-function
+ #:method-lambda-list
+ #:method-specializers
+ #-lispworks4.3 #:reader-method-class
+ #:remove-dependent
+ #:remove-direct-method
+ #:remove-direct-subclass
+ #:set-funcallable-instance-function
+ #:slot-boundp-using-class
+ #:slot-definition-allocation
+ #:slot-definition-initargs
+ #:slot-definition-initform
+ #:slot-definition-initfunction
+ #:slot-definition-location
+ #:slot-definition-name
+ #:slot-definition-readers
+ #:slot-definition-writers
+ #:slot-definition-type
+ #:slot-makunbound-using-class
+ #:slot-value-using-class
+ #:specializer-direct-generic-functions
+ #:specializer-direct-methods
+ #-lispworks #:standard-instance-access
+ #:update-dependent
+ #:validate-superclass
+ #-lispworks4.3 #:writer-method-class))
Added: branches/trunk-reorg/thirdparty/closer-mop/lispworks/closer-mop.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/lispworks/closer-mop.lisp 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/lispworks/closer-mop.lisp 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,605 @@
+(in-package :closer-mop)
+
+;; Some utility functions.
+
+(defun required-args (lambda-list &optional (collector #'identity))
+ (loop for arg in lambda-list
+ until (member arg lambda-list-keywords)
+ collect (funcall collector arg)))
+
+(defun ensure-finalized (class &optional (errorp t))
+ (if (typep class 'class)
+ (unless (class-finalized-p class)
+ (finalize-inheritance class))
+ (when errorp (error "~S is not a class." class)))
+ class)
+
+;; We need a new standard-generic-function for various things.
+
+(cl:defclass standard-generic-function (cl:standard-generic-function)
+ ((initial-methods :initform '()))
+ (:metaclass clos:funcallable-standard-class))
+
+;; The following ensures that the new standard-generic-function is used.
+
+(defun ensure-generic-function
+ (name &rest args
+ &key (generic-function-class 'standard-generic-function)
+ &allow-other-keys)
+ (declare (dynamic-extent args))
+ (when (fboundp name)
+ (let ((function (fdefinition name)))
+ (unless (typep function 'generic-function)
+ (cerror "Discard existing definition and create generic function."
+ "~S is already fbound, but not as a generic function." name)
+ (fmakunbound name))))
+ (if (fboundp name)
+ (let ((function (fdefinition name)))
+ (apply #'ensure-generic-function-using-class
+ function name args))
+ (apply #'ensure-generic-function-using-class nil name
+ :generic-function-class generic-function-class
+ args)))
+
+;; We need a new standard-class for various things.
+
+(cl:defclass standard-class (cl:standard-class)
+ ())
+
+;; validate-superclass for metaclass classes is a little bit
+;; more tricky than for class metaobject classes because
+;; we don't want to make all standard-classes compatible to
+;; each other.
+
+;; Our validate-superclass may get passed a class-prototype
+;; as its second argument, so don't expect its readers to
+;; yield useful information. (In ANSI parlance, "the
+;; consequences are undefined...")
+
+(cl:defmethod validate-superclass
+ ((class standard-class)
+ (superclass cl:standard-class))
+ (or (when (eq (class-of class) (find-class 'standard-class))
+ (or (eq (class-of superclass) (find-class 'cl:standard-class))
+ (eq (class-of superclass) (find-class 'standard-class))))
+ (call-next-method)
+ (when (eq (class-of superclass) (find-class 'cl:standard-class))
+ (validate-superclass class (class-prototype (find-class 'standard-class))))))
+
+;; The following macro ensures that the new standard-class is used
+;; by default. It would have been useful to fix other deficiencies
+;; in a complete redefinition of defclass, but there is no portable
+;; way to ensure the necessary compile-time effects as specified
+;; by ANSI Common Lisp. Therefore, we just expand to the original
+;; cl:defclass.
+
+(defmacro defclass (name (&rest supers) &body options)
+ (if (member :metaclass options :key #'car)
+ `(cl:defclass ,name ,supers ,@options)
+ `(cl:defclass ,name ,supers ,@options
+ (:metaclass standard-class))))
+
+;; We need a new funcallable-standard-class for various things.
+
+(cl:defclass funcallable-standard-class (clos:funcallable-standard-class)
+ ())
+
+;; See the comment on validate-superclass for standard-class above.
+
+(cl:defmethod validate-superclass
+ ((class funcallable-standard-class)
+ (superclass clos:funcallable-standard-class))
+ (or (when (eq (class-of class) (find-class 'funcallable-standard-class))
+ (or (eq (class-of superclass) (find-class 'clos:funcallable-standard-class))
+ (eq (class-of superclass) (find-class 'funcallable-standard-class))))
+ (call-next-method)
+ (when (eq (class-of superclass) (find-class 'clos:funcallable-standard-class))
+ (validate-superclass class (class-prototype (find-class 'funcallable-standard-class))))))
+
+#+lispworks5.0
+(cl:defmethod validate-superclass
+ ((class funcallable-standard-class)
+ (superclass (eql (find-class 'funcallable-standard-object))))
+ t)
+
+;; We also need a new funcallable-standard-object because the default one
+;; is not an instance of clos:funcallable-standard-class.
+
+#-lispworks5.0
+(cl:defclass funcallable-standard-object (clos:funcallable-standard-object)
+ ()
+ (:metaclass clos:funcallable-standard-class))
+
+;; The following code ensures that possibly incorrect lists of direct
+;; superclasses are corrected.
+
+#-lispworks5.0
+(defun modify-superclasses (direct-superclasses &optional (standardp t))
+ (if (null direct-superclasses)
+ (list (if standardp
+ (find-class 'standard-object)
+ (find-class 'funcallable-standard-object)))
+ (let ((standard-object (if standardp
+ (find-class 'standard-object)
+ (find-class 'clos:funcallable-standard-object))))
+ (if (eq (car (last direct-superclasses)) standard-object)
+ (if standardp
+ direct-superclasses
+ (append (butlast direct-superclasses)
+ (list (find-class 'funcallable-standard-object))))
+ (remove standard-object direct-superclasses)))))
+
+;; During class re/initialization, we take care of the following things:
+;; - Optimization of slot accessors is deactivated.
+;; - Lists of direct superclasses are corrected.
+;; - Removal of direct subclasses.
+
+(cl:defmethod initialize-instance :around
+ ((class standard-class) &rest initargs
+ #-lispworks5.0 &key
+ #-lispworks5.0 (direct-superclasses ()))
+ (declare (dynamic-extent initargs))
+ (apply #'call-next-method class
+ #-lispworks5.0 :direct-superclasses
+ #-lispworks5.0 (modify-superclasses direct-superclasses)
+ :optimize-slot-access nil
+ initargs))
+
+(cl:defmethod reinitialize-instance :around
+ ((class standard-class) &rest initargs
+ #-lispworks5.0 &key
+ #-lispworks5.0 (direct-superclasses () direct-superclasses-p))
+ (declare (dynamic-extent initargs))
+ #-lispworks5.0
+ (progn
+ (when direct-superclasses-p
+ (setq direct-superclasses (modify-superclasses direct-superclasses))
+ (loop for superclass in (copy-list (class-direct-superclasses class))
+ unless (member superclass direct-superclasses)
+ do (remove-direct-subclass superclass class)))
+ (if direct-superclasses-p
+ (apply #'call-next-method class
+ :direct-superclasses direct-superclasses
+ :optimize-slot-access nil
+ initargs)
+ (apply #'call-next-method class
+ :optimize-slot-access nil
+ initargs)))
+ #+lispworks5.0
+ (apply #'call-next-method class
+ :optimize-slot-access nil
+ initargs))
+
+(cl:defmethod initialize-instance :around
+ ((class funcallable-standard-class) &rest initargs
+ #-lispworks5.0 &key
+ #-lispworks5.0 (direct-superclasses ()))
+ (declare (dynamic-extent initargs))
+ (apply #'call-next-method class
+ #-lispworks5.0 :direct-superclasses
+ #-lispworks5.0 (modify-superclasses direct-superclasses nil)
+ :optimize-slot-access nil
+ initargs))
+
+(cl:defmethod reinitialize-instance :around
+ ((class funcallable-standard-class) &rest initargs
+ #-lispworks5.0 &key
+ #-lispworks5.0 (direct-superclasses () direct-superclasses-p))
+ (declare (dynamic-extent initargs))
+ #-lispworks5.0
+ (progn
+ (when direct-superclasses-p
+ (setq direct-superclasses (modify-superclasses direct-superclasses nil))
+ (loop for superclass in (copy-list (class-direct-superclasses class))
+ unless (member superclass direct-superclasses)
+ do (remove-direct-subclass superclass class)))
+ (if direct-superclasses-p
+ (apply #'call-next-method class
+ :direct-superclasses direct-superclasses
+ :optimize-slot-access nil
+ initargs)
+ (apply #'call-next-method class
+ :optimize-slot-access nil
+ initargs)))
+ #+lispworks5.0
+ (apply #'call-next-method class
+ :optimize-slot-access nil
+ initargs))
+
+;; The following is necessary for forward-referenced-classes.
+;; Since we replace the original funcallable-standard-object with
+;; a new one, we have to prevent LispWorks from trying to use
+;; the original one when forward-ferenced-classes are resolved.
+
+#-lispworks5.0
+(cl:defmethod change-class :around
+ ((class forward-referenced-class)
+ (new-class funcallable-standard-class)
+ &rest initargs
+ &key (direct-superclasses ()))
+ (declare (dynamic-extent initargs))
+ (apply #'call-next-method class new-class
+ :optimize-slot-access nil
+ :direct-superclasses (modify-superclasses direct-superclasses nil)
+ initargs))
+
+;;; In LispWorks, the slot accessors (slot-value-using-class, etc.) are specialized
+;;; on slot names instead of effective slot definitions. In order to fix this,
+;;; we need to rewire the slot access protocol.
+
+(cl:defmethod slot-value-using-class
+ ((class standard-class) object (slot symbol))
+ (declare (optimize (speed 3) (debug 0) (safety 0)
+ (compilation-speed 0)))
+ (let ((slotd (find slot (class-slots class)
+ :test #'eq
+ :key #'slot-definition-name)))
+ (if slotd
+ (slot-value-using-class class object slotd)
+ (slot-missing class object slot 'slot-value))))
+
+(cl:defmethod slot-value-using-class
+ ((class standard-class) object (slotd standard-effective-slot-definition))
+ (declare (optimize (speed 3) (debug 0) (safety 0)
+ (compilation-speed 0)))
+ (slot-value-using-class
+ (load-time-value (class-prototype (find-class 'cl:standard-class)))
+ object
+ (slot-definition-name slotd)))
+
+(cl:defmethod (setf slot-value-using-class)
+ (new-value (class standard-class) object (slot symbol))
+ (declare (optimize (speed 3) (debug 0) (safety 0)
+ (compilation-speed 0)))
+ (let ((slotd (find slot (class-slots class)
+ :test #'eq
+ :key #'slot-definition-name)))
+ (if slotd
+ (setf (slot-value-using-class class object slotd)
+ new-value)
+ (slot-missing class object slot 'setf new-value))))
+
+(cl:defmethod (setf slot-value-using-class)
+ (new-value (class standard-class) object (slotd standard-effective-slot-definition))
+ (declare (optimize (speed 3) (debug 0) (safety 0)
+ (compilation-speed 0)))
+ (setf (slot-value-using-class
+ (load-time-value (class-prototype (find-class 'cl:standard-class)))
+ object
+ (slot-definition-name slotd))
+ new-value))
+
+(cl:defmethod slot-boundp-using-class
+ ((class standard-class) object (slot symbol))
+ (declare (optimize (speed 3) (debug 0) (safety 0)
+ (compilation-speed 0)))
+ (let ((slotd (find slot (class-slots class)
+ :test #'eq
+ :key #'slot-definition-name)))
+ (if slotd
+ (slot-boundp-using-class class object slotd)
+ (slot-missing class object slot 'slot-boundp))))
+
+(cl:defmethod slot-boundp-using-class
+ ((class standard-class) object (slotd standard-effective-slot-definition))
+ (declare (optimize (speed 3) (debug 0) (safety 0)
+ (compilation-speed 0)))
+ (slot-boundp-using-class
+ (load-time-value (class-prototype (find-class 'cl:standard-class)))
+ object
+ (slot-definition-name slotd)))
+
+(cl:defmethod slot-makunbound-using-class
+ ((class standard-class) object (slot symbol))
+ (declare (optimize (speed 3) (debug 0) (safety 0)
+ (compilation-speed 0)))
+ (let ((slotd (find slot (class-slots class)
+ :test #'eq
+ :key #'slot-definition-name)))
+ (if slotd
+ (slot-makunbound-using-class class object slotd)
+ (slot-missing class object slot 'slot-makunbound))))
+
+(cl:defmethod slot-makunbound-using-class
+ ((class standard-class) object (slotd standard-effective-slot-definition))
+ (declare (optimize (speed 3) (debug 0) (safety 0)
+ (compilation-speed 0)))
+ (slot-makunbound-using-class
+ (load-time-value (class-prototype (find-class 'cl:standard-class)))
+ object
+ (slot-definition-name slotd)))
+
+;; In LispWorks, eql specializers are lists. We cannot change this
+;; but we can soften some of the incompatibilities.
+
+(deftype eql-specializer ()
+ '(or eql-specializer*
+ (satisfies clos:eql-specializer-p)))
+
+(cl:defgeneric eql-specializer-object (eql-specializer)
+ (:method ((cons cons))
+ (if (clos:eql-specializer-p cons)
+ (cadr cons)
+ (error "~S is not an eql-specializer." cons))))
+
+(defun intern-eql-specializer (object)
+ `(eql ,object))
+
+(cl:defclass eql-specializer* (metaobject)
+ ((obj :reader eql-specializer-object
+ :initarg eso
+ :initform (error "Use intern-eql-specializer to create eql-specializers."))
+ (direct-methods :reader specializer-direct-methods
+ :accessor es-direct-methods
+ :initform ())))
+
+(defvar *eql-specializers* (make-hash-table))
+
+(defun intern-eql-specializer* (object)
+ (or (gethash object *eql-specializers*)
+ (setf (gethash object *eql-specializers*)
+ (make-instance 'eql-specializer* 'eso object))))
+
+(cl:defmethod add-direct-method ((specializer eql-specializer*) (method method))
+ (pushnew method (es-direct-methods specializer)))
+
+(cl:defmethod remove-direct-method ((specializer eql-specializer*) (method method))
+ (removef (es-direct-methods specializer) method))
+
+(cl:defgeneric specializer-direct-generic-functions (specializer)
+ (:method ((class class))
+ (remove-duplicates
+ (mapcar #'method-generic-function
+ (specializer-direct-methods class))))
+ (:method ((eql-specializer eql-specializer*))
+ (remove-duplicates
+ (mapcar #'method-generic-function
+ (specializer-direct-methods eql-specializer))))
+ (:method ((cons cons))
+ (specializer-direct-generic-functions
+ (intern-eql-specializer*
+ (eql-specializer-object cons)))))
+
+;; The following method ensures that remove-method is called.
+
+#-lispworks5.0
+(cl:defmethod add-method :before ((gf standard-generic-function) (method method))
+ (when-let (old-method (find-method gf (method-qualifiers method)
+ (method-specializers method) nil))
+ (remove-method gf old-method)))
+
+;; The following two methods ensure that add/remove-direct-method is called,
+;; and that the dependent protocol for generic function works.
+
+(cl:defmethod add-method :after ((gf standard-generic-function) (method method))
+ (loop for specializer in (method-specializers method)
+ if (consp specializer)
+ do (add-direct-method
+ (intern-eql-specializer*
+ (eql-specializer-object specializer))
+ method)
+ #-lispworks5.0 else
+ #-lispworks5.0 do
+ #-lispworks5.0 (add-direct-method specializer method))
+ #+lispworks4.3
+ (map-dependents
+ gf (lambda (dep) (update-dependent gf dep 'add-method method))))
+
+(cl:defmethod remove-method :after ((gf standard-generic-function) (method method))
+ (loop for specializer in (method-specializers method)
+ if (consp specializer)
+ do (remove-direct-method
+ (intern-eql-specializer*
+ (eql-specializer-object specializer))
+ method)
+ #-lispworks5.0 else
+ #-lispworks5.0 do
+ #-lispworks5.0 (remove-direct-method specializer method))
+ #+lispworks4.3
+ (map-dependents
+ gf (lambda (dep) (update-dependent gf dep 'remove-method method))))
+
+(cl:defgeneric find-method-combination (gf combi combi-options)
+ (:method ((gf generic-function) (combi symbol) combi-options)
+ (when combi-options
+ (error "This implementation of find-method-combination cannot handle method combination options."))
+ (clos::find-a-method-combination-type combi)))
+
+;; In LispWorks, make-method-lambda expects different arguments than those
+;; specified in AMOP. We just bridge this. The method lambda returned
+;; still doesn't conform to AMOP, but may be good enough.
+
+(cl:defgeneric make-method-lambda (gf method lambda-expression env)
+ (:method ((gf cl:standard-generic-function)
+ (method standard-method)
+ lambda-expression env)
+ (declare (ignorable env))
+ (destructuring-bind
+ (lambda (&rest args) &body body)
+ lambda-expression
+ (declare (ignore lambda))
+ (loop with documentation = :unbound
+ for (car . cdr) = body then cdr
+ while (or (stringp car)
+ (and (consp car) (eq (car car) 'declare)))
+ if (stringp car)
+ do (setf documentation
+ (if (eq documentation :unbound) car
+ (error "Too many documentation strings in lambda expression ~S."
+ lambda-expression)))
+ else append (loop for declaration in (cdr car)
+ if (eq (car declaration) 'ignore)
+ collect `(ignorable ,@(cdr declaration))
+ and collect `(dynamic-extent ,@(cdr declaration))
+ else collect declaration) into declarations
+ finally (multiple-value-bind
+ (method-lambda method-args)
+ (clos:make-method-lambda
+ gf method args declarations
+ `(progn ,car ,@cdr) env)
+ (if (eq documentation :unbound)
+ (return (values method-lambda method-args))
+ (return (values
+ `(lambda ,(cadr method-lambda)
+ ,documentation
+ ,@(cddr method-lambda))
+ method-args))))))))
+
+(defun ensure-method (gf lambda-expression
+ &key (method-class (generic-function-method-class gf))
+ (qualifiers ())
+ (lambda-list (cadr lambda-expression))
+ (specializers (required-args lambda-list (constantly (find-class 't)))))
+ (multiple-value-bind
+ (method-lambda method-args)
+ (make-method-lambda
+ gf (class-prototype method-class)
+ lambda-expression ())
+ (let ((method (apply #'make-instance
+ method-class
+ :qualifiers qualifiers
+ :lambda-list lambda-list
+ :specializers specializers
+ :function (compile nil method-lambda)
+ method-args)))
+ (add-method gf method)
+ method)))
+
+;; helper function for creating a generic function lambda list
+;; from a method lambda list.
+(defun create-gf-lambda-list (method-lambda-list)
+ (loop with stop-keywords = '#.(remove '&optional lambda-list-keywords)
+ for arg in method-lambda-list
+ until (member arg stop-keywords)
+ collect arg into gf-lambda-list
+ finally (return (let (rest)
+ (cond ((member '&key method-lambda-list)
+ (nconc gf-lambda-list '(&key)))
+ ((setq rest (member '&rest method-lambda-list))
+ (nconc gf-lambda-list (subseq rest 0 2)))
+ (t gf-lambda-list))))))
+
+;; The defmethod macro is needed in order to ensure that make-method-lambda
+;; is called. (Unfortunately, this doesn't work in the other CL implementations.)
+
+(defmacro defmethod (&whole form name &body body &environment env)
+ (loop for tail = body then (cdr tail)
+ until (listp (car tail))
+ collect (car tail) into qualifiers
+ finally
+ (destructuring-bind
+ ((&rest specialized-args) &body body) tail
+ (loop with documentation = :unbound
+ for (car . cdr) = body then cdr
+ while (or (stringp car)
+ (and (consp car) (eq (car car) 'declare)))
+ if (stringp car)
+ do (setq documentation
+ (if (eq documentation :unbound) car
+ (error "Too many documentation strings for defmethod form ~S." form)))
+ else append (cdr car) into declarations
+ finally
+ (let* ((lambda-list (extract-lambda-list specialized-args))
+ (gf-lambda-list (create-gf-lambda-list lambda-list))
+ (gf (if (fboundp name)
+ (ensure-generic-function name)
+ (ensure-generic-function name :lambda-list gf-lambda-list)))
+ (method-class (generic-function-method-class gf))
+ (lambda-expression `(lambda ,lambda-list
+ (declare ,@declarations)
+ (block ,name ,car ,@cdr))))
+ (if (equal (compute-applicable-methods
+ #'make-method-lambda
+ (list gf (class-prototype method-class)
+ lambda-expression env))
+ (list (find-method
+ #'make-method-lambda '()
+ (list (find-class 'cl:standard-generic-function)
+ (find-class 'standard-method)
+ (find-class 't)
+ (find-class 't))
+ nil)))
+ (return-from defmethod `(cl:defmethod ,@(rest form)))
+ (multiple-value-bind
+ (method-lambda method-args)
+ (make-method-lambda
+ gf (class-prototype method-class)
+ lambda-expression env)
+ (with-unique-names (gf method)
+ (return-from defmethod
+ `(let ((,gf (if (fboundp ',name)
+ (ensure-generic-function ',name)
+ (ensure-generic-function
+ ',name :lambda-list ',gf-lambda-list)))
+ (,method
+ (make-instance
+ ',method-class
+ :qualifiers ',qualifiers
+ :specializers
+ (list
+ ,@(mapcar
+ (lambda (specializer-name)
+ (typecase specializer-name
+ (symbol `(find-class ',specializer-name))
+ (cons (cond
+ ((> (length specializer-name) 2)
+ (error "Invalid specializer ~S in defmethod form ~S."
+ specializer-name form))
+ ((eq (car specializer-name) 'eql)
+ `(intern-eql-specializer ,(cadr specializer-name)))
+ (t (error "Invalid specializer ~S in defmethod form ~S."
+ specializer-name form))))
+ (t (error "Invalid specializer ~S in defmethod form ~S."
+ specializer-name form))))
+ (extract-specializer-names specialized-args)))
+ :lambda-list ',lambda-list
+ :function (function ,method-lambda)
+ ,@(unless (eq documentation :unbound)
+ (list :documentation documentation))
+ ,@method-args)))
+ (add-method ,gf ,method)
+ ,method))))))))))
+
+;; The following macro ensures that the new standard-generic-function
+;; is used by default. It also ensures that make-method-lambda is called
+;; for the default methods, by expanding into defmethod forms.
+
+(defmacro defgeneric (&whole form name (&rest args) &body options)
+ (unless (every #'consp options)
+ (error "Illegal generic functions options in defgeneric form ~S." form))
+ `(progn
+ (let ((generic-function (ignore-errors (fdefinition ',name))))
+ (when (and generic-function (typep generic-function 'standard-generic-function))
+ (loop for method in (slot-value generic-function 'initial-methods)
+ do (remove-method generic-function method))))
+ (cl:defgeneric ,name ,args
+ ,@(remove :method options :key #'car :test #'eq)
+ ,@(unless (member :generic-function-class options :key #'car :test #'eq)
+ '((:generic-function-class standard-generic-function))))
+ (let ((generic-function (fdefinition ',name)))
+ (setf (slot-value generic-function 'initial-methods)
+ (list ,@(loop for method-spec in (remove :method options :key #'car :test-not #'eq)
+ collect `(defmethod ,name ,@(cdr method-spec)))))
+ generic-function)))
+
+;; The following can be used in direct-slot-definition-class to get the correct initargs
+;; for a slot. Use it like this:
+;;
+;; (defmethod direct-slot-definition-class
+;; ((class my-standard-class) &rest initargs)
+;; (declare (dynamic-extent initargs))
+;; (destructuring-bind
+;; (&key key-of-interest &allow-other-keys)
+;; (fix-slot-initargs initargs)
+;; ...))
+
+(defvar *standard-slot-keys*
+ '(:name :documentation
+ :initargs :initform :initfunction
+ :readers :writers))
+
+(defun fix-slot-initargs (initargs)
+ initargs)
+
+(eval-when (:compile-toplevel :load-toplevel :execute)
+ (pushnew :closer-mop *features*))
Added: branches/trunk-reorg/thirdparty/closer-mop/mcl/closer-mop-packages.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/mcl/closer-mop-packages.lisp 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/mcl/closer-mop-packages.lisp 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,190 @@
+(in-package :cl-user)
+
+(defpackage #:closer-mop
+ (:use #:common-lisp #:lispworks)
+ (:nicknames #:c2mop)
+
+ #-openmcl
+ (:shadow #:defclass #:standard-class #:typep #:subtypep)
+ #-openmcl
+ (:export #:defclass #:standard-class #:typep #:subtypep)
+
+ (:import-from #:ccl
+
+ #:direct-slot-definition
+ #:effective-slot-definition
+ #:eql-specializer
+ #:forward-referenced-class
+ #:funcallable-standard-class
+ #-(or mcl openmcl) #:funcallable-standard-object
+ #:metaobject
+ #:slot-definition
+ #:specializer
+ #:standard-accessor-method
+ #:standard-direct-slot-definition
+ #:standard-effective-slot-definition
+ #:standard-reader-method
+ #:standard-slot-definition
+ #:standard-writer-method
+
+ #:accessor-method-slot-definition
+ #:add-dependent
+ #:add-direct-method
+ #:add-direct-subclass
+ #:class-default-initargs
+ #:class-direct-default-initargs
+ #:class-direct-slots
+ #:class-direct-subclasses
+ #:class-direct-superclasses
+ #:class-finalized-p
+ #:class-precedence-list
+ #:class-prototype
+ #:class-slots
+ #-(or mcl openmcl) #:compute-applicable-methods-using-classes
+ #:compute-class-precedence-list
+ #:compute-default-initargs
+ #:compute-discriminating-function
+ #:compute-effective-method
+ #:compute-effective-slot-definition
+ #:compute-slots
+ #:direct-slot-definition-class
+ #:effective-slot-definition-class
+ #:ensure-class
+ #:ensure-class-using-class
+ #:ensure-generic-function-using-class
+ #:eql-specializer-object
+ #:extract-lambda-list
+ #:extract-specializer-names
+ #:finalize-inheritance
+ #:find-method-combination
+ #:funcallable-standard-instance-access
+ #:generic-function-argument-precedence-order
+ #:generic-function-declarations
+ #:generic-function-lambda-list
+ #:generic-function-method-class
+ #:generic-function-method-combination
+ #:generic-function-methods
+ #:generic-function-name
+ #:intern-eql-specializer
+ #-(or mcl openmcl) #:make-method-lambda
+ #:map-dependents
+ #:method-function
+ #:method-generic-function
+ #:method-lambda-list
+ #:method-specializers
+ #:reader-method-class
+ #:remove-dependent
+ #:remove-direct-method
+ #:remove-direct-subclass
+ #+openmcl #:set-funcallable-instance-function
+ #:slot-boundp-using-class
+ #:slot-definition-allocation
+ #:slot-definition-initargs
+ #:slot-definition-initform
+ #:slot-definition-initfunction
+ #:slot-definition-location
+ #:slot-definition-name
+ #:slot-definition-readers
+ #:slot-definition-writers
+ #:slot-definition-type
+ #:slot-makunbound-using-class
+ #:slot-value-using-class
+ #:specializer-direct-generic-functions
+ #:specializer-direct-methods
+ #:standard-instance-access
+ #:update-dependent
+ #:validate-superclass
+ #:writer-method-class)
+
+ (:export
+ #:direct-slot-definition
+ #:effective-slot-definition
+ #:eql-specializer
+ #:forward-referenced-class
+ #:funcallable-standard-class
+ #-(or mcl openmcl) #:funcallable-standard-object
+ #:metaobject
+ #:slot-definition
+ #:specializer
+ #:standard-accessor-method
+ #:standard-direct-slot-definition
+ #:standard-effective-slot-definition
+ #:standard-reader-method
+ #:standard-slot-definition
+ #:standard-writer-method
+
+ #:ensure-finalized
+ #:ensure-method
+ #:fix-slot-initargs
+ #:required-args
+
+ #:accessor-method-slot-definition
+ #:add-dependent
+ #:add-direct-method
+ #:add-direct-subclass
+ #:class-default-initargs
+ #:class-direct-default-initargs
+ #:class-direct-slots
+ #:class-direct-subclasses
+ #:class-direct-superclasses
+ #:class-finalized-p
+ #:class-precedence-list
+ #:class-prototype
+ #:class-slots
+ #-(or mcl openmcl) #:compute-applicable-methods-using-classes
+ #:compute-class-precedence-list
+ #:compute-default-initargs
+ #:compute-discriminating-function
+ #:compute-effective-method
+ #:compute-effective-slot-definition
+ #:compute-slots
+ #:direct-slot-definition-class
+ #:effective-slot-definition-class
+ #:ensure-class
+ #:ensure-class-using-class
+ #:ensure-generic-function-using-class
+ #:eql-specializer-object
+ #:extract-lambda-list
+ #:extract-specializer-names
+ #:finalize-inheritance
+ #:find-method-combination
+ #:funcallable-standard-instance-access
+ #:generic-function-argument-precedence-order
+ #:generic-function-declarations
+ #:generic-function-lambda-list
+ #:generic-function-method-class
+ #:generic-function-method-combination
+ #:generic-function-methods
+ #:generic-function-name
+ #:intern-eql-specializer
+ #-(or mcl openmcl) #:make-method-lambda
+ #:map-dependents
+ #:method-function
+ #:method-generic-function
+ #:method-lambda-list
+ #:method-specializers
+ #:reader-method-class
+ #:remove-dependent
+ #:remove-direct-method
+ #:remove-direct-subclass
+ #+openmcl #:set-funcallable-instance-function
+ #:slot-boundp-using-class
+ #:slot-definition-allocation
+ #:slot-definition-initargs
+ #:slot-definition-initform
+ #:slot-definition-initfunction
+ #:slot-definition-location
+ #:slot-definition-name
+ #:slot-definition-readers
+ #:slot-definition-writers
+ #:slot-definition-type
+ #:slot-makunbound-using-class
+ #:slot-value-using-class
+ #:specializer-direct-generic-functions
+ #:specializer-direct-methods
+ #:standard-instance-access
+ #-openmcl #:subtypep
+ #-openmcl #:typep
+ #:update-dependent
+ #:validate-superclass
+ #:writer-method-class))
Added: branches/trunk-reorg/thirdparty/closer-mop/mcl/closer-mop.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/mcl/closer-mop.lisp 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/mcl/closer-mop.lisp 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,177 @@
+(in-package :closer-mop)
+
+;; Some utility functions.
+
+(defun required-args (lambda-list &optional (collector #'identity))
+ (loop for arg in lambda-list
+ until (member arg lambda-list-keywords)
+ collect (funcall collector arg)))
+
+(defun ensure-finalized (class &optional (errorp t))
+ (if (typep class 'class)
+ (unless (class-finalized-p class)
+ (finalize-inheritance class))
+ (when errorp (error "~S is not a class." class)))
+ class)
+
+#-openmcl
+(progn
+ ;; We need a new standard-class for various things.
+
+ (cl:defclass standard-class (cl:standard-class)
+ ())
+
+ ;; validate-superclass for metaclass classes is a little bit
+ ;; more tricky than for class metaobject classes because
+ ;; we don't want to make all standard-classes compatible to
+ ;; each other.
+
+ ;; Our validate-superclass may get passed a class-prototype
+ ;; as its second argument, so don't expect its readers to
+ ;; yield useful information. (In ANSI parlance, "the
+ ;; consequences are undefined...")
+
+ (cl:defmethod validate-superclass
+ ((class standard-class)
+ (superclass cl:standard-class))
+ (or (when (eq (class-of class) (find-class 'standard-class))
+ (or (eq (class-of superclass) (find-class 'cl:standard-class))
+ (eq (class-of superclass) (find-class 'standard-class))))
+ (call-next-method)
+ (when (eq (class-of superclass) (find-class 'cl:standard-class))
+ (validate-superclass class (class-prototype (find-class 'standard-class))))))
+
+ ;; The following macro ensures that the new standard-class is used
+ ;; by default. It would have been useful to fix other deficiencies
+ ;; in a complete redefinition of defclass, but there is no portable
+ ;; way to ensure the necessary compile-time effects as specified
+ ;; by ANSI Common Lisp. Therefore, we just expand to the original
+ ;; cl:defclass.
+
+ (defmacro defclass (name (&rest supers) &body options)
+ (if (member :metaclass options :key #'car)
+ `(cl:defclass ,name ,supers ,@options)
+ `(cl:defclass ,name ,supers ,@options
+ (:metaclass standard-class))))
+
+ ;; In MCL, the list of direct superclasses passed by the
+ ;; defclass macro is not empty, as required by AMOP, but
+ ;; instead passes the class metaobject for standard-object
+ ;; or funcallable-standard-object respectively. This makes
+ ;; replacing the default superclass for a new metaclass a bit
+ ;; more complicated. In order to avoid the tricky bits in user
+ ;; code, the new standard-class adjusts possible incorrect
+ ;; direct superclasses by adding or removing the metaobject
+ ;; for standard-object as needed before passing them to
+ ;; the original standard-class. In user code, just use the
+ ;; idiom suggested by AMOP to APPEND your new default superclass
+ ;; to the list of direct superclasses.
+
+ (defun modify-superclasses (direct-superclasses)
+ (if (null direct-superclasses)
+ (list (find-class 'standard-object))
+ (let ((standard-object (find-class 'standard-object)))
+ (if (eq (car (last direct-superclasses)) standard-object)
+ direct-superclasses
+ (remove standard-object direct-superclasses)))))
+
+ (cl:defmethod initialize-instance :around
+ ((class standard-class) &rest initargs
+ &key (name (gensym)) (direct-superclasses ()))
+ (declare (dynamic-extent initargs))
+ (apply #'call-next-method class
+ :name name
+ :direct-superclasses (modify-superclasses direct-superclasses)
+ initargs))
+
+ (cl:defmethod reinitialize-instance :around
+ ((class standard-class) &rest initargs
+ &key (direct-superclasses () direct-superclasses-p))
+ (declare (dynamic-extent initargs))
+ (if direct-superclasses-p
+ (apply #'call-next-method class
+ :direct-superclasses (modify-superclasses direct-superclasses)
+ initargs)
+ (call-next-method)))
+
+ (defgeneric typep (object type)
+ (:method (object type)
+ (cl:typep object type))
+ (:method (object (type class))
+ (member (class-of object)
+ (class-precedence-list type))))
+
+ (defgeneric subtypep (type1 type2)
+ (:method (type1 type2)
+ (cl:subtypep type1 type2))
+ (:method ((type1 class) (type2 symbol))
+ (let ((class2 (find-class type2 nil)))
+ (if class2
+ (member class2 (class-precedence-list type1))
+ (cl:subtypep type1 type2))))
+ (:method ((type1 symbol) (type2 class))
+ (let ((class1 (find-class type1 nil)))
+ (if class1
+ (member type2 (class-precedence-list class1))
+ (cl:subtypep type1 type2))))
+ (:method ((type1 class) (type2 class))
+ (member type2 (class-precedence-list type1)))))
+
+(defun ensure-method (gf lambda-expression
+ &key (qualifiers ())
+ (lambda-list (cadr lambda-expression))
+ (specializers (required-args lambda-list (constantly (find-class 't)))))
+ (eval `(defmethod ,(generic-function-name gf) ,@qualifiers
+ ,(loop for specializer in specializers
+ for (arg . rest) on lambda-list
+ collect `(,arg ,specializer) into args
+ finally (return (nconc args rest)))
+ ,@(cddr lambda-expression))))
+
+;; The following ensures that slot definitions have a documentation in OpenMCL.
+
+#+openmcl
+(defmethod initialize-instance :after ((slot slot-definition) &key documentation)
+ (setf (documentation slot 't) documentation))
+
+;; The following can be used in direct-slot-definition-class to get the correct initargs
+;; for a slot. Use it like this:
+;;
+;; (defmethod direct-slot-definition-class
+;; ((class my-standard-class) &rest initargs)
+;; (declare (dynamic-extent initargs))
+;; (destructuring-bind
+;; (&key key-of-interest &allow-other-keys)
+;; (fix-slot-initargs initargs)
+;; ...))
+
+(defvar *standard-slot-keys*
+ '(:name :documentation
+ :initargs :initform :initfunction
+ :readers :writers))
+
+(defun fix-slot-initargs (initargs)
+ #+openmcl initargs
+ #-openmcl
+ (let* ((counts (loop with counts
+ for (key nil) on initargs by #'cddr
+ do (incf (getf counts key 0))
+ finally (return counts)))
+ (keys-to-fix (loop for (key value) on counts by #'cddr
+ if (> value 1) collect key)))
+ (if keys-to-fix
+ (let ((multiple-standard-keys
+ (intersection keys-to-fix *standard-slot-keys*)))
+ (if multiple-standard-keys
+ (error "Too many occurences of ~S in slot initargs ~S."
+ multiple-standard-keys initargs)
+ (loop with fixed-keys
+ for (key value) on initargs by #'cddr
+ if (member key keys-to-fix)
+ do (nconcf (getf fixed-keys key) (list value))
+ else nconc (list key value) into fixed-initargs
+ finally (return (nconc fixed-initargs fixed-keys)))))
+ initargs)))
+
+(eval-when (:compile-toplevel :load-toplevel :execute)
+ (pushnew :closer-mop *features*))
Added: branches/trunk-reorg/thirdparty/closer-mop/pcl/closer-mop-packages.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/pcl/closer-mop-packages.lisp 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/pcl/closer-mop-packages.lisp 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,190 @@
+(in-package :cl-user)
+
+(defpackage #:closer-mop
+ (:use #:common-lisp #:lispworks)
+ (:nicknames #:c2mop)
+
+ #-sbcl (:shadow #:typep #:subtypep)
+ #-sbcl (:export #:typep #:subtypep)
+
+ (:import-from
+ #+cmu #:clos-mop
+ #+sbcl #:sb-mop
+
+ #:direct-slot-definition
+ #:effective-slot-definition
+ #:eql-specializer
+ #:forward-referenced-class
+ #:funcallable-standard-class
+ #:funcallable-standard-object
+ #:metaobject
+ #:slot-definition
+ #:specializer
+ #:standard-accessor-method
+ #:standard-direct-slot-definition
+ #:standard-effective-slot-definition
+ #:standard-reader-method
+ #:standard-slot-definition
+ #:standard-writer-method
+
+ #:accessor-method-slot-definition
+ #:add-dependent
+ #:add-direct-method
+ #:add-direct-subclass
+ #:class-default-initargs
+ #:class-direct-default-initargs
+ #:class-direct-slots
+ #:class-direct-subclasses
+ #:class-direct-superclasses
+ #:class-finalized-p
+ #:class-precedence-list
+ #:class-prototype
+ #:class-slots
+ #:compute-applicable-methods-using-classes
+ #:compute-class-precedence-list
+ #:compute-default-initargs
+ #:compute-discriminating-function
+ #:compute-effective-method
+ #:compute-effective-slot-definition
+ #:compute-slots
+ #:direct-slot-definition-class
+ #:effective-slot-definition-class
+ #:ensure-class
+ #:ensure-class-using-class
+ #:ensure-generic-function-using-class
+ #:eql-specializer-object
+ #:extract-lambda-list
+ #:extract-specializer-names
+ #:finalize-inheritance
+ #:find-method-combination
+ #:funcallable-standard-instance-access
+ #:generic-function-argument-precedence-order
+ #:generic-function-declarations
+ #:generic-function-lambda-list
+ #:generic-function-method-class
+ #:generic-function-method-combination
+ #:generic-function-methods
+ #:generic-function-name
+ #:intern-eql-specializer
+ #:make-method-lambda
+ #:map-dependents
+ #:method-function
+ #:method-generic-function
+ #:method-lambda-list
+ #:method-specializers
+ #:reader-method-class
+ #:remove-dependent
+ #:remove-direct-method
+ #:remove-direct-subclass
+ #:set-funcallable-instance-function
+ #:slot-boundp-using-class
+ #:slot-definition-allocation
+ #:slot-definition-initargs
+ #:slot-definition-initform
+ #:slot-definition-initfunction
+ #:slot-definition-location
+ #:slot-definition-name
+ #:slot-definition-readers
+ #:slot-definition-writers
+ #:slot-definition-type
+ #:slot-makunbound-using-class
+ #:slot-value-using-class
+ #:specializer-direct-generic-functions
+ #:specializer-direct-methods
+ #:standard-instance-access
+ #:update-dependent
+ #:validate-superclass
+ #:writer-method-class)
+
+ (:export
+ #:direct-slot-definition
+ #:effective-slot-definition
+ #:eql-specializer
+ #:forward-referenced-class
+ #:funcallable-standard-class
+ #:funcallable-standard-object
+ #:metaobject
+ #:slot-definition
+ #:specializer
+ #:standard-accessor-method
+ #:standard-direct-slot-definition
+ #:standard-effective-slot-definition
+ #:standard-reader-method
+ #:standard-slot-definition
+ #:standard-writer-method
+
+ #:ensure-finalized
+ #:ensure-method
+ #:fix-slot-initargs
+ #:required-args
+
+ #:accessor-method-slot-definition
+ #:add-dependent
+ #:add-direct-method
+ #:add-direct-subclass
+ #:class-default-initargs
+ #:class-direct-default-initargs
+ #:class-direct-slots
+ #:class-direct-subclasses
+ #:class-direct-superclasses
+ #:class-finalized-p
+ #:class-precedence-list
+ #:class-prototype
+ #:class-slots
+ #:compute-applicable-methods-using-classes
+ #:compute-class-precedence-list
+ #:compute-default-initargs
+ #:compute-discriminating-function
+ #:compute-effective-method
+ #:compute-effective-slot-definition
+ #:compute-slots
+ #:direct-slot-definition-class
+ #:effective-slot-definition-class
+ #:ensure-class
+ #:ensure-class-using-class
+ #:ensure-generic-function-using-class
+ #:eql-specializer-object
+ #:extract-lambda-list
+ #:extract-specializer-names
+ #:finalize-inheritance
+ #:find-method-combination
+ #:funcallable-standard-instance-access
+ #:generic-function-argument-precedence-order
+ #:generic-function-declarations
+ #:generic-function-lambda-list
+ #:generic-function-method-class
+ #:generic-function-method-combination
+ #:generic-function-methods
+ #:generic-function-name
+ #:intern-eql-specializer
+ #:make-method-lambda
+ #:map-dependents
+ #:method-function
+ #:method-generic-function
+ #:method-lambda-list
+ #:method-specializers
+ #:reader-method-class
+ #:remove-dependent
+ #:remove-direct-method
+ #:remove-direct-subclass
+ #:set-funcallable-instance-function
+ #:slot-boundp-using-class
+ #:slot-definition-allocation
+ #:slot-definition-initargs
+ #:slot-definition-initform
+ #:slot-definition-initfunction
+ #:slot-definition-location
+ #:slot-definition-name
+ #:slot-definition-readers
+ #:slot-definition-writers
+ #:slot-definition-type
+ #:slot-makunbound-using-class
+ #:slot-value-using-class
+ #:specializer-direct-generic-functions
+ #:specializer-direct-methods
+ #:standard-instance-access
+ #:subtypep
+ #:typep
+ #:update-dependent
+ #:validate-superclass
+ #:writer-method-class))
Added: branches/trunk-reorg/thirdparty/closer-mop/pcl/closer-mop.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/pcl/closer-mop.lisp 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/pcl/closer-mop.lisp 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,284 @@
+(in-package :closer-mop)
+
+;; Some utility functions.
+
+(defun required-args (lambda-list &optional (collector #'identity))
+ (loop for arg in lambda-list
+ until (member arg lambda-list-keywords)
+ collect (funcall collector arg)))
+
+(defun ensure-finalized (class &optional (errorp t))
+ (if (typep class 'class)
+ (unless (class-finalized-p class)
+ (finalize-inheritance class))
+ (when errorp (error "~S is not a class." class)))
+ class)
+
+;; The following is commented out. SBCL now supports compatible standard-class and
+;; funcallable-standard-class metaclasses, but this requires that we don't mess with
+;; the class hierarchy anymore. So we will try the trick we have already used
+;; for generic functions: We just add methods for the existing metaclasses.
+;; This is not AMOP-compliant, but if it works it works.
+
+#|
+;; We need a new standard-class for various things.
+
+(cl:defclass standard-class (cl:standard-class)
+ ())
+
+;; validate-superclass for metaclass classes is a little bit
+;; more tricky than for class metaobject classes because
+;; we don't want to make all standard-classes compatible to
+;; each other.
+
+;; Our validate-superclass may get passed a class-prototype
+;; as its second argument, so don't expect its readers to
+;; yield useful information. (In ANSI parlance, "the
+;; consequences are undefined...")
+
+(cl:defmethod validate-superclass
+ ((class standard-class)
+ (superclass cl:standard-class))
+ (or (when (eq (class-of class) (find-class 'standard-class))
+ (or (eq (class-of superclass) (find-class 'cl:standard-class))
+ (eq (class-of superclass) (find-class 'standard-class))))
+ (call-next-method)
+ (when (eq (class-of superclass) (find-class 'cl:standard-class))
+ (validate-superclass class (class-prototype (find-class 'standard-class))))))
+
+#+sbcl
+(cl:defmethod validate-superclass
+ ((class funcallable-standard-class)
+ (superclass standard-class))
+ (and (eq (class-of class) (find-class 'funcallable-standard-class))
+ (eq (class-of superclass) (find-class 'standard-class))))
+
+;; The following macro ensures that the new standard-class is used
+;; by default. It would have been useful to fix other deficiencies
+;; in a complete redefinition of defclass, but there is no portable
+;; way to ensure the necessary compile-time effects as specified
+;; by ANSI Common Lisp. Therefore, we just expand to the original
+;; cl:defclass.
+
+(defmacro defclass (name (&rest supers) &body options)
+ (if (member :metaclass options :key #'car)
+ `(cl:defclass ,name ,supers ,@options)
+ `(cl:defclass ,name ,supers ,@options
+ (:metaclass standard-class))))
+|#
+
+;; In CMUCL, reader-method-class and writer-method-class are
+;; not used during class initialization. The following definitions
+;; correct this.
+
+#-sbcl
+(defun modify-accessors (class)
+ (loop with reader-specializers = (list class)
+ with writer-specializers = (list (find-class 't) class)
+ for slotd in (class-direct-slots class) do
+ (loop for reader in (slot-definition-readers slotd)
+ for reader-function = (fdefinition reader)
+ for reader-method = (find-method reader-function () reader-specializers)
+ for initargs = (list :qualifiers ()
+ :lambda-list '(object)
+ :specializers reader-specializers
+ :function (method-function reader-method)
+ :slot-definition slotd)
+ for method-class = (apply #'reader-method-class class slotd initargs)
+ unless (eq method-class (class-of reader-method))
+ do (add-method reader-function (apply #'make-instance method-class initargs)))
+ (loop for writer in (slot-definition-writers slotd)
+ for writer-function = (fdefinition writer)
+ for writer-method = (find-method writer-function () writer-specializers)
+ for initargs = (list :qualifiers ()
+ :lambda-list '(new-value object)
+ :specializers writer-specializers
+ :function (method-function writer-method)
+ :slot-definition slotd)
+ for method-class = (apply #'writer-method-class class slotd initargs)
+ unless (eq method-class (class-of writer-method))
+ do (add-method writer-function (apply #'make-instance method-class initargs)))))
+
+;; The following methods additionally create a gensym for the class name
+;; unless a name is explicitly provided. AMOP requires classes to be
+;; potentially anonymous.
+
+#-sbcl
+(cl:defmethod initialize-instance :around
+ ((class standard-class) &rest initargs
+ &key (name (gensym)))
+ (declare (dynamic-extent initargs))
+ (prog1 (apply #'call-next-method class :name name initargs)
+ (modify-accessors class)))
+
+#-sbcl
+(cl:defmethod initialize-instance :around
+ ((class funcallable-standard-class) &rest initargs
+ &key (name (gensym)))
+ (declare (dynamic-extent initargs))
+ (prog1 (apply #'call-next-method class :name name initargs)
+ (modify-accessors class)))
+
+#-sbcl
+(cl:defmethod reinitialize-instance :after
+ ((class standard-class) &key)
+ (modify-accessors class))
+
+#-sbcl
+(cl:defmethod reinitialize-instance :after
+ ((class funcallable-standard-class) &key)
+ (modify-accessors class))
+
+;;; The following three methods ensure that the dependent protocol
+;;; for generic function works.
+
+;; The following method additionally ensures that
+;; compute-discriminating-function is triggered.
+
+; Note that for CMUCL, these methods violate the AMOP specification
+; by specializing on the original standard-generic-function metaclass. However,
+; this is necassary because in CMUCL, only one subclass of
+; standard-generic-function can be created, and taking away that option from user
+; code doesn't make a lot of sense in our context.
+
+#-sbcl
+(cl:defmethod reinitialize-instance :after
+ ((gf standard-generic-function) &rest initargs)
+ (declare (dynamic-extent initargs))
+ (set-funcallable-instance-function
+ gf (compute-discriminating-function gf))
+ #-cmu
+ (map-dependents
+ gf (lambda (dep) (apply #'update-dependent gf dep initargs))))
+
+#-(or cmu sbcl)
+(cl:defmethod add-method :after
+ ((gf standard-generic-function) method)
+ (map-dependents
+ gf (lambda (dep) (update-dependent gf dep 'add-method method))))
+
+#-(or cmu sbcl)
+(cl:defmethod remove-method :after
+ ((gf standard-generic-function) method)
+ (map-dependents
+ gf (lambda (dep) (update-dependent gf dep 'remove-method method))))
+
+#+sbcl
+(defun ensure-method (gf lambda-expression
+ &key (method-class (generic-function-method-class gf))
+ (qualifiers ())
+ (lambda-list (cadr lambda-expression))
+ (specializers (required-args lambda-list (constantly (find-class 't)))))
+ (multiple-value-bind
+ (method-lambda method-args)
+ (make-method-lambda
+ gf (class-prototype method-class)
+ lambda-expression ())
+ (let ((method (apply #'make-instance
+ method-class
+ :qualifiers qualifiers
+ :lambda-list lambda-list
+ :specializers specializers
+ :function (compile nil method-lambda)
+ method-args)))
+ (add-method gf method)
+ method)))
+
+#|
+(defgeneric transform-specializer (specializer)
+ (:method (specializer) specializer)
+ (:method ((specializer class))
+ (class-name specializer))
+ (:method ((specializer eql-specializer))
+ `(eql ,(eql-specializer-object specializer))))
+|#
+
+#-sbcl
+(defun ensure-method (gf lambda-expression
+ &key (qualifiers ())
+ (lambda-list (cadr lambda-expression))
+ (specializers (required-args lambda-list (constantly 't))))
+ (funcall (compile nil `(lambda ()
+ (defmethod ,(generic-function-name gf) ,@qualifiers
+ ,(loop for specializer in specializers
+ for (arg . rest) on lambda-list
+ collect `(,arg ,specializer) into args
+ finally (return (nconc args rest)))
+ ,@(cddr lambda-expression))))))
+
+;; The following ensures that effective slot definitions have a documentation in CMUCL.
+
+#+cmu
+(defmethod compute-effective-slot-definition :around
+ ((class standard-class) name direct-slot-definitions)
+ (let ((effective-slot (call-next-method)))
+ (loop for direct-slot in direct-slot-definitions
+ for documentation = (documentation direct-slot 't)
+ when documentation do
+ (setf (documentation effective-slot 't) documentation)
+ (loop-finish))
+ effective-slot))
+
+;; The following can be used in direct-slot-definition-class to get the correct initargs
+;; for a slot. Use it like this:
+;;
+;; (defmethod direct-slot-definition-class
+;; ((class my-standard-class) &rest initargs)
+;; (declare (dynamic-extent initargs))
+;; (destructuring-bind
+;; (&key key-of-interest &allow-other-keys)
+;; (fix-slot-initargs initargs)
+;; ...))
+
+(defvar *standard-slot-keys*
+ '(:name :documentation
+ :initargs :initform :initfunction
+ :readers :writers))
+
+(defun fix-slot-initargs (initargs)
+ #+sbcl initargs
+ #+cmu
+ (let* ((counts (loop with counts
+ for (key nil) on initargs by #'cddr
+ do (incf (getf counts key 0))
+ finally (return counts)))
+ (keys-to-fix (loop for (key value) on counts by #'cddr
+ if (> value 1) collect key)))
+ (if keys-to-fix
+ (let ((multiple-standard-keys
+ (intersection keys-to-fix *standard-slot-keys*)))
+ (if multiple-standard-keys
+ (error "Too many occurences of ~S in slot initargs ~S."
+ multiple-standard-keys initargs)
+ (loop with fixed-keys
+ for (key value) on initargs by #'cddr
+ if (member key keys-to-fix)
+ do (nconcf (getf fixed-keys key) (list value))
+ else nconc (list key value) into fixed-initargs
+ finally (return (nconc fixed-initargs fixed-keys)))))
+ initargs)))
+
+;; In CMUCL, TYPEP and SUBTYPEP don't work as expected
+;; in conjunction with class metaobjects.
+
+#-sbcl
+(progn
+ (defgeneric typep (object type)
+ (:method (object type)
+ (cl:typep object type))
+ (:method (object (type class))
+ (cl:typep object (class-name type))))
+
+ (defgeneric subtypep (type1 type2)
+ (:method (type1 type2)
+ (cl:subtypep type1 type2))
+ (:method ((type1 class) type2)
+ (cl:subtypep (class-name type1) type2))
+ (:method (type1 (type2 class))
+ (cl:subtypep type1 (class-name type2)))
+ (:method ((type1 class) (type2 class))
+ (cl:subtypep (class-name type1)
+ (class-name type2)))))
+
+(eval-when (:compile-toplevel :load-toplevel :execute)
+ (pushnew :closer-mop *features*))
Added: branches/trunk-reorg/thirdparty/closer-mop/release-notes.txt
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/release-notes.txt 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/release-notes.txt 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,34 @@
+Closer to MOP Release Note
+
+v0.0 initial release
+
+v0.1
+- separated single implementation into several ones, one for each MOP implementation / implementation family, in order to improve maintainability
+- added support for LispWorks 4.4
+- removed extra method options from the LispWorks defmethod - it's a useful feature, but doesn't belong here
+- the automatically generated slot accessor methods in LispWorks closed over the wrong slot names. fixed. (obsolete because of the next issue)
+- In some cases, LispWorks deoptimizes slot access and reverts to the slot-value-using-class, etc., functions. This rendered the previously taken approach for fixing that protocol useless. Now, we have a much simpler fix. (Thanks to Jeff Caldwell.) Unfortunately, now some of the features that were previously fixed are missing again (correct initialization of accessor methods, accessor-method-slot-definition, reader-method-class and writer-method-class). Fortunately, LispWorks has already fixed those in 4.4, so this is no problem anymore in the long run.
+
+v0.2
+- The trick for reinitialization of generic-function-name or class-name in allegro, pcl, lispworks and mcl didn't work and had to be dropped.
+- In clisp, defgeneric does call ensure-generic-function-using-class. This wasn't detected before due to a bug in mop-feature-tests. (Thanks to Bruno Haible.)
+- Added the utility function ensure-method for programmatically creating methods, supported on all platforms.
+- The defmethod macro for LispWorks didn't have an implicit block with the name of the generic function. Fixed.
+- LispWorks 4.3 is not supported anymore. The existing conditionalizations are still available, though, and will be retained as long as they don't stand in the way of anything else.
+- Since I have to override some symbols from the common-lisp package, I provide two utility packages closer-common-lisp and closer-common-lisp-user, similar to common-lisp and common-lisp-user but with all the MOP symbols added. The default packages additionally added by the various Common Lisp implementations are not added here. (I think that's cleaner.)
+- Handling of pseudo-anonymous classes in CMU CL and SBCL had a copy&paste bug: The name was changed again in reinitialize-instance.
+- TYPEP and SUBTYPEP don't work as expected in CMU CL and SBCL in conjunction with class metaobjects. Same for MCL, but for different reasons. So I have shadowed them and provide a new definition. (In CMU CL and SBCL, class metaobject are not considered types. In MCL, type information for class metaobjects is not available at some stages. Unfortunately, it doesn't seem to be possible to fix this with finalize-inheritance, so I have to revert to membership tests on the class precedence list.)
+- MCL also doesn't like anonymous classes. So I have added a fix for that.
+- I have incorrectly reported that MAKE-METHOD-LAMBDA is unreliable in CMU CL and SBCL. This was due to a bug in my test suite. However, it is required that the respective generic function and method metaobject classes and make-method-lambda definitions are part of the compilation environment when you want to use them. I have updated the respective sections in features.lisp and features.txt.
+- Switched to an MIT/BSD-style license.
+
+v0.3
+- Now supports OpenMCL 1.0, LispWorks 4.4.6, SBCL 0.9.7 - 0.9.9, CMUCL 19C, Allegro 8.0, clisp 2.37 and 2.38.
+- STANDARD-CLASS and FUNCALLABLE-STANDARD-CLASS are now compatible in SBCL. This required some changes in the PCL support.
+- Dropped the reports for LispWorks 4.3.
+- Allegro 6.2 is not supported anymore. The existing conditionalizations are still available, though, and will be retained as long as they don't stand in the way of anything else.
+- The incorrect specialization of slot-boundp-using-class and slot-makunbound-using-class on symbols instead of slot definition metaobjects in Allegro is fixed.
+- SBCL 0.9.7 has improved a lot wrt MOP compatibility. This required some changes in the PCL support.
+- The lack of extensible :allocation kinds in Allegro is fixed. (Covers 6.2, 7.0 and 8.0. Thanks to John Foderaro for giving me the important hint on how to solve this.)
+
+After version 0.3, there are no separate release notes anymore, but they will be generated automatically by darcs in the future.
Added: branches/trunk-reorg/thirdparty/closer-mop/supported-cls.txt
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/supported-cls.txt 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/supported-cls.txt 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,10 @@
+Allegro 7.0, 8.0 & 8.1
+CLisp 2.35 - 2.41
+CMU Common Lisp 19c, 19d
+LispWorks 4.4.5, 4.4.6 Personal Edition
+LispWorks 4.4.5, 4.4.6 Professional Edition
+LispWorks 5.0, 5.0.1, Personal Edition
+LispWorks 5.0 - 5.0.2, Professional Edition
+Macintosh Common Lisp 5.1
+OpenMCL 1.0
+SBCL 0.9.16 - 0.9.18, 1.0.1 - 1.0.10
Added: branches/trunk-reorg/thirdparty/closer-mop/test/jeffs-code.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/closer-mop/test/jeffs-code.lisp 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/closer-mop/test/jeffs-code.lisp 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,207 @@
+;;; Jeff Caldwell 2004-04-16
+;;; LWL 4.3
+;;;
+;;; To reproduce the issues I have come across:
+;;;
+;;; 1. (asdf:oos 'asdf:load-op 'closer-mop)
+;;; 2. (compile-file "c2mop-attributes.lisp" :load t)
+;;; 3. (in-package #:c2mop-test)
+;;; C2MOP-TEST> (setq cr (make-instance 'credit-rating))
+;;; => Stack overflow (stack size 16000).
+;;;
+;;; (In this code, I accidently took out the format statements
+;;; creating the output below. You may wish to put them back
+;;; in the slot-value-using-class and (setf slot-value-using-class)
+;;; methods at the bottom of this file.)
+;;;
+;;; slot-value-using-class class #<ATTRIBUTES-CLASS CREDIT-RATING 2134BF1C>
+;;; object #<CREDIT-RATING 21732B2C> slot-name ALL-ATTRIBUTES-2382
+;;; slot-value-using-class class #<ATTRIBUTES-CLASS CREDIT-RATING 2134BF1C>
+;;; object #<CREDIT-RATING 21732B2C> slot-name LEVEL
+;;; slot-value-using-class class #<ATTRIBUTES-CLASS CREDIT-RATING 2134BF1C>
+;;; object #<CREDIT-RATING 21732B2C>
+;;; slot-name #<ATTRIBUTES-EFFECTIVE-SLOT-DEFINITION LEVEL 2134396C>
+;;; slot-value-using-class class #<ATTRIBUTES-CLASS CREDIT-RATING 2134BF1C>
+;;; object #<CREDIT-RATING 21732B2C> slot-name LEVEL
+;;; slot-value-using-class class #<ATTRIBUTES-CLASS CREDIT-RATING 2134BF1C>
+;;; object #<CREDIT-RATING 21732B2C>
+;;; slot-name #<ATTRIBUTES-EFFECTIVE-SLOT-DEFINITION LEVEL 2134396C>
+;;; slot-value-using-class class #<ATTRIBUTES-CLASS CREDIT-RATING 2134BF1C>
+;;; object #<CREDIT-RATING 21732B2C> slot-name LEVEL
+;;; slot-value-using-class class #<ATTRIBUTES-CLASS CREDIT-RATING 2134BF1C>
+;;; object #<CREDIT-RATING 21732B2C>
+;;; slot-name #<ATTRIBUTES-EFFECTIVE-SLOT-DEFINITION LEVEL 2134396C>
+;;; ...
+;;;
+;;; Note that it alternates between slot-name LEVEL and
+;;; slot-name #<ATTRIBUTES-EFFECTIVE-...
+;;;
+;;; In closer-mop.lisp change
+;;;
+;;; (cl:defmethod slot-value-using-class
+;;; ((class standard-class) object (slot symbol))
+;;; (let ((slotd (find slot (class-slots class) :key #'slot-definition-name)))
+;;; (if slotd
+;;; (if (default-reader slotd)
+;;; (slot-value-using-class class object slotd)
+;;; (call-next-method))
+;;; (slot-missing class object slot 'slot-value))))
+;;;
+;;; to
+;;;
+;;; ...
+;;; (if slotd
+;;; (if (default-reader slotd)
+;;; (slot-value-using-class (find-class 'standard-class)
+;;; object slotd)
+;;; ...
+;;;
+;;; (I have no idea if that's a correct patch but it does stop
+;;; the recursive stack overflow.)
+;;;
+;;; Then
+;;; (asdf:oos 'asdf:load-op 'closer-mop)
+;;; (setq cr (make-instance 'credit-rating)
+;;; =>
+;;; The slot #<ATTRIBUTES-EFFECTIVE-SLOT-DEFINITION LEVEL 2133983C> is
+;;; missing from #<CREDIT-RATING 206F0864> (of class #<ATTRIBUTES-CLASS
+;;; CREDIT-RATING 2133B3DC>), when reading the value.
+;;;
+;;; At this point you also can remove the slot-value-using-class and
+;;; setf slot-value-using-class methods. They were no-ops in this
+;;; example, something I had run across in other code. I left them
+;;; here to show the recursive stack overflow. Now that it is "fixed",
+;;; we are left with the missing slot problem above.
+;;; (The problem above is somewhat different from what I reported
+;;; in my first email but the error above is what I'm getting now
+;;; with this example.)
+;;;
+;;; Simply using the LW MOP, instead of using closer-mop,
+;;; "fixes" the problem above. Quit using closer-mop and revert
+;;; to the LW-only MOP. Change the defpackage to
+;;;
+;;; (defpackage #:c2mop-test
+;;; (:use :cl :cl-user :clos))
+;;;
+;;; (cl-user::quit) ;; Make really sure everything's fresh
+;;; M-x slime
+;;; (compile-file "c2mop-attributes.lisp" :load t)
+;;; CL-USER> (in-package #:c2mop-test)
+;;; #<PACKAGE C2MOP-TEST>
+;;; C2MOP-TEST> (setq cr (make-instance 'credit-rating))
+;;; #<CREDIT-RATING 206EDFAC>
+;;; C2MOP-TEST> (setf (level cr) 42)
+;;; 42
+;;; C2MOP-TEST> (level cr)
+;;; 42
+;;; C2MOP-TEST> (setf (slot-attribute cr 'level 'date-set) 20040416)
+;;; 20040416
+;;; C2MOP-TEST> (slot-attribute cr 'level 'date-set)
+;;; 20040416
+;;;
+
+
+;;;
+(defpackage #:c2mop-test
+; (:use :cl :cl-user :clos)
+ (:use :cl :cl-user :closer-mop)
+ (:shadowing-import-from :closer-mop
+ #:defclass #:defmethod #:standard-class
+ #:ensure-generic-function #:defgeneric
+ #:standard-generic-function #:class-name)
+)
+
+(in-package #:c2mop-test)
+
+(eval-when (:compile-toplevel :load-toplevel :execute)
+
+(defvar *all-attributes* (gensym "ALL-ATTRIBUTES-"))
+(defvar *current-direct-slot-definitions* nil)
+
+(defclass attributes-class (standard-class) ())
+
+(defclass attributes-mixin
+ (standard-slot-definition)
+ ((attributes :initarg :attributes :accessor slot-definition-attributes
+ :initform nil)))
+
+(defclass attributes-direct-slot-definition
+ (standard-direct-slot-definition attributes-mixin)
+ ())
+
+(defclass attributes-effective-slot-definition
+ (standard-effective-slot-definition attributes-mixin)
+ ())
+
+(defmethod effective-slot-definition-class ((class attributes-class)
+ &rest initargs)
+ (find-class 'attributes-effective-slot-definition))
+
+(defmethod compute-effective-slot-definition ((class attributes-class)
+ name direct-slots)
+ (let* ((normal-slot (call-next-method)))
+ (setf (slot-definition-attributes normal-slot)
+ (remove-duplicates
+ (apply #'append (mapcar #'slot-definition-attributes
+ direct-slots))))
+ normal-slot))
+
+(defmethod direct-slot-definition-class
+ ((class attributes-class) &rest initargs)
+ (find-class 'attributes-direct-slot-definition))
+
+(defmethod process-a-slot-option
+ ((class attributes-class) option value
+ already-processed-options slot)
+ (princ "process-a-slot-option") (princ option)
+ (if (eq option :attributes)
+ (list* :attributes `',value already-processed-options)
+ (call-next-method)))
+
+(defmethod compute-slots ((class attributes-class))
+ (let* ((normal-slots (call-next-method))
+ (alist (mapcar (lambda (slot)
+ (cons (slot-definition-name slot)
+ (mapcar (lambda (attr) (cons attr nil))
+ (slot-definition-attributes
+ slot))))
+ normal-slots)))
+ (cons (make-instance 'attributes-effective-slot-definition
+ :name *all-attributes*
+ :initform alist
+ :initfunction (lambda () alist))
+ normal-slots)))
+
+(defun slot-attribute (instance slot-name attribute)
+ (cdr (slot-attribute-bucket instance slot-name attribute)))
+
+(defun (setf slot-attribute) (new-value instance slot-name attribute)
+ (setf (cdr (slot-attribute-bucket instance slot-name attribute))
+ new-value))
+
+(defun slot-attribute-bucket (instance slot-name attribute)
+ (let* ((all-buckets (slot-value instance *all-attributes*))
+ (slot-bucket (assoc slot-name all-buckets)))
+ (unless slot-bucket
+ (error "Slot ~S of ~S has no attributes."
+ slot-name instance))
+ (let ((attr-bucket (assoc attribute (cdr slot-bucket))))
+ (unless attr-bucket
+ (error "Slot ~S of ~S has no attribute ~S."
+ slot-name instance attribute))
+ attr-bucket)))
+
+(defmethod clos:slot-value-using-class
+ ((class attributes-class) object (slot-name attributes-effective-slot-definition))
+ (call-next-method))
+
+(defmethod (setf clos:slot-value-using-class)
+ (value (class attributes-class) object (slot-name attributes-effective-slot-definition))
+ (call-next-method))
+
+) ; eval-when
+
+(defclass credit-rating ()
+ ((level :attributes (date-set time-set) :accessor level)
+ (desc :accessor desc))
+ (:metaclass attributes-class))
Added: branches/trunk-reorg/thirdparty/lw-compat/_darcs/current/lw-compat-package.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/lw-compat/_darcs/current/lw-compat-package.lisp 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/lw-compat/_darcs/current/lw-compat-package.lisp 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,7 @@
+(in-package :cl-user)
+
+#-lispworks
+(defpackage #:lispworks
+ (:use #:common-lisp)
+ (:export #:appendf #:nconcf #:rebinding #:removef
+ #:when-let #:when-let* #:with-unique-names))
Added: branches/trunk-reorg/thirdparty/lw-compat/_darcs/current/lw-compat.asd
===================================================================
--- branches/trunk-reorg/thirdparty/lw-compat/_darcs/current/lw-compat.asd 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/lw-compat/_darcs/current/lw-compat.asd 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,34 @@
+(asdf:defsystem #:lw-compat
+ :name "LispWorks Compatibility Library"
+ :author "Pascal Costanza, with permission from http://www.lispworks.com"
+ :version "0.22"
+ :licence "
+Copyright (c) 2005, 2006 Pascal Costanza
+with permission from http://www.lispworks.com
+
+Permission is hereby granted, free of charge, to any person
+obtaining a copy of this software and associated documentation
+files (the \"Software\"), to deal in the Software without
+restriction, including without limitation the rights to use,
+copy, modify, merge, publish, distribute, sublicense, and/or
+sell copies of the Software, and to permit persons to whom the
+Software is furnished to do so, subject to the following
+conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED \"AS IS\", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES
+OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
+HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
+WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
+FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
+OTHER DEALINGS IN THE SOFTWARE.
+"
+ :components (#-lispworks
+ (:file "lw-compat-package")
+ #-lispworks
+ (:file "lw-compat"
+ :depends-on ("lw-compat-package"))))
Added: branches/trunk-reorg/thirdparty/lw-compat/_darcs/current/lw-compat.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/lw-compat/_darcs/current/lw-compat.lisp 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/lw-compat/_darcs/current/lw-compat.lisp 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,50 @@
+(in-package #:lispworks)
+
+#+lispworks
+(eval-when (:compile-toplevel :load-toplevel :execute)
+ (error "lw-compat is not needed in LispWorks."))
+
+(define-modify-macro appendf (&rest lists)
+ append "Appends lists to the end of given list.")
+
+(define-modify-macro nconcf (&rest lists)
+ nconc "Appends lists to the end of given list by NCONC.")
+
+(defmacro rebinding (vars &body body)
+ "Ensures unique names for all the variables in a groups of forms."
+ (loop for var in vars
+ for name = (gensym (symbol-name var))
+ collect `(,name ,var) into renames
+ collect ``(,,var ,,name) into temps
+ finally (return `(let ,renames
+ (with-unique-names
+ ,vars
+ `(let (,,@temps)
+ ,,@body))))))
+
+(define-modify-macro removef (item &rest keys)
+ (lambda (place item &rest keys &key test test-not start end key)
+ (declare (ignorable test test-not start end key))
+ (apply #'remove item place keys))
+ "Removes an item from a sequence.")
+
+(defmacro when-let ((var form) &body body)
+ "Executes a body of code if a form evaluates to non-nil,
+ propagating the result of the form through the body of code."
+ `(let ((,var ,form))
+ (when ,var
+ (locally
+ ,@body))))
+
+(defmacro when-let* (bindings &body body)
+ "Executes a body of code if a series of forms evaluates to non-nil,
+ propagating the results of the forms through the body of code."
+ (loop for form = `(progn ,@body) then `(when-let (,(car binding) ,(cadr binding)) ,form)
+ for binding in (reverse bindings)
+ finally (return form)))
+
+(defmacro with-unique-names (names &body body)
+ "Returns a body of code with each specified name bound to a similar name."
+ `(let ,(mapcar (lambda (name) `(,name (gensym ,(symbol-name name))))
+ names)
+ ,@body))
Added: branches/trunk-reorg/thirdparty/lw-compat/_darcs/inventories/20060826123920-dccf3-4b37fa484f969eb9c3837a020e32b42e33f4cef6.gz
===================================================================
--- branches/trunk-reorg/thirdparty/lw-compat/_darcs/inventories/20060826123920-dccf3-4b37fa484f969eb9c3837a020e32b42e33f4cef6.gz 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/lw-compat/_darcs/inventories/20060826123920-dccf3-4b37fa484f969eb9c3837a020e32b42e33f4cef6.gz 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,8 @@
+[Initial revision (v0.2).
+pc(a)p-cos.net**20050802152818]
+[Added licensing information.
+pc(a)p-cos.net**20050811150118]
+[Replaced a reduce idiom with a better understandable loop idiom.
+pc(a)p-cos.net**20051228220551]
+[Removed a spurious in-package declaration in the .asd file.
+pc(a)p-cos.net**20060821203626]
\ No newline at end of file
Added: branches/trunk-reorg/thirdparty/lw-compat/_darcs/inventory
===================================================================
--- branches/trunk-reorg/thirdparty/lw-compat/_darcs/inventory 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/lw-compat/_darcs/inventory 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,7 @@
+Starting with tag:
+[TAG 0.22
+pc(a)p-cos.net**20060826123920]
+[Updated version number in the .asd file.
+pc(a)p-cos.net**20060826125726]
+[Updated copyright information.
+pc(a)p-cos.net**20060918174843]
\ No newline at end of file
Added: branches/trunk-reorg/thirdparty/lw-compat/_darcs/patches/20050802152818-dccf3-9ba8553d2b62c698e6208680ab099ea6273a7458.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/lw-compat/_darcs/patches/20050802152818-dccf3-9ba8553d2b62c698e6208680ab099ea6273a7458.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/lw-compat/_darcs/patches/20050811150118-dccf3-9db8fc99fbfbac77dda86fa3ca80f0f92c0f054b.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/lw-compat/_darcs/patches/20050811150118-dccf3-9db8fc99fbfbac77dda86fa3ca80f0f92c0f054b.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/lw-compat/_darcs/patches/20051228220551-dccf3-bec704780b86cf94b4f443e53d52d8e46f8ab139.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/lw-compat/_darcs/patches/20051228220551-dccf3-bec704780b86cf94b4f443e53d52d8e46f8ab139.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/lw-compat/_darcs/patches/20060821203626-dccf3-a75c8e2b513b571a43ce6c5e8dd377b2bca40887.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/lw-compat/_darcs/patches/20060821203626-dccf3-a75c8e2b513b571a43ce6c5e8dd377b2bca40887.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/lw-compat/_darcs/patches/20060826123920-dccf3-4b37fa484f969eb9c3837a020e32b42e33f4cef6.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/lw-compat/_darcs/patches/20060826123920-dccf3-4b37fa484f969eb9c3837a020e32b42e33f4cef6.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/lw-compat/_darcs/patches/20060826125726-dccf3-b9ca9d92f93eefe4744f2275eaf40b6702e5b743.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/lw-compat/_darcs/patches/20060826125726-dccf3-b9ca9d92f93eefe4744f2275eaf40b6702e5b743.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/lw-compat/_darcs/patches/20060918174843-dccf3-641503d97f1447c7cf67b79d9d0e557fe35e4dfa.gz
===================================================================
(Binary files differ)
Property changes on: branches/trunk-reorg/thirdparty/lw-compat/_darcs/patches/20060918174843-dccf3-641503d97f1447c7cf67b79d9d0e557fe35e4dfa.gz
___________________________________________________________________
Name: svn:mime-type
+ application/octet-stream
Added: branches/trunk-reorg/thirdparty/lw-compat/_darcs/prefs/binaries
===================================================================
--- branches/trunk-reorg/thirdparty/lw-compat/_darcs/prefs/binaries 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/lw-compat/_darcs/prefs/binaries 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,39 @@
+# Binary file regexps:
+\.png$
+\.PNG$
+\.gz$
+\.GZ$
+\.pdf$
+\.PDF$
+\.jpg$
+\.JPG$
+\.gif$
+\.GIF$
+\.tar$
+\.TAR$
+\.bz2$
+\.BZ2$
+\.z$
+\.Z$
+\.zip$
+\.ZIP$
+\.jar$
+\.JAR$
+\.so$
+\.SO$
+\.a$
+\.A$
+\.tgz$
+\.TGZ$
+\.jpeg$
+\.JPEG$
+\.mpg$
+\.MPG$
+\.mpeg$
+\.MPEG$
+\.iso$
+\.ISO$
+\.exe$
+\.EXE$
+\.doc$
+\.DOC$
Added: branches/trunk-reorg/thirdparty/lw-compat/_darcs/prefs/boring
===================================================================
--- branches/trunk-reorg/thirdparty/lw-compat/_darcs/prefs/boring 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/lw-compat/_darcs/prefs/boring 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,34 @@
+# Boring file regexps:
+\.hi$
+\.o$
+\.o\.cmd$
+# *.ko files aren't boring by default because they might
+# be Korean translations rather than kernel modules.
+# \.ko$
+\.ko\.cmd$
+\.mod\.c$
+(^|/)\.tmp_versions($|/)
+(^|/)CVS($|/)
+(^|/)RCS($|/)
+~$
+#(^|/)\.[^/]
+(^|/)_darcs($|/)
+\.bak$
+\.BAK$
+\.orig$
+(^|/)vssver\.scc$
+\.swp$
+(^|/)MT($|/)
+(^|/)\{arch\}($|/)
+(^|/).arch-ids($|/)
+(^|/),
+\.class$
+\.prof$
+(^|/)\.DS_Store$
+(^|/)BitKeeper($|/)
+(^|/)ChangeSet($|/)
+(^|/)\.svn($|/)
+\.py[co]$
+\#
+\.cvsignore$
+(^|/)Thumbs\.db$
Added: branches/trunk-reorg/thirdparty/lw-compat/_darcs/prefs/defaultrepo
===================================================================
--- branches/trunk-reorg/thirdparty/lw-compat/_darcs/prefs/defaultrepo 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/lw-compat/_darcs/prefs/defaultrepo 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1 @@
+http://common-lisp.net/project/closer/repos/lw-compat
Added: branches/trunk-reorg/thirdparty/lw-compat/_darcs/prefs/motd
===================================================================
Added: branches/trunk-reorg/thirdparty/lw-compat/_darcs/prefs/repos
===================================================================
--- branches/trunk-reorg/thirdparty/lw-compat/_darcs/prefs/repos 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/lw-compat/_darcs/prefs/repos 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1 @@
+http://common-lisp.net/project/closer/repos/lw-compat
Added: branches/trunk-reorg/thirdparty/lw-compat/lw-compat-package.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/lw-compat/lw-compat-package.lisp 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/lw-compat/lw-compat-package.lisp 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,7 @@
+(in-package :cl-user)
+
+#-lispworks
+(defpackage #:lispworks
+ (:use #:common-lisp)
+ (:export #:appendf #:nconcf #:rebinding #:removef
+ #:when-let #:when-let* #:with-unique-names))
Added: branches/trunk-reorg/thirdparty/lw-compat/lw-compat.asd
===================================================================
--- branches/trunk-reorg/thirdparty/lw-compat/lw-compat.asd 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/lw-compat/lw-compat.asd 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,34 @@
+(asdf:defsystem #:lw-compat
+ :name "LispWorks Compatibility Library"
+ :author "Pascal Costanza, with permission from http://www.lispworks.com"
+ :version "0.22"
+ :licence "
+Copyright (c) 2005, 2006 Pascal Costanza
+with permission from http://www.lispworks.com
+
+Permission is hereby granted, free of charge, to any person
+obtaining a copy of this software and associated documentation
+files (the \"Software\"), to deal in the Software without
+restriction, including without limitation the rights to use,
+copy, modify, merge, publish, distribute, sublicense, and/or
+sell copies of the Software, and to permit persons to whom the
+Software is furnished to do so, subject to the following
+conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED \"AS IS\", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES
+OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
+HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
+WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
+FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
+OTHER DEALINGS IN THE SOFTWARE.
+"
+ :components (#-lispworks
+ (:file "lw-compat-package")
+ #-lispworks
+ (:file "lw-compat"
+ :depends-on ("lw-compat-package"))))
Added: branches/trunk-reorg/thirdparty/lw-compat/lw-compat.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/lw-compat/lw-compat.lisp 2007-10-04 19:49:06 UTC (rev 2206)
+++ branches/trunk-reorg/thirdparty/lw-compat/lw-compat.lisp 2007-10-04 19:56:01 UTC (rev 2207)
@@ -0,0 +1,50 @@
+(in-package #:lispworks)
+
+#+lispworks
+(eval-when (:compile-toplevel :load-toplevel :execute)
+ (error "lw-compat is not needed in LispWorks."))
+
+(define-modify-macro appendf (&rest lists)
+ append "Appends lists to the end of given list.")
+
+(define-modify-macro nconcf (&rest lists)
+ nconc "Appends lists to the end of given list by NCONC.")
+
+(defmacro rebinding (vars &body body)
+ "Ensures unique names for all the variables in a groups of forms."
+ (loop for var in vars
+ for name = (gensym (symbol-name var))
+ collect `(,name ,var) into renames
+ collect ``(,,var ,,name) into temps
+ finally (return `(let ,renames
+ (with-unique-names
+ ,vars
+ `(let (,,@temps)
+ ,,@body))))))
+
+(define-modify-macro removef (item &rest keys)
+ (lambda (place item &rest keys &key test test-not start end key)
+ (declare (ignorable test test-not start end key))
+ (apply #'remove item place keys))
+ "Removes an item from a sequence.")
+
+(defmacro when-let ((var form) &body body)
+ "Executes a body of code if a form evaluates to non-nil,
+ propagating the result of the form through the body of code."
+ `(let ((,var ,form))
+ (when ,var
+ (locally
+ ,@body))))
+
+(defmacro when-let* (bindings &body body)
+ "Executes a body of code if a series of forms evaluates to non-nil,
+ propagating the results of the forms through the body of code."
+ (loop for form = `(progn ,@body) then `(when-let (,(car binding) ,(cadr binding)) ,form)
+ for binding in (reverse bindings)
+ finally (return form)))
+
+(defmacro with-unique-names (names &body body)
+ "Returns a body of code with each specified name bound to a similar name."
+ `(let ,(mapcar (lambda (name) `(,name (gensym ,(symbol-name name))))
+ names)
+ ,@body))
1
0
[bknr-cvs] r2206 - in branches/trunk-reorg/thirdparty: . cl-interpol-0.1.2 cl-interpol-0.1.2/doc
by bknr＠bknr.net 04 Oct '07
by bknr＠bknr.net 04 Oct '07
04 Oct '07
Author: hhubner
Date: 2007-10-04 15:49:06 -0400 (Thu, 04 Oct 2007)
New Revision: 2206
Added:
branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/
branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/CHANGELOG
branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/README
branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/cl-interpol.asd
branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/cl-interpol.system
branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/doc/
branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/doc/index.html
branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/load.lisp
branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/packages.lisp
branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/read.lisp
branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/specials.lisp
branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/test.lisp
branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/test.pl
branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/test2.lisp
branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/unicode.lisp
branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/util.lisp
Removed:
branches/trunk-reorg/thirdparty/cl-interpol/
Log:
update cl-interpol
Added: branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/CHANGELOG
===================================================================
--- branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/CHANGELOG 2007-10-04 19:13:23 UTC (rev 2205)
+++ branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/CHANGELOG 2007-10-04 19:49:06 UTC (rev 2206)
@@ -0,0 +1,16 @@
+Version 0.1.2
+2004-12-16
+Added hyperdoc support
+Added :CL-INTERPOL to *FEATURES*
+Typo fixes in doc/index.html
+
+Version 0.1.1
+2003-12-21
+Fixed an embarrassing bug where COLLECTOR was re-used in read.lisp (reported by Hans H�bner)
+More tests, better failure reporting
+Tried to increase readability of docs
+Mentioned Debian and Gentoo in docs
+
+Version 0.1.0
+2003-10-22
+Initial release
Added: branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/README
===================================================================
--- branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/README 2007-10-04 19:13:23 UTC (rev 2205)
+++ branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/README 2007-10-04 19:49:06 UTC (rev 2206)
@@ -0,0 +1,39 @@
+Complete documentation for CL-INTERPOL can be found in the 'doc'
+directory.
+
+CL-INTERPOL also supports Nikodemus Siivola's HYPERDOC, see
+<http://common-lisp.net/project/hyperdoc/> and
+<http://www.cliki.net/hyperdoc>.
+
+1. Installation
+
+1.1. Probably the easiest way is
+
+ (load "/path/to/cl-interpol/load.lisp")
+
+ This should compile and load CL-INTERPOL on most Common Lisp
+ implementations.
+
+1.2. With MK:DEFSYSTEM you can make a symbolic link from
+ 'cl-interpol.system' and 'cl-interpol-test.system' to your central registry
+ (which by default is in '/usr/local/lisp/Registry/') and then issue
+ the command
+
+ (mk:compile-system "cl-interpol")
+
+ Note that this relies on TRUENAME returning the original file a
+ symbolic link is pointing to. This will only work with AllegroCL
+ 6.2 if you've applied all patches with (SYS:UPDATE-ALLEGRO).
+
+1.3. You can also use ASDF instead of MK:DEFSYSTEM in a similar way
+ (use the .asd files instead of the .system files).
+
+In order to actually use CL-INTERPOL you have to enable its reader
+syntax with CL-INTERPOL:ENABLE-INTERPOL-SYNTAX - see the docs.
+
+2. Test
+
+For a quick test load the file "test.lisp" after installing
+CL-INTERPOL. (Note: SBCL will emit tons of compiler notes when loading
+"test.lisp" but it will eventually, after a couple of minutes, pass
+all tests - at least it does for me with 0.8.4.8.)
Added: branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/cl-interpol.asd
===================================================================
--- branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/cl-interpol.asd 2007-10-04 19:13:23 UTC (rev 2205)
+++ branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/cl-interpol.asd 2007-10-04 19:49:06 UTC (rev 2206)
@@ -0,0 +1,43 @@
+;;; -*- Mode: LISP; Syntax: COMMON-LISP; Package: CL-USER; Base: 10 -*-
+;;; $Header: /usr/local/cvsrep/cl-interpol/cl-interpol.asd,v 1.1 2003/10/16 23:05:04 edi Exp $
+
+;;; Copyright (c) 2003, Dr. Edmund Weitz. All rights reserved.
+
+;;; Redistribution and use in source and binary forms, with or without
+;;; modification, are permitted provided that the following conditions
+;;; are met:
+
+;;; * Redistributions of source code must retain the above copyright
+;;; notice, this list of conditions and the following disclaimer.
+
+;;; * Redistributions in binary form must reproduce the above
+;;; copyright notice, this list of conditions and the following
+;;; disclaimer in the documentation and/or other materials
+;;; provided with the distribution.
+
+;;; THIS SOFTWARE IS PROVIDED BY THE AUTHOR 'AS IS' AND ANY EXPRESSED
+;;; OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
+;;; WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+;;; ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
+;;; DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+;;; DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
+;;; GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
+;;; INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
+;;; WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
+;;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
+;;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+
+(in-package #:cl-user)
+
+(defpackage #:cl-interpol.system
+ (:use #:cl
+ #:asdf))
+
+(in-package #:cl-interpol.system)
+
+(defsystem #:cl-interpol
+ :components ((:file "packages")
+ (:file "specials" :depends-on ("packages"))
+ (:file "util" :depends-on ("specials"))
+ (:file "unicode" :depends-on ("specials"))
+ (:file "read" :depends-on ("util" "unicode"))))
Added: branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/cl-interpol.system
===================================================================
--- branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/cl-interpol.system 2007-10-04 19:13:23 UTC (rev 2205)
+++ branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/cl-interpol.system 2007-10-04 19:49:06 UTC (rev 2206)
@@ -0,0 +1,43 @@
+;;; -*- Mode: LISP; Syntax: COMMON-LISP; Package: CL-USER; Base: 10 -*-
+;;; $Header: /usr/local/cvsrep/cl-interpol/cl-interpol.system,v 1.1 2003/10/16 23:03:54 edi Exp $
+
+;;; Copyright (c) 2003, Dr. Edmund Weitz. All rights reserved.
+
+;;; Redistribution and use in source and binary forms, with or without
+;;; modification, are permitted provided that the following conditions
+;;; are met:
+
+;;; * Redistributions of source code must retain the above copyright
+;;; notice, this list of conditions and the following disclaimer.
+
+;;; * Redistributions in binary form must reproduce the above
+;;; copyright notice, this list of conditions and the following
+;;; disclaimer in the documentation and/or other materials
+;;; provided with the distribution.
+
+;;; THIS SOFTWARE IS PROVIDED BY THE AUTHOR 'AS IS' AND ANY EXPRESSED
+;;; OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
+;;; WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+;;; ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
+;;; DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+;;; DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
+;;; GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
+;;; INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
+;;; WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
+;;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
+;;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+
+(in-package #:cl-user)
+
+(defparameter *cl-interpol-base-directory*
+ (make-pathname :name nil :type nil :version nil
+ :defaults (parse-namestring *load-truename*)))
+
+(mk:defsystem #:cl-interpol
+ :source-pathname *cl-interpol-base-directory*
+ :source-extension "lisp"
+ :components ((:file "packages")
+ (:file "specials" :depends-on ("packages"))
+ (:file "util" :depends-on ("specials"))
+ (:file "unicode" :depends-on ("specials"))
+ (:file "read" :depends-on ("unicode" "util"))))
Added: branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/doc/index.html
===================================================================
--- branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/doc/index.html 2007-10-04 19:13:23 UTC (rev 2205)
+++ branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/doc/index.html 2007-10-04 19:49:06 UTC (rev 2206)
@@ -0,0 +1,821 @@
+<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
+<html>
+
+<head>
+ <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+ <title>CL-INTERPOL - string interpolation for Common Lisp</title>
+ <style type="text/css">
+ pre { padding:5px; background-color:#e0e0e0 }
+ pre.none { padding:5px; background-color:#ffffff }
+ a.none { text-decoration: none; color:black }
+ a.none:visited { text-decoration: none; color:black }
+ a.none:active { text-decoration: none; color:black }
+ a.none:hover { text-decoration: none; color:black }
+ code.yellow { background-color:#ffff00; }
+ a { text-decoration: none; }
+ a:visited { text-decoration: none; }
+ a:active { text-decoration: underline; }
+ a:hover { text-decoration: underline; }
+ </style>
+</head>
+
+<body bgcolor=white>
+
+<h2>CL-INTERPOL - string interpolation for Common Lisp</h2>
+
+<br> <br>
+<em>"<a href="http://www.arf.ru/Notes/Apostro/stfoot.html">The crux of the biscuit is the apostrophe.</a>"</em> (<a href="http://zappa.com/">Frank Zappa</a>)
+
+<blockquote>
+<br> <br><h3>Abstract</h3>
+
+CL-INTERPOL is a library for Common Lisp which modifies the reader so
+that you can have interpolation within strings similar to Perl or Unix Shell
+scripts. It also provides various ways to insert arbitrary characters
+into literal strings even if your editor/IDE doesn't support them.
+Here's an example:
+<pre>
+* (let ((a 42))
+ #?"foo: \xC4\N{U with diaeresis}\nbar: ${a}")
+"foo: ÄÜ
+bar: 42"
+</pre>
+CL-INTERPOL comes with a <a
+href="http://www.opensource.org/licenses/bsd-license.php"><b>BSD-style
+license</b></a> so you can basically do with it whatever you want.
+</blockquote>
+
+<br> <br><h3><a class=none name="contents">Contents</a></h3>
+<ol>
+ <li><a href="#install">Download and installation</a>
+ <li><a href="#mail">Support and mailing lists</a>
+ <li><a href="#syntax">Syntax</a>
+ <ol>
+ <li><a href="#backslash">Backslashes</a>
+ <li><a href="#interpolation">Interpolation</a>
+ <li><a href="#regular">Support for CL-PPCRE/Perl regular expressions</a>
+ </ol>
+ <li><a href="#dictionary">The CL-INTERPOL dictionary</a>
+ <ol>
+ <li><a href="#enable-interpol-syntax"><code>enable-interpol-syntax</code></a>
+ <li><a href="#disable-interpol-syntax"><code>disable-interpol-syntax</code></a>
+ <li><a href="#*list-delimiter*"><code>*list-delimiter*</code></a>
+ <li><a href="#*long-unicode-names-p*"><code>*long-unicode-names-p*</code></a>
+ <li><a href="#*short-unicode-names-p*"><code>*short-unicode-names-p*</code></a>
+ <li><a href="#*unicode-scripts*"><code>*unicode-scripts*</code></a>
+ <li><a href="#quote-meta-chars"><code>quote-meta-chars</code></a>
+ <li><a href="#*outer-delimiters*"><code>*outer-delimiters*</code></a>
+ <li><a href="#*inner-delimiters*"><code>*inner-delimiters*</code></a>
+ <li><a href="#*regex-delimiters*"><code>*regex-delimiters*</code></a>
+ </ol>
+ <li><a href="#bugs">Bugs and problems</a>
+ <ol>
+ <li><a href="#lispworks">CL-INTERPOL doesn't work with LispWorks</a>
+ <li><a href="#slow">Reading of large forms can be slow</a>
+ <li><a href="#curly"><code>{n,m}</code> modifiers in extended mode</a>
+ </ol>
+ <li><a href="#remarks">Remarks</a>
+ <li><a href="#ack">Acknowledgements</a>
+</ol>
+
+<br> <br><h3><a name="install" class=none>Download and installation</a></h3>
+
+CL-INTERPOL together with this documentation can be downloaded from <a
+href="http://weitz.de/files/cl-interpol.tar.gz">http://weitz.de/files/cl-interpol.tar.gz</a>. The
+current version is 0.1.2.
+<p>
+CL-INTERPOL comes with simple system definitions for <a
+href="http://www.cliki.net/mk-defsystem">MK:DEFSYSTEM</a> and <a
+href="http://www.cliki.net/asdf">asdf</a> so you can either adapt it
+to your needs or just unpack the archive and from within the CL-INTERPOL
+directory start your Lisp image and evaluate the form
+<code>(mk:compile-system "cl-interpol")</code> (or the
+equivalent one for asdf) which should compile and load the whole
+system.
+<p>
+If for some reason you don't want to use MK:DEFSYSTEM or asdf you
+can just <code>LOAD</code> the file <code>load.lisp</code> or you
+can also get away with something like this:
+
+<pre>
+(loop for name in '("packages" "specials" "util" "unicode" "read")
+ do (compile-file (make-pathname :name name
+ :type "lisp"))
+ (load name))
+</pre>
+
+Note that on CL implementations which use the Python compiler
+(i.e. CMUCL, SBCL, SCL) you can concatenate the compiled object files
+to create one single object file which you can load afterwards:
+
+<pre>
+cat {packages,specials,util,unicode,read}.x86f > cl-interpol.x86f
+</pre>
+
+(Replace ".<code>x86f</code>" with the correct suffix for
+your platform.)
+<p>
+If you're on <a href="http://www.debian.org/">Debian</a> you should
+probably use the <a
+href="http://packages.debian.org/cgi-bin/search_packages.pl?keywords=cl-interpol&…">cl-interpol
+Debian package</a> which is available thanks to <a href="http://b9.com/">Kevin
+Rosenberg</a>. There's also a port
+for <a href="http://www.cliki.net/gentoo">Gentoo Linux</a> thanks to Matthew Kennedy.
+Installation via <a
+href="http://www.cliki.net/asdf-install">asdf-install</a> should also
+be possible.
+<p>
+<b>Note:</b> Before you can actually <em>use</em> the new reader
+syntax you have to enable it with <a
+href="#enable-interpol-syntax"><code>ENABLE-INTERPOL-SYNTAX</code></a>.
+
+<br> <br><h3><a name="mail" class=none>Support and mailing lists</a></h3>
+
+For questions, bug reports, feature requests, improvements, or patches
+please use the <a
+href="http://common-lisp.net/mailman/listinfo/cl-interpol-devel">cl-interpol-devel
+mailing list</a>. If you want to be notified about future releases
+subscribe to the <a
+href="http://common-lisp.net/mailman/listinfo/cl-interpol-announce">cl-interpol-announce
+mailing list</a>. These mailing lists were made available thanks to
+the services of <a href="http://common-lisp.net/">common-lisp.net</a>.
+
+<br> <br><h3><a name="syntax" class=none>Syntax</a></h3>
+
+CL-INTERPOL installs <code class=yellow>?</code> (question mark) as a
+"sub-character" of the <a
+href="http://www.lispworks.com/reference/HyperSpec/Body/26_glo_d.htm#dispatching_…">dispatching
+macro character</a> <code class=yellow>#</code> (sharpsign), i.e. it relies on
+the fact that sharpsign is a dispatching macro character in the <a
+href="http://www.lispworks.com/reference/HyperSpec/Body/26_glo_c.htm#current_read…">current
+readtable</a> when <a
+href="#enable-interpol-syntax"><code>ENABLE-INTERPOL-SYNTAX</code></a>
+is invoked.
+<p>
+The question mark may optionally be followed by an <code class=yellow>R</code> and
+an <code class=yellow>X</code> (case doesn't matter) - see <a href="#regex">the
+section about regular expression syntax</a> below. If both of them are
+present the <code class=yellow>R</code> <em>must</em> precede the <code class=yellow>X</code>.
+<p>
+The next character is the <a class=none name=outer><em>opening outer delimiter</em></a> which may
+be one of <code class=yellow>"</code> (double quote), <code class=yellow>'</code>
+(apostrophe), <code class=yellow>|</code> (vertical bar), <code class=yellow>#</code>
+(sharpsign), <code class=yellow>/</code> (slash), <code class=yellow>(</code> (left
+parenthesis), <code class=yellow><</code> (less than), <code class=yellow>[</code> (left
+square bracket), or <code class=yellow>{</code> (left curly bracket). (But see <a href="#*outer-delimiters*"><code>*OUTER-DELIMITERS*</code></a>.)
+<p>
+The following characters comprise the string which is read until the
+<em>closing outer delimiter</em> is seen. The closing outer delimiter
+is the same character as the opening outer delimiter - unless the
+opening delimiter was one of the last four described below in which
+case the closing outer delimiter is the corresponding closing (right)
+bracketing character. So these are all valid CL-INTERPOL string
+equivalent to <code>"abc"</code>:
+
+<pre>
+* #?"abc"
+"abc"
+* #?r"abc"
+"abc"
+* #?x"abc"
+"abc"
+* #?rx"abc"
+"abc"
+* #?'abc'
+"abc"
+* #?|abc|
+"abc"
+* #?#abc#
+"abc"
+* #?/abc/
+"abc"
+* #?(abc)
+"abc"
+* #?[abc]
+"abc"
+* #?{abc}
+"abc"
+* #?<abc>
+"abc"
+</pre>
+
+A character which would otherwise be a closing outer delimiter can be
+escaped by a backslash immediately preceding it (unless this backslash
+is itself escaped by another backslash). Also, the bracketing
+delimiters can nest, i.e. a right bracketing character which might
+otherwise be closing outer delimiter will be read as part of the
+string if it is matched by a preceding left bracketing character
+within the string.
+<pre>
+* #?"abc"
+"abc"
+* #?"abc\""
+"abc\""
+* #?"abc\\"
+"abc\\"
+* #?[abc]
+"abc"
+* #?[a[b]c]
+"a[b]c"
+* #?[a[[b]]c]
+"a[[b]]c"
+* #?[a[[][]]b]
+"a[[][]]b"
+</pre>
+
+The characters between the outer delimiters are read one by one and
+inserted into the resulting string as is unless one of the special
+characters <a href="#backslash"><code class=yellow>\</code> (backslash)</a>, <code class=yellow>$</code> (dollar sign),
+or <code class=yellow>@</code> (at-sign) is encountered. The behaviour with respect
+to these special characters is modeled after Perl because CL-INTERPOL
+is intended to be usable with <a
+href="http://weitz.de/cl-ppcre/">CL-PPCRE</a>.
+
+<h4><a name="backslash" class=none>Backslashes</a></h4>
+Here's a short summary of what might occur after a backslash, copied
+verbatim from <code>man perlop</code>. Details below - you can
+click on the entries in this table to go to the corresponding
+paragraph.
+
+<pre class=none>
+ <a class=none href="#tab">\t tab (HT, TAB)
+ \n newline (NL)
+ \r return (CR)
+ \f form feed (FF)
+ \b backspace (BS)
+ \a alarm (bell) (BEL)
+ \e escape (ESC)</a>
+ <a class=none href="#octal">\033 octal char (ESC)</a>
+ <a class=none href="#hex">\x1b hex char (ESC)
+ \x{263a} wide hex char (SMILEY)</a>
+ <a class=none href="#control">\c[ control char (ESC)</a>
+ <a class=none href="#name">\N{name} named char</a>
+
+ <a class=none href="#lower">\l lowercase next char
+ \u uppercase next char</a>
+ <a class=none href="#Upper">\L lowercase till \E
+ \U uppercase till \E
+ \E end case modification</a>
+ <a class=none href="#quote">\Q quote non-word characters till \E</a>
+</pre>
+<p>
+<a class=none name="tab">If</a> a backslash is followed by
+<code class=yellow>n</code>, <code class=yellow>r</code>, <code class=yellow>f</code>, <code class=yellow>b</code>,
+<code class=yellow>a</code>, or <code class=yellow>e</code> (all lowercase) then the corresponding character
+<code>#\Newline</code>, <code>#\Return</code>, <code>#\Page</code>,
+<code>#\Backspace</code>, <code>(CODE-CHAR 7)</code>, or
+<code>(CODE-CHAR 27)</code> is inserted into the string.
+<pre>
+* #?"New\nline"
+"New
+line"
+</pre>
+<p>
+<a class=none name="octal">If</a> a backslash if followed by one of
+the digits <code class=yellow>0</code> to <code class=yellow>9</code> then this digit and
+the following characters are read and parsed as octal digits and will
+be interpreted as the character code of the character to insert
+instead of this sequence. The sequence ends with the first character
+which is not an octal digit but <em>at most</em> three digits will be
+read. Only the rightmost eight bits of the resulting number will be
+used for the character code.
+
+<pre>
+* #?"\40\040"
+" " <font color=orange>;; two spaces</font>
+* (map 'list #'char-code #?"\0\377\777")
+(0 255 255) <font color=orange>;; note that \377 and \777 yield the same result</font>
+* #?"Only\0403 digits!"
+"Only 3 digits!"
+* (map 'list #'identity #?"\9")
+(#\Null #\9) <font color=orange>;; strange, isn't it?</font>
+</pre>
+<p>
+<a class=none name="hex">If</a> a backslash is followed by an <code class=yellow>x</code> (lowercase) the
+following characters are read and parsed as hexadecimal digits and
+will be interpreted as the character code of the character to insert
+instead of this sequence. The sequence of hexadecimal digits ends with
+the first character which is not one of the characters <code class=yellow>0</code>
+to <code class=yellow>9</code>, <code class=yellow>a</code> to <code class=yellow>f</code>, or <code class=yellow>A</code>
+to <code class=yellow>F</code> but <em>at most</em> two digits will be read. If the
+character immediately following the <code class=yellow>x</code> is a <code class=yellow>{</code>
+(left curly bracket) then all the following characters up to a
+<code class=yellow>}</code> (right curly bracket) must be hexadecimal digits and
+comprise a number which'll be taken as the character code (and which
+obviously should denote a character known by your Lisp
+implementation). Note that in both case it is legal that zero digits
+will be read which'll be interpreted as the character code
+<code>0</code>. Some examples with <a href="http://clisp.cons.org/">CLISP</a>:
+<pre>
+[28]> (char #?"\x20" 0)
+#\Space
+[29]> (char-code (char #?"\x" 0))
+0
+[30]> (char-code (char #?"\x{}" 0))
+0
+[31]> (char-name (char #?"\x{2323}" 0))
+"SMILE"
+[32]> #?"Only\x202 digits!"
+"Only 2 digits!"
+</pre>
+<p>
+<a class=none name="control">If</a> a backslash is followed by a
+<code class=yellow>c</code> (lowercase) then the <a
+href="http://www.cs.tut.fi/~jkorpela/chars/c0.html">ASCII control
+code</a> of the following character is inserted into the string. Note
+that this only defined for <code class=yellow>A</code> to <code class=yellow>Z</code>,
+<code class=yellow>[</code>, <code class=yellow>\</code>, <code class=yellow>]</code>, <code class=yellow>^</code>, and
+<code class=yellow>_</code> although CL-INTERPOL will also accept other
+characters. In fact, the transformation is implemented as
+<pre>
+(code-char (logxor #x40 (char-code (char-upcase <<em>char</em>>))))
+</pre>
+where <code><<em>char</em>></code> is the character following <code class=yellow>\c</code>.
+<pre>
+* (char-name (char #?"\cH" 0))
+"Backspace"
+* (char= (char #?"\cj" 0) #\Newline)
+T
+</pre>
+
+<p>
+<a class=none name="name">If</a> a backslash is followed by an
+<code class=yellow>N</code> (uppercase) the following character <em>must</em> be a
+<code class=yellow>{</code> (left curly bracket). The characters following the
+bracket are read until a <code class=yellow>}</code> (right curly bracket) is seen
+and comprise the Unicode <em>name</em> of the character to be inserted into the
+string. This name is interpreted as follows:
+<ul>
+<li>If <a href="#*long-unicode-names-p*"><code>*LONG-UNICODE-NAMES-P*</code></a> is <em>true</em> then the name is interpreted as the full <a href="http://www.unicode.org/charts/charindex.html">official Unicode name</a> of the character. Case doesn't matter.
+<li>If <a href="#*short-unicode-names-p*"><code>*SHORT-UNICODE-NAMES-P*</code></a> is <em>true</em> then the name must contain a colon. The part before the colon is assumed to be the name of a Unicode scrippt and the part after the colon should be the full name except for the script name and the word "letter". You can also leave the words "small" and "capital" out. CL-INTERPOL will then try to find a character with one of the Unicode names
+<pre class=none>
+ <<em>script</em>> <<em>size</em>> letter <<em>short-name</em>>
+ <<em>script</em>> letter <<em>short-name</em>>
+</pre>
+where <code><<em>script</em>></code> is the part before the
+colon, <code><<em>short-name</em>></code> is the part after the
+colon, and <code><<em>size</em>></code> is <code>SMALL</code> if
+all letters in <code><<em>short-name</em>></code> are lowercase
+and <code>CAPITAL</code> otherwise.
+<li>If none of these yields a character CL-INTERPOL will try all the strings in the list <a href="#*unicode-scripts*"><code>*UNICODE-SCRIPTS*</code></a> in order and for each one it'll try to find a character with the algorithm described above where <code><<em>script</em>></code> is the corresponding element of <code>*UNICODE-SCRIPTS*</code> and <code><<em>short-name</em>></code> is the string between the curly brackets.
+</ul>
+Confused? Maybe an example will help - CLISP again:
+<pre>
+[3]> cl-interpol:*long-unicode-names-p*
+T
+[4]> (char-name (char #?"\N{Greek capital letter Sigma}" 0))
+"GREEK_CAPITAL_LETTER_SIGMA"
+[5]> (char-name (char #?"\N{GREEK CAPITAL LETTER SIGMA}" 0))
+"GREEK_CAPITAL_LETTER_SIGMA"
+[6]> (setq cl-interpol:*short-unicode-names-p* t)
+T
+[7]> (char-name (char #?"\N{Greek:Sigma}" 0))
+"GREEK_CAPITAL_LETTER_SIGMA"
+[8]> (char-name (char #?"\N{Greek:sigma}" 0))
+"GREEK_SMALL_LETTER_SIGMA"
+[9]> (push "Greek" cl-interpol:*unicode-scripts*)
+("Greek" "latin")
+[10]> (char-name (char #?"\N{Sigma}" 0))
+"GREEK_CAPITAL_LETTER_SIGMA"
+[11]> (char-name (char #?"\N{sigma}" 0))
+"GREEK_SMALL_LETTER_SIGMA"
+</pre>
+
+Of course, <code class=yellow>\N</code> won't magically make your Lisp implementation Unicode-aware. You can only use the names of characters that are actually supported by your Lisp.
+<p>
+<a class=none name="lower">If</a> a backslash is followed by an
+<code class=yellow>l</code> or a <code class=yellow>u</code> (both lowercase) the following
+character (if any) is <a href="http://www.lispworks.com/reference/HyperSpec/Body/f_char_u.htm">downcased or uppercased</a> respectively.
+<pre>
+* #?"\lFOO"
+"fOO"
+* #?"\ufoo"
+"Foo"
+* #?"\l"
+""
+</pre>
+
+<p>
+<a class=none name="Upper">If</a> a backslash is followed by an
+<code class=yellow>L</code> or a <code class=yellow>U</code> (both uppercase) the following
+characters up to <code class=yellow>\E</code> (uppercase) or another <code class=yellow>\L</code> or
+<code class=yellow>\U</code> are <a
+href="http://www.lispworks.com/reference/HyperSpec/Body/f_stg_up.htm">upcased
+or downcased</a> respectively. While <code class=yellow>\E</code> simply ends the
+scope of <code class=yellow>\L</code> or <code class=yellow>\U</code>, another <code class=yellow>\L</code>
+or <code class=yellow>\U</code> will introduce a new round of upcasing or
+downcasing.
+<pre>
+* #?"\Ufoo\Ebar"
+"FOObar"
+* #?"\LFOO\EBAR"
+"fooBAR"
+* #?"\LFOO\Ubar"
+"fooBAR"
+* #?"\LFOO"
+"foo"
+</pre>
+These examples may seem trivial but <code class=yellow>\U</code> and friends might be very helpful if you <a href="#interpolation">interpolate</a> strings.
+
+<p>
+<a class=none name="quote">If</a> a backslash is followed by a
+<code class=yellow>Q</code> (uppercase) the following characters up to <code class=yellow>\E</code> (uppercase) are <em>quoted</em>, i.e. every character except for <code class=yellow>0</code>
+to <code class=yellow>9</code>, <code class=yellow>a</code> to <code class=yellow>z</code>, <code class=yellow>A</code>
+to <code class=yellow>Z</code>, and <code class=yellow>_</code> (underscore) is preceded by a backslash. Corresponding pairs of <code class=yellow>\Q</code> and <code class=yellow>\E</code> can be nested.
+<pre>
+* #?"-\Q-\E-"
+"-\\--"
+* #?"\Q-\Q-\E-\E"
+"\\-\\\\\\-\\-"
+* #?"-\Q-"
+"-\\-"
+</pre>
+As you might have noticed, <code class=yellow>\E</code> is used to end the scope of <code class=yellow>\Q</code> as well as that of <code class=yellow>\L</code> and <code class=yellow>\U</code>. As a consequence, pairs of <code class=yellow>\Q</code> and <code class=yellow>\E</code> can be nested between <code class=yellow>\L</code> or <code class=yellow>\U</code> and <code class=yellow>\E</code> and vice-versa but each occurence of <code class=yellow>\L</code> or <code class=yellow>\U</code> which is preceded by another <code class=yellow>\L</code> or <code class=yellow>\U</code> will immediately end the scope of all enclosed <code class=yellow>\Q</code> modifiers. Hmm, need an example?
+<pre>
+* #?"\LAa-\QAa-\EAa-\E"
+"aa-aa\\-aa-"
+* #?"\QAa-\LAa-\EAa-\E"
+"Aa\\-aa\\-Aa\\-"
+* #?"\U\QAa-\LAa-\EAa-\E"
+"AA\\-aa-Aa-" <font color=orange>;; note that only the first hyphen is quoted now</font>
+</pre>
+
+Quoting characters with <code class=yellow>\Q</code> is especially helpful if you want to <a href="#interpolation">interpolate</a> a string verbatim into a <a href="#regular">regular expression</a>.
+<p>
+All other characters following a backslash are left as is and inserted into the string. This is also true for the backslash itself, for <code class=yellow>$</code>, <code class=yellow>@</code>, and - as mentioned above - for the <a href="#outer">outer closing delimiter</a>.
+<pre>
+* #?"\"\\f\o\o\""
+"\"\\foo\""
+</pre>
+
+<br> <br><h3><a name="interpolation" class=none>Interpolation</a></h3>
+
+If a <code class=yellow>$</code> (dollar sign) or <code class=yellow>@</code> (at-sign) is seen
+and followed by one of <code class=yellow>{</code> (left curly bracket), <code class=yellow>[</code> (left square bracket), <code class=yellow><</code> (less than), or <code class=yellow>(</code> (left parenthesis) (but see <a href="#*inner-delimiters*"><code>*INNER-DELIMITERS*</code></a>), the
+characters following the bracket are read up to the corresponding closing (right)
+bracketing character. They are read as Lisp forms and treated as an <a
+href="http://www.lispworks.com/reference/HyperSpec/Body/26_glo_i.htm#implicit_pro…">implicit
+progn</a> the result of which will be inserted into the string at
+execution time. (Technically this is done by temporarily making the syntax of the closing right bracketing character in the <a
+href="http://www.lispworks.com/reference/HyperSpec/Body/26_glo_c.htm#current_read…">current
+readtable</a> be the same as the syntax of <code class=yellow>)</code> (right parenthesis) in the <a href="http://www.lispworks.com/reference/HyperSpec/Body/26_glo_s.htm#standard_rea…">standard readtable</a> and then reading the forms with <a href="http://www.lispworks.com/reference/HyperSpec/Body/f_rd_del.htm"><code>READ-DELIMITED-LIST</code></a>.)
+<p>
+The result of the forms following a <code class=yellow>$</code> (dollar sign) is inserted into the string as with <a href="http://www.lispworks.com/reference/HyperSpec/Body/f_wr_pr.htm"><code>PRINC</code></a> at execution time. The result of the forms following an <code class=yellow>@</code> (at-sign) <em>must</em> be a list. The elements of this list are inserted into the string one by one as with <code>PRINC</code> interspersed (or "joined" if you prefer) with the contents of the variable <a href="#*list-delimiter*"><code>*LIST-DELIMITER*</code></a> (also inserted as with <code>PRINC</code>).
+<p>
+Every other <code class=yellow>$</code> or <code class=yellow>@</code> is inserted into the string as is.
+<pre>
+* (let* ((a "foo")
+ (b #\Space)
+ (c "bar")
+ (d (list a b c))
+ (x 40))
+ (values #?"$ @"
+ #?"$(a)"
+ #?"$<a>$[b]"
+ #?"\U${a}\E \u${a}"
+ (let ((cl-interpol:*list-delimiter* #\*))
+ #?"@{d}")
+ (let ((cl-interpol:*list-delimiter* ""))
+ #?"@{d}")
+ #?"The result is ${(let ((y 2)) (+ x y))}"
+ #?"${#?'${a} ${c}'} ${x}")) <font color=orange>;; note the embedded CL-INTERPOL string</font>
+"$ @"
+"foo"
+"foo "
+"FOO Foo"
+"foo* *bar"
+"foo bar"
+"The result is 42"
+"foo bar 40"
+</pre>
+Interpolations are realized by creating code which is evaluated at
+execution time. For example, the expansion of
+<code>#?"\Q-\l${(let ((x 40)) (+ x 2))}"</code> might look
+like this:
+
+<pre>
+(with-output-to-string (#:G1098)
+ (write-string (cl-interpol:quote-meta-chars
+ (with-output-to-string (#:G1099)
+ (write-string "-" #:G1099)
+ (let ((#:G1100
+ (format nil "~A"
+ (progn
+ (let ((x 40))
+ (+ x 2))))))
+ (when (plusp (length #:G1100))
+ (setf (char #:G1100 0)
+ (char-downcase (char #:G1100 0))))
+ (write-string #:G1100 #:G1099))))
+ #:G1098))
+</pre>
+
+However, if a string read by CL-INTERPOL does not contain interpolations it is guaranteed to be expanded into a constant Lisp string.
+
+<br> <br><h3><a name="regular" class=none>Support for CL-PPCRE/Perl regular expressions</a></h3>
+
+Beyond what has been explained above CL-INTERPOL can support Perl regular expression syntax. This feature is mainly intended for use with <a href="http://weitz.de/cl-ppcre/">CL-PPCRE</a> (version 0.7.0 or higher). The <em>regular expression mode</em> is switched on if the <a href="#outer">opening outer delimiter</a> is a <code class=yellow>/</code> (slash) - but see <a href="#*regex-delimiters*"><code>*REGEX-DELIMITERS*</code></a>. It is also on if there's an <code class=yellow>r</code> (lowercase or uppercase) in front of the opening outer delimiter. If there's also an <code class=yellow>x</code> (lowercase or uppercase) in front of the opening outer delimiter (but <em>behind</em> the <code class=yellow>r</code> if it's there) the string will be read in <em>extended mode</em> (see <code>man perlre</code> for a detailed explanation). In these modes the following things are different from what's described above:
+<ul>
+
+ <li><code class=yellow>\w</code>, <code class=yellow>\W</code>, <code class=yellow>\s</code>,
+ <code class=yellow>\S</code>, <code class=yellow>\d</code>, and <code class=yellow>\D</code> are never
+ converted to their unescaped (backslash-less) counterparts because
+ they have a special meaning in regular expressions.
+<pre>
+* #?#\W\o\w#
+"Wow"
+* #?/\W\o\w/
+"\\Wo\\w"
+* #?r#\W\o\w#
+"\\Wo\\w"
+</pre>
+ <li><code class=yellow>\b</code>, <code class=yellow>\B</code>,
+ <code class=yellow>\a</code>, <code class=yellow>\z</code>, and <code class=yellow>\Z</code> are only
+ converted to their unescaped (backslash-less) counterparts if they are within a <em>character class</em> (i.e. enclosed in square brackets) because
+ they have a special meaning in regular expressions outside of character classes.
+<pre>
+* #?/\A[\A-\Z]\Z/
+"\\A[A-Z]\\Z"
+* #?/\A[]\A-\Z]\Z/
+"\\A[]A-Z]\\Z"
+* #?/\A[^]\A-\Z]\Z/
+"\\A[^]A-Z]\\Z"
+</pre>
+ <li><a href="#octal">Octal representations of character codes</a> are left as is and not expanded if they're not within character classes and could possible denote a back-reference to a register group. (Actually, this also holds for sequences starting with <code class=yellow>\8</code> or <code class=yellow>\9</code> in compliance with Perl.)
+<pre>
+* (map 'list #'identity #?/\0\40[\40]/)
+(#\Null #\\ #\4 #\0 #\[ #\Space #\])
+</pre>
+ <li>Characters which are represented by <a href="#octal">octal</a> or <a href="#hex">hexadecimal</a> codes, by <a href="#name">names</a>, or escaped by a preceding backslash are 'protected' by a backslash if they have a special meaning within regular expressions.
+<pre>
+* #?"\x2B\\\.[\.]"
+"+\\.[.]"
+* #?/\x2B\\\.[\.]/
+"\\+\\\\\\.[.]" <font color=orange>;; note that the second dot is not 'protected' because it's in a character class</font>
+</pre>
+ <li>Embedded comments (like <code class=yellow>(?#...)</code>) are removed from the string - with the exception that they are replaced with <code class=yellow>(?:)</code> (a non-capturing, empty group which will be otimized away by CL-PPCRE) if the next character is a hexadecimal digit.
+<pre>
+* #?/A(?#n embedded) comment/
+"A comment"
+* #?/\1(?#)2/
+"\\1(?:)2" <font color=orange>;; instead of "\\12" which has a different meaning to the regex engine</font>
+</pre>
+ <li><a href="#interpolation">Interpolation</a> only works with curly brackets (and only if they haven't been removed from <a href="#*inner-delimiters*"><code>*INNER-DELIMITERS*</code></a>).
+<pre>
+* (let ((a 42))
+ (values #?"$(a)" #?"${a}"
+ #?/$(a)/ #?/${a}/))
+"42"
+"42"
+"$(a)"
+"42"
+</pre>
+ <li>In extended mode whitespace characters (one of <code>#\Space</code>, <code>#\Tab</code>, <code>#\Linefeed</code>, <code>#\Return</code>, and <code>#\Page</code>) are removed from the string unless they are escaped by a backslash or within a character class.
+<pre>
+* #?/ \ [ ]/
+" [ ]" <font color=orange>;; two spaces in front of square bracket</font>
+* #?x/ \ [ ]/
+" [ ]" <font color=orange>;; one space in front of square bracket</font>
+</pre>
+ <li>In extended mode end-of-line comments (starting with <code class=yellow>#</code> (sharpsign) and ending with the newline character) are removed from the string - with the exception that they are replaced with <code class=yellow>(?:)</code> (a non-capturing, empty group which will be otimized away by CL-PPCRE) if the next character is a hexadecimal digit.
+<pre>
+* #?x/[a-z]#blabla
+\$/
+"[a-z]$"
+* #?x/\1#
+2/
+"\\1(?:)2" <font color=orange>;; instead of "\\12" which has a different meaning to the regex engine</font>
+</pre>
+</ul>
+
+If all this seems complicated just keep in mind that this mode is
+meant so that you can feed strings to <a
+href="http://weitz.de/cl-ppcre/">CL-PPCRE</a> exactly as if you had
+written them for Perl (without <a
+href="http://weitz.de/cl-ppcre/#backslash">counting Lisp backslashes
+versus Perl backslashes</a>). However, you should <em>not</em> use
+both CL-INTERPOL's as well as CL-PPCRE's extended mode at once because
+this might lead to errors. (CL-PPCRE's will, e.g., throw away
+whitespace which had been escaped in CL-INTERPOL.)
+<pre>
+* (let ((scanner (cl-ppcre:create-scanner " a\\ a " :extended-mode t)))
+ (cl-ppcre:scan scanner "a a"))
+0
+3
+#()
+#()
+* (let ((scanner (cl-ppcre:create-scanner #?x/ a\ a /)))
+ (cl-ppcre:scan scanner "a a"))
+0
+3
+#()
+#()
+* (let ((scanner (cl-ppcre:create-scanner #?x/ a\ a / :extended-mode t)))
+ <font color=orange>;; wrong, because extended mode is applied twice</font>
+ (cl-ppcre:scan scanner "a a"))
+NIL
+</pre>
+
+<br> <br><h3><a class=none name="dictionary">The CL-INTERPOL dictionary</a></h3>
+
+CL-INTERPOL exports the following symbols:
+
+<p><br>[Macro]
+<br><a class=none name="enable-interpol-syntax"><b>enable-interpol-syntax</b> => |</a>
+
+<blockquote><br>
+
+This is used to enable the reader syntax described <a href="#syntax">above</a>. This macro
+expands into an <a
+href="http://www.lispworks.com/reference/HyperSpec/Body/s_eval_w.htm">EVAL-WHEN</a>
+so that if you use it as a <a
+href="http://www.lispworks.com/reference/HyperSpec/Body/26_glo_t.htm#top_level_fo…">top-level
+form</a> in a file to be loaded and/or compiled it'll do what you
+expect. Technically this'll push the <a
+href="http://www.lispworks.com/reference/HyperSpec/Body/26_glo_c.htm#current_read…">current
+readtable</a> on a stack so that matching calls of <code>ENABLE-INTERPOL-SYNTAX</code> and <a href="#disable-interpol-syntax"><code>DISABLE-INTERPOL-SYNTAX</code></a> can nest.
+Note that by default the reader syntax is <em>not</em> enabled after loading CL-INTERPOL.
+
+</blockquote>
+
+<p><br>[Macro]
+<br><a class=none name="disable-interpol-syntax"><b>disable-interpol-syntax</b> => |</a>
+
+<blockquote><br>
+
+This is used to disable the reader syntax described <a href="#syntax">above</a>. This macro
+expands into an <a
+href="http://www.lispworks.com/reference/HyperSpec/Body/s_eval_w.htm">EVAL-WHEN</a>
+so that if you use it as a <a
+href="http://www.lispworks.com/reference/HyperSpec/Body/26_glo_t.htm#top_level_fo…">top-level
+form</a> in a file to be loaded and/or compiled it'll do what you
+expect. Technically this'll pop a readtable from the stack described <a href="#enable-interpol-syntax">above</a> so that matching calls of <a href="#enable-interpol-syntax"><code>ENABLE-INTERPOL-SYNTAX</code></a> and <code>DISABLE-INTERPOL-SYNTAX</code> can nest. If the stack is empty (i.e. when <code>DISABLE-INTERPOL-SYNTAX</code> is called without a preceding call to <a href="#enable-interpol-syntax"><code>ENABLE-INTERPOL-SYNTAX</code></a>) the <a href="http://www.lispworks.com/reference/HyperSpec/Body/26_glo_s.htm#standard_rea…">standard readtable</a> is re-established.
+
+</blockquote>
+
+<p><br>[Special variable]
+<br><a class=none name="*list-delimiter*"><b>*list-delimiter*</b></a>
+
+<blockquote><br>
+
+The contents of this variable are inserted between the elements of a list <a href="#interpolation">interpolated with <code class=yellow>@</code></a> at execution time. They are inserted as with <a href="http://www.lispworks.com/reference/HyperSpec/Body/f_wr_pr.htm"><code>PRINC</code></a>. The default value is <code class=yellow>" "</code> (one space).
+
+</blockquote>
+
+<p><br>[Special variable]
+<br><a class=none name="*long-unicode-names-p*"><b>*long-unicode-names-p*</b></a>
+
+<blockquote><br>
+
+This is a <a href="http://www.lispworks.com/reference/HyperSpec/Body/26_glo_g.htm#generalized_…">generalized boolean</a> which is used to decide whether <a href="#name"><code class=yellow>\N</code></a> will try the full official Unicode names. Note that this variable has effect at read time so you probably need to wrap an <a
+href="http://www.lispworks.com/reference/HyperSpec/Body/s_eval_w.htm">EVAL-WHEN</a> around forms that change its value. The default value is <code>T</code>.
+
+</blockquote>
+
+<p><br>[Special variable]
+<br><a class=none name="*short-unicode-names-p*"><b>*short-unicode-names-p*</b></a>
+
+<blockquote><br>
+
+This is a <a href="http://www.lispworks.com/reference/HyperSpec/Body/26_glo_g.htm#generalized_…">generalized boolean</a> which is used to decide whether <a href="#name"><code class=yellow>\N</code></a> will try the abbreviated <code>"<em><script></em>:<em><short-name></em>"</code> syntax for Unicode names. Note that this variable has effect at read time so you probably need to wrap an <a
+href="http://www.lispworks.com/reference/HyperSpec/Body/s_eval_w.htm">EVAL-WHEN</a> around forms that change its value. The default value is <code>NIL</code>.
+
+</blockquote>
+
+<p><br>[Special variable]
+<br><a class=none name="*unicode-scripts*"><b>*unicode-scripts*</b></a>
+
+<blockquote><br>
+
+This should be a list of strings which are in turn tried as names of Unicode scripts as described in the <a href="#name">section about <code class=yellow>\N</code></a>. Note that this variable has effect at read time so you probably need to wrap an <a
+href="http://www.lispworks.com/reference/HyperSpec/Body/s_eval_w.htm">EVAL-WHEN</a> around forms that change its value. The default value is the one-element list <code>'("latin")</code>.
+
+</blockquote>
+
+<p><br>[Function]
+<br><a class=none name="quote-meta-chars"><b>quote-meta-chars</b> <i>string</i> => <i>string'</i></a>
+
+<blockquote><br>
+This is a simple utility function used <a href="#quote"><code class=yellow>\Q</code></a>. It returns a string <code>STRING'</code> where all
+non-word characters (everything except ASCII characters, digits and
+underline) of <code>STRING</code> are quoted by prepending a
+backslash similar to Perl's <code>quotemeta</code> function. It always returns a <a
+href="http://www.lispworks.com/reference/HyperSpec/Body/26_glo_f.htm#fresh">fresh</a>
+string.
+<pre>
+* (cl-interpol:quote-meta-chars "[a-z]*")
+"\\[a\\-z\\]\\*"
+</pre></blockquote>
+
+<p><br>[Special variable]
+<br><a class=none name="*outer-delimiters*"><b>*outer-delimiters*</b></a>
+
+<blockquote><br>
+
+This is a list of acceptable <a href="#outer">outer delimiters</a>. The elements of this list are either characters or dotted pairs the car and cdr of which are characters. A character denotes a delimiter like <code class=yellow>'</code> (apostrophe) which is the opening as well as the closing delimiter. A dotted pair like <code>(#\{ . #\})</code> denotes a pair of matching bracketing delimiters. The name of this list is exported so that you can customize CL-INTERPOL's behaviour by <em>removing</em> elements from this list, you are advised not to add any - specifically you should not add alphanumeric characters or the backslash. Note that this variable has effect at read time so you probably need to wrap an <a
+href="http://www.lispworks.com/reference/HyperSpec/Body/s_eval_w.htm">EVAL-WHEN</a> around forms that change its value. The default value is
+<pre>
+'((#\( . #\))
+ (#\{ . #\})
+ (#\< . #\>)
+ (#\[ . #\])
+ #\/ #\| #\" #\' #\#))
+</pre>
+
+</blockquote>
+
+<p><br>[Special variable]
+<br><a class=none name="*inner-delimiters*"><b>*inner-delimiters*</b></a>
+
+<blockquote><br>
+
+This is a list of acceptable delimiters for <a href="#interpolation">interpolation</a>. The elements of this list are either characters or dotted pairs the car and cdr of which are characters. A character denotes a delimiter like <code class=yellow>'</code> (apostrophe) which is the opening as well as the closing delimiter. A dotted pair like <code>(#\{ . #\})</code> denotes a pair of matching bracketing delimiters. The name of this list is exported so that you can customize CL-INTERPOL's behaviour by <em>removing</em> elements from this list, you are advised not to add any - specifically you should not add alphanumeric characters or the backslash. Note that this variable has effect at read time so you probably need to wrap an <a
+href="http://www.lispworks.com/reference/HyperSpec/Body/s_eval_w.htm">EVAL-WHEN</a> around forms that change its value. The default value is
+<pre>
+'((#\( . #\))
+ (#\{ . #\})
+ (#\< . #\>)
+ (#\[ . #\]))
+</pre>
+
+</blockquote>
+
+<p><br>[Special variable]
+<br><a class=none name="*regex-delimiters*"><b>*regex-delimiters*</b></a>
+
+<blockquote><br>
+
+This is a list of <a href="#outer">opening outer delimiters</a> which automatically switch CL-INTERPOL's <a href="#regular">regular expression mode</a> on. The elements of this list are characters. An element of this list must also be an element of <a href="#*outer-delimiters*"><code>*OUTER-DELIMITERS*</code></a> to have any effect.
+Note that this variable has effect at read time so you probably need to wrap an <a
+href="http://www.lispworks.com/reference/HyperSpec/Body/s_eval_w.htm">EVAL-WHEN</a> around forms that change its value. The default value is the one-element list <code>'(#\/)</code>.
+
+</blockquote>
+
+<br> <br><h3><a class=none name="bugs">Bugs and problems</a></h3>
+
+<h4><a name="lispworks" class=none>CL-INTERPOL doesn't work with LispWorks</a></h4>
+
+<a
+href="http://www.lispworks.com/">LispWorks</a>
+(4.3.6 professional on Linux, maybe other versions too) has an error which prevents
+CL-INTERPOL from working correctly. You can check for yourself by
+evaluating the following form in a LispWorks listener:
+
+<pre>
+(let ((collector (make-array 0
+ :element-type 'character
+ :fill-pointer t
+ :adjustable t)))
+ (vector-push-extend #\1 collector)
+ (parse-integer collector))
+</pre>
+
+This should of course return <code>1</code> but signals an error for
+me. If you also encounter this error you can contact Xanalys support
+for a patch.
+<p>
+Update: This was fixed in version 4.3.7.
+
+<h4><a name="slow" class=none>Reading of large forms can be slow</a></h4>
+
+Some Lisps (notably LispWorks and CMUCL/SBCL) seem to have problems if very many (1000+) CL-INTERPOL strings are contained in one form. This seems to be related to GC and not necessarily something specific to CL-INTERPOL. See <a href="http://article.gmane.org/gmane.lisp.cmucl.general/1546">the CMUCL mailing list</a> and <a href="http://article.gmane.org/gmane.lisp.lispworks.general/1443">the LispWorks mailing list</a> for more information. (Note: The behaviour of LispWorks has significantly improved with version 4.3.7.)
+
+<h4><a name="curly" class=none><code>{n,m}</code> modifiers in extended mode</a></h4>
+
+CL-INTERPOL treats 'potential' <code>{n,m}</code> modifiers differently from <a href="http://weitz.de/cl-ppcre/">CL-PPCRE</a> or Perl in <a href="#regular">extended mode</a> <em>if</em> they contain whitespace. CL-INTERPOL will simply remove the whitespace and thus make them valid modifiers for CL-PPCRE while Perl will remove the whitespace but <em>not</em> recognize the character sequence as a modifier. CL-PPCRE behaves like Perl - you decide if this behaviour is sane...:)
+<pre>
+* (let ((scanner (cl-ppcre:create-scanner "^a{3, 3}$" :extended-mode t)))
+ (cl-ppcre:scan scanner "aaa"))
+NIL
+* (let ((scanner (cl-ppcre:create-scanner "^a{3, 3}$" :extended-mode t)))
+ (cl-ppcre:scan scanner "a{3,3}"))
+0
+6
+#()
+#()
+* (cl-ppcre:scan #?x/^a{3, 3}$/ "aaa")
+0
+3
+#()
+#()
+* (cl-ppcre:scan #?x/^a{3, 3}$/ "a{3, 3}")
+NIL
+</pre>
+
+<br> <br><h3><a class=none name="remarks">Remarks</a></h3>
+
+All examples in this text where done with <a
+href="http://www.cons.org/cmucl/">CMUCL</a> except where otherwise noted.
+The sample output has been slightly edited to
+increase readability.
+
+<br> <br><h3><a class=none name="ack">Acknowledgements</a></h3>
+
+Thanks to Peter Seibel who had the idea to do this to make <a href="http://weitz.de/cl-ppcre/">CL-PPCRE</a> more convenient. Read <a href="http://www.apress.com/book/bookDisplay.html?bID=237">his book</a> when it is released!!!
+
+<p>
+$Header: /usr/local/cvsrep/cl-interpol/doc/index.html,v 1.19 2004/12/16 19:20:43 edi Exp $
+<p><a href="http://weitz.de/index.html">BACK TO MY HOMEPAGE</a>
+
+</body>
+</html>
\ No newline at end of file
Added: branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/load.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/load.lisp 2007-10-04 19:13:23 UTC (rev 2205)
+++ branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/load.lisp 2007-10-04 19:49:06 UTC (rev 2206)
@@ -0,0 +1,53 @@
+;;; -*- Mode: LISP; Syntax: COMMON-LISP; Package: CL-USER; Base: 10 -*-
+;;; $Header: /usr/local/cvsrep/cl-interpol/load.lisp,v 1.1 2003/10/19 15:56:51 edi Exp $
+
+;;; Copyright (c) 2002-2003, Dr. Edmund Weitz. All rights reserved.
+
+;;; Redistribution and use in source and binary forms, with or without
+;;; modification, are permitted provided that the following conditions
+;;; are met:
+
+;;; * Redistributions of source code must retain the above copyright
+;;; notice, this list of conditions and the following disclaimer.
+
+;;; * Redistributions in binary form must reproduce the above
+;;; copyright notice, this list of conditions and the following
+;;; disclaimer in the documentation and/or other materials
+;;; provided with the distribution.
+
+;;; THIS SOFTWARE IS PROVIDED BY THE AUTHOR 'AS IS' AND ANY EXPRESSED
+;;; OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
+;;; WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+;;; ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
+;;; DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+;;; DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
+;;; GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
+;;; INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
+;;; WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
+;;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
+;;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+
+(in-package #:cl-user)
+
+(defparameter *cl-interpol-base-directory*
+ (make-pathname :name nil :type nil :version nil
+ :defaults (parse-namestring *load-truename*)))
+
+(loop for file in '("packages"
+ "specials"
+ "util"
+ "unicode"
+ "read")
+ do (let ((pathname (make-pathname :name file :type "lisp" :version nil
+ :defaults *cl-interpol-base-directory*)))
+ #-:cormanlisp
+ (let ((compiled-pathname (compile-file-pathname pathname)))
+ (unless (probe-file compiled-pathname)
+ (compile-file pathname))
+ (setq pathname compiled-pathname))
+ (load pathname)))
+
+
+
+
+
Added: branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/packages.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/packages.lisp 2007-10-04 19:13:23 UTC (rev 2205)
+++ branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/packages.lisp 2007-10-04 19:49:06 UTC (rev 2206)
@@ -0,0 +1,61 @@
+;;; -*- Mode: LISP; Syntax: COMMON-LISP; Package: CL-USER; Base: 10 -*-
+;;; $Header: /usr/local/cvsrep/cl-interpol/packages.lisp,v 1.4 2004/04/24 00:19:13 edi Exp $
+
+;;; Copyright (c) 2003, Dr. Edmund Weitz. All rights reserved.
+
+;;; Redistribution and use in source and binary forms, with or without
+;;; modification, are permitted provided that the following conditions
+;;; are met:
+
+;;; * Redistributions of source code must retain the above copyright
+;;; notice, this list of conditions and the following disclaimer.
+
+;;; * Redistributions in binary form must reproduce the above
+;;; copyright notice, this list of conditions and the following
+;;; disclaimer in the documentation and/or other materials
+;;; provided with the distribution.
+
+;;; THIS SOFTWARE IS PROVIDED BY THE AUTHOR 'AS IS' AND ANY EXPRESSED
+;;; OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
+;;; WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+;;; ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
+;;; DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+;;; DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
+;;; GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
+;;; INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
+;;; WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
+;;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
+;;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+
+(in-package #:cl-user)
+
+#-:cormanlisp
+(defpackage #:cl-interpol
+ (:nicknames #:interpol)
+ (:use #:cl)
+ (:export #:enable-interpol-syntax
+ #:disable-interpol-syntax
+ #:quote-meta-chars
+ #:*list-delimiter*
+ #:*long-unicode-names-p*
+ #:*short-unicode-names-p*
+ #:*unicode-scripts*
+ #:*outer-delimiters*
+ #:*inner-delimiters*
+ #:*optional-delimiters-p*))
+
+#+:cormanlisp
+(defpackage "CL-INTERPOL"
+ (:nicknames "INTERPOL")
+ (:use "CL")
+ (:export "ENABLE-INTERPOL-SYNTAX"
+ "DISABLE-INTERPOL-SYNTAX"
+ "QUOTE-META-CHARS"
+ "*LIST-DELIMITER*"
+ "*LONG-UNICODE-NAMES-P*"
+ "*SHORT-UNICODE-NAMES-P*"
+ "*UNICODE-SCRIPTS*"
+ "*OUTER-DELIMITERS*"
+ "*INNER-DELIMITERS*"))
+
+(pushnew :cl-interpol *features*)
\ No newline at end of file
Added: branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/read.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/read.lisp 2007-10-04 19:13:23 UTC (rev 2205)
+++ branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/read.lisp 2007-10-04 19:49:06 UTC (rev 2206)
@@ -0,0 +1,751 @@
+;;; -*- Mode: LISP; Syntax: COMMON-LISP; Package: CL-INTERPOL; Base: 10 -*-
+;;; $Header: /usr/local/cvsrep/cl-interpol/read.lisp,v 1.25 2004/04/24 00:19:13 edi Exp $
+
+;;; Copyright (c) 2003, Dr. Edmund Weitz. All rights reserved.
+
+;;; Redistribution and use in source and binary forms, with or without
+;;; modification, are permitted provided that the following conditions
+;;; are met:
+
+;;; * Redistributions of source code must retain the above copyright
+;;; notice, this list of conditions and the following disclaimer.
+
+;;; * Redistributions in binary form must reproduce the above
+;;; copyright notice, this list of conditions and the following
+;;; disclaimer in the documentation and/or other materials
+;;; provided with the distribution.
+
+;;; THIS SOFTWARE IS PROVIDED BY THE AUTHOR 'AS IS' AND ANY EXPRESSED
+;;; OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
+;;; WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+;;; ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
+;;; DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+;;; DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
+;;; GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
+;;; INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
+;;; WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
+;;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
+;;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+
+(in-package #:cl-interpol)
+
+(defun read-while (predicate &key max)
+ "Reads characters from *STREAM* while PREDICATE returns a true value
+for each character. Returns at most MAX characters if MAX is true."
+ (when (eql max 0)
+ (return-from read-while ""))
+ (let ((collector (make-collector)))
+ (loop for count of-type fixnum from 1
+ for c = (peek-char*)
+ while (and (or (not max)
+ (<= count max))
+ c
+ (funcall predicate c))
+ do (vector-push-extend (read-char*) collector)
+ finally (return collector))))
+
+(declaim (inline get-number))
+(defun get-number (&key (radix 10) max)
+ "Reads and consumes the number *STREAM* is currently looking at and
+returns it. Returns NIL if no number could be identified. RADIX is
+used as in PARSE-INTEGER. If MAX is not NIL we'll read at most the
+next MAX characters."
+ (parse-integer (read-while (lambda (c)
+ (digit-char-p c radix))
+ :max max)
+ :radix radix
+ :junk-allowed t))
+
+(defun resolve-unicode-name (name)
+ "Tries to return a character which was encoded as \\N<NAME>."
+ (or (and *long-unicode-names-p*
+ ;; first try long name
+ (gethash name *unicode-names*))
+ (and *short-unicode-names-p*
+ ;; now short name including script (separated by a colon)
+ (let ((colon-pos (position #\: name :test #'char=)))
+ (and colon-pos
+ (let* ((script
+ (string-trim " " (nsubvec name 0 colon-pos)))
+ (short-name
+ (string-trim " " (nsubvec name (1+ colon-pos))))
+ ;; size depends on how SHORT-NAME has been
+ ;; written
+ (size (if (every #'lower-case-p* short-name)
+ "small" "capital")))
+ (or (gethash (concatenate 'string
+ script " "
+ size " letter "
+ short-name)
+ *unicode-names*)
+ (gethash (concatenate 'string
+ script " letter "
+ short-name)
+ *unicode-names*))))))
+ ;; finally try all scripts which are in *UNICODE-SCRIPTS*
+ (let ((size (if (every #'lower-case-p* name)
+ "small" "capital")))
+ (loop for script in *unicode-scripts*
+ thereis (or (gethash (concatenate 'string
+ script " "
+ size " letter "
+ name)
+ *unicode-names*)
+ (gethash (concatenate 'string
+ script " letter "
+ name)
+ *unicode-names*))))))
+
+(defun get-char-from-unicode-name ()
+ "Parses and returns a named character after \"\\N\" has already been
+read. This function reads from *STREAM*."
+ (let ((next-char (read-char*)))
+ (unless (char= next-char #\{)
+ (signal-reader-error "Expected { after \\N"))
+ (let ((name (read-while (lambda (c)
+ (and (char/= c #\})
+ (char/= c *term-char*))))))
+ (let ((next-char (read-char*)))
+ (unless (char= next-char #\})
+ (signal-reader-error "Expected } after Unicode character name")))
+ (or (resolve-unicode-name name)
+ (signal-reader-error "Could not find character with name '~A'"
+ name)))))
+
+(defun unescape-char (regex-mode)
+ "Convert the characters(s) on *STREAM* following a backslash into a
+character which is returned. This function is to be called when the
+backslash has already been consumed."
+ (let ((chr (read-char*)))
+ ;; certain escape sequences are left as is when in regex mode
+ (when (or (and (eq regex-mode :in-char-class)
+ (find chr "wWsSdD" :test #'char=))
+ (and (eq regex-mode t)
+ (find chr "wWsSdDbBAZz" :test #'char=)))
+ (return-from unescape-char
+ (concatenate 'string "\\" (string chr))))
+ (let ((result
+ (case chr
+ ((#\N)
+ ;; named Unicode chars
+ (get-char-from-unicode-name))
+ ((#\c)
+ ;; \cx means control-x
+ (when (char= (peek-char*) *term-char*)
+ (signal-reader-error "String ended after \\c"))
+ (code-char (logxor #x40
+ (char-code (char-upcase (read-char*))))))
+ ((#\x)
+ (cond ((char= (peek-char*) #\{)
+ ;; "wide" hex char, i.e. hexadecimal number is
+ ;; enclosed in curly brackets
+ (read-char*)
+ (prog1
+ (let ((code (or (get-number :radix 16)
+ ;; allow for empty string
+ 0)))
+ (or (and (< code char-code-limit)
+ (code-char code))
+ (signal-reader-error
+ "No character for char-code #x~X" code)))
+ (unless (char= (peek-char*) #\})
+ (signal-reader-error "Expected } after hex code"))
+ (read-char*)))
+ (t
+ ;; \x should be followed by a hexadecimal char
+ ;; code, two digits or less; note that it is
+ ;; OK if \x is followed by zero digits
+ (make-char-from-code (get-number :radix 16 :max 2)))))
+ ((#\0 #\1 #\2 #\3 #\4 #\5 #\6 #\7 #\8 #\9)
+ (cond ((and (eq regex-mode t)
+ (char/= chr #\0))
+ ;; leave as is if we're in regex mode (and not
+ ;; within in a character class)
+ (concatenate 'string "\\" (string chr)))
+ ((or (char= chr #\8)
+ (char= chr #\9))
+ ;; outside of regex mode "\8" is "8" (in regex
+ ;; mode it is read like "\08"...)
+ chr)
+ (t
+ (unread-char chr *stream*)
+ ;; now \x should be followed by an octal char
+ ;; code, three digits or less
+ (make-char-from-code (get-number :radix 8 :max 3)))))
+ ;; the following five character names are
+ ;; 'semi-standard' according to the CLHS but I'm not
+ ;; aware of any implementation that doesn't implement
+ ;; them
+ ((#\t)
+ #\Tab)
+ ((#\n)
+ #\Newline)
+ ((#\r)
+ #\Return)
+ ((#\f)
+ #\Page)
+ ((#\b)
+ #\Backspace)
+ ((#\a)
+ (code-char 7)) ; ASCII bell
+ ((#\e)
+ (code-char 27)) ; ASCII escape
+ (otherwise
+ ;; all other characters aren't affected by a backslash
+ chr))))
+ (cond ((and (characterp result)
+ ;; some characters must be 'protected' from CL-PPCRE
+ (or (and (eq regex-mode :in-char-class)
+ (find result "\\^[]-" :test #'char=))
+ (and (eq regex-mode t)
+ (find result "\\^[]-.$|()*+?" :test #'char=))))
+ (concatenate 'string "\\" (string result)))
+ (t result)))))
+
+(declaim (inline normal-name-char-p)
+ (inline never-name-char-p))
+
+(defun normal-name-char-p (c)
+ (and c (or (alphanumericp c)
+ (member c '(#\_ #\- #\+ #\*)))))
+
+(defun never-name-char-p (c)
+ (or (not c)
+ (get-macro-character c)
+ (member c '(#\$ #\@))))
+
+(defvar quell-warnings-form
+ #+sbcl '(declare (optimize (sb-ext:inhibit-warnings 3)))
+ #-sbcl nil
+ "A declaration form to quiet warnings about unbound variables
+ within a lexical environment.")
+
+(defun read-longest-name ()
+ (coerce
+ (loop until (never-name-char-p (peek-char nil *stream* nil nil t))
+ collect (read-char*))
+ 'string))
+
+(defun read-optional-delimited ()
+ "Read the stuff following an optional delimiter, returning a form
+that tries to deal correctly with lexical variables."
+ (flet ((try-pos (name i form)
+ (let ((ostr (gensym)))
+ `(handler-case
+ (with-output-to-string (,ostr)
+ (princ ,(read-from-string (subseq name 0 i)) ,ostr)
+ (princ ,(subseq name i) ,ostr)
+ ,ostr)
+ (unbound-variable () ,form)))))
+
+ (loop
+ with name = (read-longest-name)
+ with form = `(error ,(format nil "Interpolation error in ~s~%" name))
+ with ostr = (gensym)
+ for i = (position-if-not #'normal-name-char-p name)
+ then (position-if-not #'normal-name-char-p name :start (1+ i))
+
+ unless i
+ return `(let () ,quell-warnings-form
+ (handler-case
+ (with-output-to-string (,ostr)
+ (princ ,(read-from-string name) ,ostr)
+ ,ostr)
+ (unbound-variable () ,form)))
+
+ if (> i 0)
+ do (setq form (try-pos name i form))
+
+ if (< i (length name))
+ do (setq form (try-pos name (1+ i) form)))))
+
+(declaim (inline read-form))
+(defun read-form ()
+ "Reads and returns one or more Lisp forms from *STREAM* if the
+character we're looking at is a valid inner delimiter. Otherwise
+returns NIL."
+ (let* ((start-delimiter (peek-char*))
+ (end-delimiter (get-end-delimiter start-delimiter *inner-delimiters*)))
+ (cond ((null end-delimiter)
+ (if *optional-delimiters-p*
+ (read-optional-delimited)
+ nil))
+ (t
+ `(progn
+ ,@(progn
+ (read-char*)
+ (let ((*readtable* (copy-readtable*)))
+ ;; temporarily change the readtable
+ (set-syntax-from-char end-delimiter #\))
+ (read-delimited-list end-delimiter *stream* t))))))))
+
+(defun interpol-reader (*stream* char arg)
+ "The actual reader function for the 'sub-character' #\?."
+ (declare (ignore arg char))
+ (let ((*start-char* (read-char*))
+ ;; REGEX-MODE is true if we're in regular expression mode; it
+ ;; can have one of the values :START-OF-CHAR-CLASS,
+ ;; :START-OF-NEGATED-CHAR-CLASS, or :IN-CHAR-CLASS if we're
+ ;; inside of a character class or just about to start one -
+ ;; otherwise the value is T
+ regex-mode
+ ;; EXTENDED-MODE is true if we're in extended regular
+ ;; expression mode
+ extended-mode)
+ (when (char-equal *start-char* #\r)
+ (setq regex-mode t
+ *start-char* (read-char*)))
+ (when (char-equal *start-char* #\x)
+ (setq extended-mode t
+ *start-char* (read-char*)))
+ (when (and (not regex-mode)
+ (find *start-char* *regex-delimiters* :test #'char=))
+ (setq regex-mode t))
+ (unless regex-mode
+ (setq extended-mode nil))
+ (let ((*term-char* (get-end-delimiter *start-char*
+ *outer-delimiters*
+ :errorp t))
+ (*pair-level* 0)
+ (*inner-delimiters* (if regex-mode
+ (intersection *inner-delimiters*
+ '((#\{ . #\}))
+ :test #'equal)
+ *inner-delimiters*))
+ *saw-backslash*
+ *readtable-copy*)
+ (prog1
+ (inner-reader regex-mode extended-mode nil nil)
+ ;; consume the closing outer delimiter
+ (read-char*)))))
+
+(defun inner-reader (regex-mode extended-mode quote-mode case-mode)
+ "Helper function for INTERPOL-READER which does all the work. May
+call itself recursively."
+ ;; REGEX-MODE and EXTENDED-MODE as described above; QUOTE-MODE is
+ ;; true if we're inside a \Q scope; CASE-MODE is true if we're
+ ;; inside a \L or \U scope
+ (let* ((string-stream (gensym)) ;; the string stream
+ ;; we use for WITH-OUTPUT-TO-STRING
+ ;; if this is not a constant string
+ (collector (make-collector)) ;; we collect
+ ;; characters into this
+ ;; extentable string
+ result ;; a list of all characters, strings, and forms
+ ;; so far (in reverse order while withing the loop)
+ handle-next-char)
+ (block main-loop ;; we need this name so we can leave the LOOP below
+ (flet ((compute-result ()
+ ;; local function used to leave the loop and compute
+ ;; the final RESULT
+ (setq result
+ (nreverse
+ (if (plusp (length collector))
+ ;; add COLLECTOR if it's not empty
+ (cons collector result)
+ result)))
+ (return-from main-loop))
+ (parse-with-case-mode (action-name)
+ ;; local function used to read while in a \U or \L scope
+ (let ((string-to-modify
+ ;; read until \E, \L, \U, or end of string
+ (inner-reader regex-mode extended-mode regex-mode t)))
+ (if (stringp string-to-modify)
+ ;; modify directly if constant string
+ (funcall action-name string-to-modify)
+ ;; otherwise create a form to do that at run time
+ `(write-string
+ (,action-name ,string-to-modify)
+ ,string-stream)))))
+ (loop
+ (let ((next-char (read-char*)))
+ (when regex-mode
+ ;; when in regex mode make sure where we are with
+ ;; respect to character classes
+ (setq regex-mode
+ (case next-char
+ ((#\[)
+ (ecase regex-mode
+ ((:start-of-char-class
+ :start-of-negated-char-class
+ :in-char-class) :in-char-class)
+ ((t) :start-of-char-class)))
+ ((#\^)
+ (ecase regex-mode
+ ((:start-of-char-class) :start-of-negated-char-class)
+ ((:start-of-negated-char-class
+ :in-char-class) :in-char-class)
+ ((t) t)))
+ ((#\])
+ (ecase regex-mode
+ ((:start-of-char-class
+ :start-of-negated-char-class) :in-char-class)
+ ((:in-char-class t) t)))
+ (otherwise
+ (ecase regex-mode
+ ((:start-of-char-class
+ :start-of-negated-char-class
+ :in-char-class) :in-char-class)
+ ((t) t))))))
+ (when (and (char= next-char *start-char*)
+ (char/= *start-char* *term-char*))
+ ;; if we see, say, #\( and our closing delimiter is #\)
+ ;; we increment *PAIR-LEVEL* so the parentheses can next
+ ;; without ending the string
+ (incf *pair-level*))
+ (let ((interpolation
+ (cond ((and (char= next-char *term-char*)
+ (plusp *pair-level*))
+ ;; although this is the outer closing
+ ;; delimiter we don't stop parsing because
+ ;; we're insided a nested pair of
+ ;; bracketing characters
+ (decf *pair-level*)
+ *term-char*)
+ ((char= next-char *term-char*)
+ ;; now we really stop - but we don't
+ ;; consume the closing delimiter because
+ ;; we may need it again to end another
+ ;; scope
+ (unread-char next-char *stream*)
+ (compute-result))
+ (t
+ (case next-char
+ ((#\L)
+ (cond ((not *saw-backslash*)
+ ;; a normal #\L, no 'pending'
+ ;; backslash
+ #\L)
+ (case-mode
+ ;; a backslashed #\L which
+ ;; we've seen before but we
+ ;; still have to close at
+ ;; least one \Q/\L/\E scope
+ (unread-char #\L *stream*)
+ (compute-result))
+ (t
+ ;; all scopes are closed, now
+ ;; read and downcase 'till \E
+ ;; or somesuch
+ (setq *saw-backslash* nil)
+ (parse-with-case-mode 'string-downcase))))
+ ((#\U)
+ ;; see comments for #\L above
+ (cond ((not *saw-backslash*)
+ #\U)
+ (case-mode
+ (unread-char #\U *stream*)
+ (compute-result))
+ (t
+ (setq *saw-backslash* nil)
+ (parse-with-case-mode 'string-upcase))))
+ ((#\Space #\Tab #\Linefeed #\Return #\Page)
+ (cond ((and extended-mode
+ (not (eq regex-mode :in-char-class)))
+ ;; in extended mode (if not in
+ ;; a character class)
+ ;; whitespace is removed
+ "")
+ (t next-char)))
+ ((#\()
+ (cond ((and (eq regex-mode t)
+ (null quote-mode)
+ (char/= *term-char* #\?)
+ (eql (peek-char*) #\?))
+ ;; this could start an
+ ;; embedded comment in regex
+ ;; mode (and we're /not/
+ ;; inside of a \Q scope or a
+ ;; character class)
+ (read-char*)
+ (cond ((and (char/= *term-char* #\#)
+ (eql (peek-char*) #\#))
+ ;; yes, it's a
+ ;; comment, so consume
+ ;; characters 'till #\)
+ (read-while
+ (lambda (char)
+ (and (char/= char #\))
+ (char/= char *term-char*))))
+ (cond ((char= (read-char*) *term-char*)
+ (signal-reader-error
+ "Incomplete regex comment starting with '(#'"))
+ ((not (digit-char-p (peek-char*) 16))
+ "")
+ ;; special case
+ ;; if next
+ ;; character
+ ;; could
+ ;; potentially
+ ;; continue an
+ ;; octal or
+ ;; hexadecimal
+ ;; representation
+ (t "(?:)")))
+ ;; no, wasn't a comment
+ (t "(?")))
+ (t #\()))
+ ((#\#)
+ (cond ((and (eq regex-mode t)
+ extended-mode
+ (null quote-mode))
+ ;; we're in extended regex
+ ;; mode and not inside of a \Q
+ ;; scope or a character class,
+ ;; so this is a comment and we
+ ;; consume it 'till #\Newline
+ ;; or *TERM-CHAR*
+ (read-while
+ (lambda (char)
+ (and (char/= char #\Newline)
+ (char/= char *term-char*))))
+ (when (char= (peek-char*) #\Newline)
+ (read-char*))
+ (cond ((not (digit-char-p (peek-char*)
+ 16))
+ "")
+ ;; special case, see above
+ (t "(?:)")))
+ (t #\#)))
+ ((#\\)
+ (case (peek-char*)
+ ((#\Q)
+ ;; \Q - start a new quote scope
+ (read-char*)
+ (let ((string-to-quote
+ (inner-reader regex-mode
+ extended-mode
+ t case-mode)))
+ (if (stringp string-to-quote)
+ ;; if we got a constant string
+ ;; we modify it directly
+ (quote-meta-chars string-to-quote)
+ ;; otherwise we expand into code
+ `(write-string
+ (quote-meta-chars ,string-to-quote)
+ ,string-stream))))
+ ((#\L)
+ ;; \L - start a new case-modifying
+ ;; scope
+ (cond (case-mode
+ ;; if we're already in
+ ;; this mode we have to
+ ;; end all previous scopes
+ ;; first - we set
+ ;; *SAW-BACKSLASH* to T so
+ ;; the #\L is read until
+ ;; all scopes are finished
+ (setq *saw-backslash* t)
+ (compute-result))
+ (t
+ ;; all scopes are closed, now
+ ;; read and downcase 'till \E
+ ;; or somesuch
+ (setq *saw-backslash* nil)
+ (read-char*)
+ (parse-with-case-mode 'string-downcase))))
+ ((#\U)
+ ;; see comments for #\L above
+ (cond (case-mode
+ (setq *saw-backslash* t)
+ (compute-result))
+ (t
+ (setq *saw-backslash* nil)
+ (read-char*)
+ (parse-with-case-mode 'string-upcase))))
+ ((#\E)
+ ;; \E - ends exactly one scope
+ (read-char*)
+ (if (or quote-mode case-mode)
+ (compute-result)
+ ""))
+ ((#\l)
+ ;; \l - downcase next character
+ (read-char*)
+ ;; remember that we have to do this
+ (setq handle-next-char :downcase)
+ nil)
+ ((#\u)
+ ;; \u - upcase next character
+ (read-char*)
+ ;; remember that we have to do this
+ (setq handle-next-char :upcase)
+ nil)
+ (otherwise
+ ;; otherwise this is a
+ ;; backslash-escaped character
+ (unescape-char regex-mode))))
+ ((#\$)
+ ;; #\$ - might be an interpolation
+ (let ((form (read-form)))
+ (cond ((null form)
+ ;; no, just dollar sign
+ #\$)
+ (handle-next-char
+ ;; yes, and we have to
+ ;; modify the first
+ ;; character
+ (prog1
+ (let ((string (gensym)))
+ `(let ((,string (format nil "~A"
+ ,form)))
+ (when (plusp (length ,string))
+ (setf (char ,string 0)
+ (,(if (eq handle-next-char
+ :downcase)
+ 'char-downcase
+ 'char-upcase)
+ (char ,string 0))))
+ (write-string ,string ,string-stream)))
+ (setq handle-next-char nil)))
+ (t
+ ;; no modification, just
+ ;; insert a form to PRINC
+ ;; this interpolation
+ `(princ ,form ,string-stream)))))
+ ((#\@)
+ ;; #\Q - might be an interpolation
+ (let ((form (read-form))
+ (element (gensym))
+ (first (gensym)))
+ (cond ((null form)
+ ;; no, just at-sign
+ #\@)
+ (handle-next-char
+ ;; yes, and we have to
+ ;; modify the first
+ ;; character
+ (prog1
+ (let ((string (gensym)))
+ `(loop for ,first = t then nil
+ for ,element in ,form
+ unless ,first do
+ (princ *list-delimiter*
+ ,string-stream)
+ if ,first do
+ (let ((,string
+ (format nil "~A"
+ ,element)))
+ (when (plusp (length ,string))
+ (setf (char ,string 0)
+ (,(if (eq handle-next-char
+ :downcase)
+ 'char-downcase
+ 'char-upcase)
+ (char ,string 0))))
+ (write-string ,string ,string-stream))
+ else do
+ (princ ,element ,string-stream)))
+ (setq handle-next-char nil)))
+ (t
+ ;; no modification, just
+ ;; insert a form to PRINC
+ ;; this interpolated list
+ ;; (including the list
+ ;; delimiters inbetween)
+ `(loop for ,first = t then nil
+ for ,element in ,form
+ unless ,first do (princ *list-delimiter*
+ ,string-stream)
+ do (princ ,element ,string-stream))))))
+ ;; just a 'normal' character
+ (otherwise next-char))))))
+ (when interpolation
+ ;; INTERPOLATION is NIL if we just saw #\l or #\u
+ (when (and handle-next-char
+ (consp interpolation)
+ (eq (first interpolation)
+ 'write-string))
+ ;; if we have to upcase or downcase the following
+ ;; character and we just collected a form (from a
+ ;; \Q/\L/\U scope) we have to insert code for the
+ ;; modification
+ (setf (second interpolation)
+ (let ((string (gensym)))
+ `(let ((,string ,(second interpolation)))
+ (when (plusp (length ,string))
+ (setf (char ,string 0)
+ (,(if (eq handle-next-char :downcase)
+ 'char-downcase
+ 'char-upcase)
+ (char ,string 0))))
+ ,string)))
+ (setq handle-next-char nil))
+ (cond ((characterp interpolation)
+ ;; add one character to COLLECTOR and handle
+ ;; it according to HANDLE-NEXT-CHAR
+ (vector-push-extend (case handle-next-char
+ ((:downcase)
+ (setq handle-next-char nil)
+ (char-downcase interpolation))
+ ((:upcase)
+ (setq handle-next-char nil)
+ (char-upcase interpolation))
+ (otherwise
+ interpolation))
+ collector))
+ ((stringp interpolation)
+ ;; add a string to COLLECTOR and handle its
+ ;; first character according to
+ ;; HANDLE-NEXT-CHAR
+ (loop for char across interpolation
+ do (vector-push-extend (case handle-next-char
+ ((:downcase)
+ (setq handle-next-char nil)
+ (char-downcase char))
+ ((:upcase)
+ (setq handle-next-char nil)
+ (char-upcase char))
+ (otherwise
+ char))
+ collector)))
+ ((plusp (length collector))
+ ;; add code (to be executed at runtime) but
+ ;; make sure to empty COLLECTOR first
+ (push collector result)
+ (push interpolation result)
+ ;; reset collector
+ (setf collector (make-collector)))
+ (t
+ ;; same but COLLECTOR is empty
+ (push interpolation result)))))))))
+ (if (every #'stringp result)
+ ;; if all elements of RESULT are strings we can return a
+ ;; constant string
+ (string-list-to-string result)
+ ;; otherwise we have to wrap the PRINCs emitted above into a
+ ;; WITH-OUTPUT-TO-STRING form
+ `(with-output-to-string (,string-stream)
+ ,@(loop for interpolation in result
+ if (stringp interpolation)
+ collect `(write-string ,interpolation ,string-stream)
+ else
+ collect interpolation)))))
+
+(defun %enable-interpol-syntax ()
+ "Internal function used to enable reader syntax and store current
+readtable on stack."
+ (push *readtable*
+ *previous-readtables*)
+ (setq *readtable* (copy-readtable))
+ (set-dispatch-macro-character #\# #\? #'interpol-reader)
+ (values))
+
+(defun %disable-interpol-syntax ()
+ "Internal function used to restore previous readtable."
+ (if *previous-readtables*
+ (setq *readtable* (pop *previous-readtables*))
+ (setq *readtable* (copy-readtable nil)))
+ (values))
+
+(defmacro enable-interpol-syntax ()
+ "Enable CL-INTERPOL reader syntax."
+ `(eval-when (:compile-toplevel :load-toplevel :execute)
+ (%enable-interpol-syntax)))
+
+(defmacro disable-interpol-syntax ()
+ "Restore readtable which was active before last call to
+ENABLE-INTERPOL-SYNTAX. If there was no such call, the standard
+readtable is used."
+ `(eval-when (:compile-toplevel :load-toplevel :execute)
+ (%disable-interpol-syntax)))
\ No newline at end of file
Added: branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/specials.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/specials.lisp 2007-10-04 19:13:23 UTC (rev 2205)
+++ branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/specials.lisp 2007-10-04 19:49:06 UTC (rev 2206)
@@ -0,0 +1,123 @@
+;;; -*- Mode: LISP; Syntax: COMMON-LISP; Package: CL-INTERPOL; Base: 10 -*-
+;;; $Header: /usr/local/cvsrep/cl-interpol/specials.lisp,v 1.7 2004/04/24 00:19:13 edi Exp $
+
+;;; Copyright (c) 2003, Dr. Edmund Weitz. All rights reserved.
+
+;;; Redistribution and use in source and binary forms, with or without
+;;; modification, are permitted provided that the following conditions
+;;; are met:
+
+;;; * Redistributions of source code must retain the above copyright
+;;; notice, this list of conditions and the following disclaimer.
+
+;;; * Redistributions in binary form must reproduce the above
+;;; copyright notice, this list of conditions and the following
+;;; disclaimer in the documentation and/or other materials
+;;; provided with the distribution.
+
+;;; THIS SOFTWARE IS PROVIDED BY THE AUTHOR 'AS IS' AND ANY EXPRESSED
+;;; OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
+;;; WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+;;; ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
+;;; DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+;;; DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
+;;; GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
+;;; INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
+;;; WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
+;;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
+;;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+
+(in-package #:cl-interpol)
+
+(defvar *list-delimiter* #\Space
+ "What is inserted between the elements of a list which is
+interpolated by #\@.")
+
+(defvar *inner-delimiters* '((#\( . #\))
+ (#\{ . #\})
+ (#\< . #\>)
+ (#\[ . #\]))
+ "Legal delimiters for interpolation with #\$ and #\@.")
+
+(defvar *outer-delimiters* '((#\( . #\))
+ (#\{ . #\})
+ (#\< . #\>)
+ (#\[ . #\])
+ #\/ #\| #\" #\' #\#)
+ "Legal outer delimiters for CL-INTERPOL strings.")
+
+(defvar *regex-delimiters* '(#\/)
+ "Outer delimiters which automatically enable regex mode.")
+
+(defvar *unicode-names*
+ (make-hash-table :test #'equalp :size (min 14000 (+ 50 char-code-limit)))
+ "A hash table which maps Unicode names to characters.")
+
+(defvar *long-unicode-names-p* t
+ "Whether long Unicode names should be tried")
+
+(defvar *short-unicode-names-p* nil
+ "Whether long Unicode names \(like \"Greek:Sigma\") should be tried")
+
+(defvar *unicode-scripts* '("latin")
+ "The Unicode scripts which are to be tried if a name couldn't be
+resolved otherwise.")
+
+(defvar *optional-delimiters-p* nil
+ "Whether text following $ or @ should interpolate even without a
+following delimiter. Lexical variables are handled correctly,
+but the rules are somewhat complex -- see the docs for details.")
+
+(defmacro defvar-unbound (variable-name documentation)
+ "Like DEFVAR, but the variable will be unbound rather than getting
+an initial value. This is useful for variables which should have no
+global value but might have a dynamically bound value."
+ ;; stolen from comp.lang.lisp article <k7727i3s.fsf(a)comcast.net> by
+ ;; "prunesquallor(a)comcast.net"
+ `(eval-when (:load-toplevel :compile-toplevel :execute)
+ (defvar ,variable-name)
+ (setf (documentation ',variable-name 'variable)
+ ,documentation)))
+
+(defvar-unbound *saw-backslash*
+ "Whether we have to re-process an \L or \U because it closes several
+scopes.")
+
+(defvar-unbound *pair-level*
+ "")
+
+(defvar-unbound *stream*
+ "Bound to the stream which is read from while parsing a string.")
+
+(defvar-unbound *start-char*
+ "Bound to the opening outer delimiter while parsing a string.")
+
+(defvar-unbound *term-char*
+ "Bound to the closing outer delimiter while parsing a string.")
+
+(defvar *previous-readtables* nil
+ "A stack which holds the previous readtables that have been pushed
+here by ENABLE-INTERPOL-SYNTAX.")
+
+(defvar-unbound *readtable-copy*
+ "Bound to the current readtable if it has to be temporarily
+modified.")
+
+;; stuff for Nikodemus Siivola's HYPERDOC
+;; see <http://common-lisp.net/project/hyperdoc/>
+;; and <http://www.cliki.net/hyperdoc>
+
+(defvar *hyperdoc-base-uri* "http://weitz.de/cl-interpol/")
+
+(let ((exported-symbols-alist
+ (loop for symbol being the external-symbols of :cl-interpol
+ collect (cons symbol
+ (concatenate 'string
+ "#"
+ (string-downcase symbol))))))
+ (defun hyperdoc-lookup (symbol type)
+ (declare (ignore type))
+ (cdr (assoc symbol
+ exported-symbols-alist
+ :test #'eq))))
+
\ No newline at end of file
Added: branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/test.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/test.lisp 2007-10-04 19:13:23 UTC (rev 2205)
+++ branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/test.lisp 2007-10-04 19:49:06 UTC (rev 2206)
@@ -0,0 +1,177 @@
+;;; -*- Mode: LISP; Syntax: COMMON-LISP; Package: CL-INTERPOL; Base: 10 -*-
+;;; $Header: /usr/local/cvsrep/cl-interpol/test.lisp,v 1.9 2004/04/24 00:19:13 edi Exp $
+
+;;; Copyright (c) 2002-2003, Dr. Edmund Weitz. All rights reserved.
+
+;;; Redistribution and use in source and binary forms, with or without
+;;; modification, are permitted provided that the following conditions
+;;; are met:
+
+;;; * Redistributions of source code must retain the above copyright
+;;; notice, this list of conditions and the following disclaimer.
+
+;;; * Redistributions in binary form must reproduce the above
+;;; copyright notice, this list of conditions and the following
+;;; disclaimer in the documentation and/or other materials
+;;; provided with the distribution.
+
+;;; THIS SOFTWARE IS PROVIDED BY THE AUTHOR 'AS IS' AND ANY EXPRESSED
+;;; OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
+;;; WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+;;; ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
+;;; DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+;;; DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
+;;; GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
+;;; INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
+;;; WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
+;;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
+;;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+
+(in-package #:cl-interpol)
+
+;; Otherwise it's impossible to see which tests are failing for all
+;; the "helpful" warnings.
+#+sbcl (declaim (optimize (sb-ext:inhibit-warnings 3)))
+
+(defvar *temp*)
+
+(defparameter *cl-interpol-base-directory*
+ (make-pathname :name nil :type nil :version nil
+ :defaults (parse-namestring *load-truename*)))
+
+(defparameter *test-counter* 0)
+
+(defparameter *failure-counter* 0)
+
+(defun test (form1 form2)
+ (unless (string= form1 form2)
+ (incf *failure-counter*)
+ (format t "~&Test ~A failed: Expected ~S but got ~S~%"
+ (1+ *test-counter*) form2 form1))
+ (incf *test-counter*)
+ (princ #\.)
+ (when (zerop (mod *test-counter* 10))
+ (princ #\Space)
+ (princ *test-counter*)
+ (terpri))
+ (force-output))
+
+(enable-interpol-syntax)
+
+(test #?"abc" "abc")
+(test #?'abc' "abc")
+(test #?|abc| "abc")
+(test #?/abc/ "abc")
+(test #?#abc# "abc")
+(test #?{abc} "abc")
+(test #?(abc) "abc")
+(test #?<abc> "abc")
+(test #?[abc] "abc")
+(test #?"\t\n\r\f\b\a\e"
+ (coerce (list #\Tab #\Newline #\Return #\Page #\Backspace (code-char 7) (code-char 27))
+ 'string))
+(test #?"\033\x1b\c[\x{1b}"
+ (make-string 4 :initial-element (code-char 27)))
+(test #?"\x" (string (code-char 0)))
+(test #?"\x001" (format nil "~A1" (code-char 0)))
+(test #?"\0001" (format nil "~A1" (code-char 0)))
+
+(eval-when (:compile-toplevel :load-toplevel :execute)
+ (setq *temp* (list *long-unicode-names-p*
+ *short-unicode-names-p*
+ *unicode-scripts*)
+ *long-unicode-names-p* t))
+
+(test #?"\N{LATIN CAPITAL LETTER A WITH DIAERESIS}" "�")
+(test #?"\N{latin capital letter a with diaeresis}" "�")
+(test #?{\N{LATIN CAPITAL LETTER A WITH DIAERESIS}} "�")
+
+(eval-when (:compile-toplevel :load-toplevel :execute)
+ (setq *short-unicode-names-p* t))
+
+(test #?"\N{Latin:A with Diaeresis}" "�")
+(test #?"\N{Latin:a with diaeresis}" "�")
+
+(eval-when (:compile-toplevel :load-toplevel :execute)
+ (setq *unicode-scripts* (list "Latin")))
+
+(test #?"\N{A with Diaeresis}" "�")
+(test #?"\N{a with diaeresis}" "�")
+
+(eval-when (:compile-toplevel :load-toplevel :execute)
+ (setq *long-unicode-names-p* (first *temp*)
+ *short-unicode-names-p* (second *temp*)
+ *unicode-scripts* (third *temp*)))
+
+(test #?/\1/ "\\1")
+(test #?r"\1" "\\1")
+(test #?x/abc / "abc")
+(test #?x/abc
+ / "abc")
+(test #?rx"abc " "abc")
+(test #?/[\1]\1/ (format nil "[~A]\\1" (code-char 1)))
+(test #?/[(?#foo)](?#foo)/ "[(?#foo)]")
+(test #?/a#bc/ "a#bc")
+(test #?x/a#bc/ "a")
+(test #?x/\d\A[\d\A]/ "\\d\\A[\\dA]")
+
+(test #?"\Q-" "\\-")
+(test #?"\Q-\E-" "\\--")
+(test #?"\ufoo" "Foo")
+(test #?"\Ufoo" "FOO")
+(test #?"\Ufoo\Ebar" "FOObar")
+(test #?"\Ufoo\LBAR" "FOObar")
+
+(let ((a "foo"))
+ (test #?"$" "$")
+ (test #?"@ @" "@ @")
+ (test #?"${a}bar" "foobar")
+ (test #?/${a}bar/ "foobar")
+ (test #?"$[a]bar" "foobar")
+ (test #?"$(a)bar" "foobar")
+ (test #?"$<a>bar" "foobar")
+ (test #?/$<a>bar/ "$<a>bar")
+ (test #?"$a @a " "$a @a "))
+
+(let ((a (list 1 2 3)))
+ (test #?"${a}" "(1 2 3)")
+ (test #?"@{a}" "1 2 3")
+ (let ((*list-delimiter* ""))
+ (test #?"@{a}" "123")))
+
+(let* ((a "foo")
+ (b #\Space)
+ (c "bar")
+ (d (list a b c))
+ (x 40))
+ (test #?"$ @" "$ @")
+ (test #?"$(a)" "foo")
+ (test #?"$<a>$[b]" "foo ")
+ (test #?"\U${a}\E \u${a}" "FOO Foo")
+ (test (let ((cl-interpol:*list-delimiter* #\*))
+ #?"@{d}")
+ "foo* *bar")
+ (test (let ((cl-interpol:*list-delimiter* ""))
+ #?"@{d}")
+ "foo bar")
+ (test #?"The result is ${(let ((y 2)) (+ x y))}"
+ "The result is 42")
+ (test #?"${#?'${a} ${c}'} ${x}" "foo bar 40"))
+
+(setq cl-interpol:*optional-delimiters-p* t)
+(test (let ((% 23)) #?"$%a%b%") "23a%b%")
+(test (let ((%a 23)) #?"$%a%b%") "23%b%")
+(test (let ((%a% 23)) #?"$%a%b%") "23b%")
+(test (let ((%a%b 23)) #?"$%a%b%") "23%")
+(test (let ((%a%b% 23)) #?"$%a%b%") "23")
+(setq cl-interpol:*optional-delimiters-p* nil)
+
+(load (merge-pathnames "test2.lisp"
+ *cl-interpol-base-directory*))
+
+(disable-interpol-syntax)
+
+(cond ((zerop *failure-counter*)
+ (format t "~&All tests passed."))
+ (t
+ (format t "~&~A tests failed!" *failure-counter*)))
\ No newline at end of file
Added: branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/test.pl
===================================================================
--- branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/test.pl 2007-10-04 19:13:23 UTC (rev 2205)
+++ branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/test.pl 2007-10-04 19:49:06 UTC (rev 2206)
@@ -0,0 +1,102 @@
+#!/usr/bin/perl
+
+### $Header: /usr/local/cvsrep/cl-interpol/test.pl,v 1.4 2003/10/19 15:55:25 edi Exp $
+
+### Copyright (c) 2002-2003, Dr. Edmund Weitz. All rights reserved.
+
+### Redistribution and use in source and binary forms, with or without
+### modification, are permitted provided that the following conditions
+### are met:
+
+### * Redistributions of source code must retain the above copyright
+### notice, this list of conditions and the following disclaimer.
+
+### * Redistributions in binary form must reproduce the above
+### copyright notice, this list of conditions and the following
+### disclaimer in the documentation and/or other materials
+### provided with the distribution.
+
+### THIS SOFTWARE IS PROVIDED BY THE AUTHOR 'AS IS' AND ANY EXPRESSED
+### OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
+### WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+### ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
+### DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+### DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
+### GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
+### INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
+### WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
+### NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
+### SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+
+my @chars = qw(\Q \L \U \E \l \u);
+
+sub combine {
+ my $delim = shift;
+ my @result = ();
+ foreach my $char (@chars) {
+ foreach my $string (@_) {
+ push @result, "$char$delim$string";
+ }
+ }
+ @result;
+}
+
+sub quote {
+ local $_ = shift;
+ s/\\/\\\\/g;
+ $_;
+}
+
+print <<'HEAD';
+;;; -*- Mode: LISP; Syntax: COMMON-LISP; Package: CL-INTERPOL; Base: 10 -*-
+;;; $Header: /usr/local/cvsrep/cl-interpol/test.pl,v 1.4 2003/10/19 15:55:25 edi Exp $
+
+;;; Copyright (c) 2002-2003, Dr. Edmund Weitz. All rights reserved.
+
+;;; Redistribution and use in source and binary forms, with or without
+;;; modification, are permitted provided that the following conditions
+;;; are met:
+
+;;; * Redistributions of source code must retain the above copyright
+;;; notice, this list of conditions and the following disclaimer.
+
+;;; * Redistributions in binary form must reproduce the above
+;;; copyright notice, this list of conditions and the following
+;;; disclaimer in the documentation and/or other materials
+;;; provided with the distribution.
+
+;;; THIS SOFTWARE IS PROVIDED BY THE AUTHOR 'AS IS' AND ANY EXPRESSED
+;;; OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
+;;; WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+;;; ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
+;;; DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+;;; DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
+;;; GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
+;;; INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
+;;; WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
+;;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
+;;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+
+;;; This file was automatically generated by a Perl script. It should
+;;; not be loaded directly but by "load.lisp" instead.
+
+(in-package #:cl-interpol)
+
+(enable-interpol-syntax)
+
+HEAD
+
+foreach my $a (('Aa-', 'aA-')) {
+ my $counter = 0;
+ my @arr = @chars;
+ while ($counter++ < 4) {
+ foreach my $str (@arr) {
+ print "(let ((a \"$a\"))\n";
+ my $test = "\${a}$str\${a}";
+ print " (test #?\"$test\" \"" . (quote eval "\"$test\"") . "\"))\n";
+ }
+ @arr = combine '${a}', @arr;
+ }
+}
+
+print "\n(disable-interpol-syntax)\n";
Added: branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/test2.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/test2.lisp 2007-10-04 19:13:23 UTC (rev 2205)
+++ branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/test2.lisp 2007-10-04 19:49:06 UTC (rev 2206)
@@ -0,0 +1,6254 @@
+;;; -*- Mode: LISP; Syntax: COMMON-LISP; Package: CL-INTERPOL; Base: 10 -*-
+;;; $Header: /usr/local/cvsrep/cl-interpol/test2.lisp,v 1.3 2003/10/19 15:55:25 edi Exp $
+
+;;; Copyright (c) 2002-2003, Dr. Edmund Weitz. All rights reserved.
+
+;;; Redistribution and use in source and binary forms, with or without
+;;; modification, are permitted provided that the following conditions
+;;; are met:
+
+;;; * Redistributions of source code must retain the above copyright
+;;; notice, this list of conditions and the following disclaimer.
+
+;;; * Redistributions in binary form must reproduce the above
+;;; copyright notice, this list of conditions and the following
+;;; disclaimer in the documentation and/or other materials
+;;; provided with the distribution.
+
+;;; THIS SOFTWARE IS PROVIDED BY THE AUTHOR 'AS IS' AND ANY EXPRESSED
+;;; OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
+;;; WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+;;; ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
+;;; DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+;;; DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
+;;; GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
+;;; INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
+;;; WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
+;;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
+;;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+
+;;; This file was automatically generated by a Perl script. It should
+;;; not be loaded directly but by "load.lisp" instead.
+
+(in-package #:cl-interpol)
+
+(enable-interpol-syntax)
+
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}" "Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}" "Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}" "Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}" "Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}" "Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}" "Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}" "Aa-Aa\\-Aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}" "Aa-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}" "Aa-Aa\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}" "Aa-Aa\\-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}" "Aa-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}" "Aa-Aa\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}" "Aa-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}" "Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}" "Aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}" "Aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}" "Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}" "Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}" "Aa-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}" "Aa-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}" "Aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}" "Aa-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}" "Aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}" "Aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}" "Aa-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}" "Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}" "Aa-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}" "Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}" "Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}" "Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}" "Aa-aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}" "Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}" "Aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}" "Aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}" "Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}" "Aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}" "Aa-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}" "Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}" "Aa-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}" "Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}" "Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}" "Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}\Q${a}" "Aa-Aa\\-Aa\\\\\\-Aa\\\\\\\\\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}\L${a}" "Aa-Aa\\-Aa\\\\\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}\U${a}" "Aa-Aa\\-Aa\\\\\\-AA\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}\E${a}" "Aa-Aa\\-Aa\\\\\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}\l${a}" "Aa-Aa\\-Aa\\\\\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}\u${a}" "Aa-Aa\\-Aa\\\\\\-Aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}\Q${a}" "Aa-Aa\\-aa\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}\L${a}" "Aa-Aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}\U${a}" "Aa-Aa\\-aa\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}\E${a}" "Aa-Aa\\-aa\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}\l${a}" "Aa-Aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}\u${a}" "Aa-Aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}\Q${a}" "Aa-Aa\\-AA\\-AA\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}\L${a}" "Aa-Aa\\-AA\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}\U${a}" "Aa-Aa\\-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}\E${a}" "Aa-Aa\\-AA\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}\l${a}" "Aa-Aa\\-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}\u${a}" "Aa-Aa\\-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}\Q${a}" "Aa-Aa\\-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}\L${a}" "Aa-Aa\\-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}\U${a}" "Aa-Aa\\-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}\E${a}" "Aa-Aa\\-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}\l${a}" "Aa-Aa\\-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}\u${a}" "Aa-Aa\\-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}\Q${a}" "Aa-Aa\\-aa\\-Aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}\L${a}" "Aa-Aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}\U${a}" "Aa-Aa\\-aa\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}\E${a}" "Aa-Aa\\-aa\\-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}\l${a}" "Aa-Aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}\u${a}" "Aa-Aa\\-aa\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}\Q${a}" "Aa-Aa\\-Aa\\-Aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}\L${a}" "Aa-Aa\\-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}\U${a}" "Aa-Aa\\-Aa\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}\E${a}" "Aa-Aa\\-Aa\\-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}\l${a}" "Aa-Aa\\-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}\u${a}" "Aa-Aa\\-Aa\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}\Q${a}" "Aa-aa-aa\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}\L${a}" "Aa-aa-aa\\-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}\U${a}" "Aa-aa-aa\\-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}\E${a}" "Aa-aa-aa\\-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}\l${a}" "Aa-aa-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}\u${a}" "Aa-aa-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}\Q${a}" "Aa-aa-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}\L${a}" "Aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}\U${a}" "Aa-aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}\E${a}" "Aa-aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}\l${a}" "Aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}\u${a}" "Aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}\Q${a}" "Aa-aa-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}\L${a}" "Aa-aa-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}\U${a}" "Aa-aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}\E${a}" "Aa-aa-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}\l${a}" "Aa-aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}\u${a}" "Aa-aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}\Q${a}" "Aa-aa-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}\L${a}" "Aa-aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}\U${a}" "Aa-aa-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}\E${a}" "Aa-aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}\l${a}" "Aa-aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}\u${a}" "Aa-aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}\Q${a}" "Aa-aa-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}\L${a}" "Aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}\U${a}" "Aa-aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}\E${a}" "Aa-aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}\l${a}" "Aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}\u${a}" "Aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}\Q${a}" "Aa-aa-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}\L${a}" "Aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}\U${a}" "Aa-aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}\E${a}" "Aa-aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}\l${a}" "Aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}\u${a}" "Aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}\Q${a}" "Aa-AA-AA\\-AA\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}\L${a}" "Aa-AA-AA\\-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}\U${a}" "Aa-AA-AA\\-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}\E${a}" "Aa-AA-AA\\-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}\l${a}" "Aa-AA-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}\u${a}" "Aa-AA-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}\Q${a}" "Aa-AA-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}\L${a}" "Aa-AA-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}\U${a}" "Aa-AA-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}\E${a}" "Aa-AA-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}\l${a}" "Aa-AA-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}\u${a}" "Aa-AA-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}\Q${a}" "Aa-AA-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}\L${a}" "Aa-AA-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}\U${a}" "Aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}\E${a}" "Aa-AA-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}\l${a}" "Aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}\u${a}" "Aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}\Q${a}" "Aa-AA-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}\L${a}" "Aa-AA-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}\U${a}" "Aa-AA-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}\E${a}" "Aa-AA-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}\l${a}" "Aa-AA-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}\u${a}" "Aa-AA-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}\Q${a}" "Aa-AA-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}\L${a}" "Aa-AA-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}\U${a}" "Aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}\E${a}" "Aa-AA-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}\l${a}" "Aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}\u${a}" "Aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}\Q${a}" "Aa-AA-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}\L${a}" "Aa-AA-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}\U${a}" "Aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}\E${a}" "Aa-AA-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}\l${a}" "Aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}\u${a}" "Aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}\Q${a}" "Aa-Aa-Aa\\-Aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}\L${a}" "Aa-Aa-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}\U${a}" "Aa-Aa-Aa\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}\E${a}" "Aa-Aa-Aa\\-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}\l${a}" "Aa-Aa-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}\u${a}" "Aa-Aa-Aa\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}\Q${a}" "Aa-Aa-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}\L${a}" "Aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}\U${a}" "Aa-Aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}\E${a}" "Aa-Aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}\l${a}" "Aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}\u${a}" "Aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}\Q${a}" "Aa-Aa-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}\L${a}" "Aa-Aa-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}\U${a}" "Aa-Aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}\E${a}" "Aa-Aa-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}\l${a}" "Aa-Aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}\u${a}" "Aa-Aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}\Q${a}" "Aa-Aa-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}\L${a}" "Aa-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}\U${a}" "Aa-Aa-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}\E${a}" "Aa-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}\l${a}" "Aa-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}\u${a}" "Aa-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}\Q${a}" "Aa-Aa-aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}\L${a}" "Aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}\U${a}" "Aa-Aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}\E${a}" "Aa-Aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}\l${a}" "Aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}\u${a}" "Aa-Aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}\Q${a}" "Aa-Aa-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}\L${a}" "Aa-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}\U${a}" "Aa-Aa-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}\E${a}" "Aa-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}\l${a}" "Aa-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}\u${a}" "Aa-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}\Q${a}" "Aa-aa-Aa\\-Aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}\L${a}" "Aa-aa-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}\U${a}" "Aa-aa-Aa\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}\E${a}" "Aa-aa-Aa\\-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}\l${a}" "Aa-aa-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}\u${a}" "Aa-aa-Aa\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}\Q${a}" "Aa-aa-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}\L${a}" "Aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}\U${a}" "Aa-aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}\E${a}" "Aa-aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}\l${a}" "Aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}\u${a}" "Aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}\Q${a}" "Aa-aa-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}\L${a}" "Aa-aa-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}\U${a}" "Aa-aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}\E${a}" "Aa-aa-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}\l${a}" "Aa-aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}\u${a}" "Aa-aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}\Q${a}" "Aa-aa-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}\L${a}" "Aa-aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}\U${a}" "Aa-aa-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}\E${a}" "Aa-aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}\l${a}" "Aa-aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}\u${a}" "Aa-aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}\Q${a}" "Aa-aa-aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}\L${a}" "Aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}\U${a}" "Aa-aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}\E${a}" "Aa-aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}\l${a}" "Aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}\u${a}" "Aa-aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}\Q${a}" "Aa-aa-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}\L${a}" "Aa-aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}\U${a}" "Aa-aa-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}\E${a}" "Aa-aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}\l${a}" "Aa-aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}\u${a}" "Aa-aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}\Q${a}" "Aa-Aa-Aa\\-Aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}\L${a}" "Aa-Aa-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}\U${a}" "Aa-Aa-Aa\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}\E${a}" "Aa-Aa-Aa\\-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}\l${a}" "Aa-Aa-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}\u${a}" "Aa-Aa-Aa\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}\Q${a}" "Aa-Aa-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}\L${a}" "Aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}\U${a}" "Aa-Aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}\E${a}" "Aa-Aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}\l${a}" "Aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}\u${a}" "Aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}\Q${a}" "Aa-Aa-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}\L${a}" "Aa-Aa-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}\U${a}" "Aa-Aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}\E${a}" "Aa-Aa-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}\l${a}" "Aa-Aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}\u${a}" "Aa-Aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}\Q${a}" "Aa-Aa-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}\L${a}" "Aa-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}\U${a}" "Aa-Aa-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}\E${a}" "Aa-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}\l${a}" "Aa-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}\u${a}" "Aa-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}\Q${a}" "Aa-Aa-aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}\L${a}" "Aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}\U${a}" "Aa-Aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}\E${a}" "Aa-Aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}\l${a}" "Aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}\u${a}" "Aa-Aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}\Q${a}" "Aa-Aa-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}\L${a}" "Aa-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}\U${a}" "Aa-Aa-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}\E${a}" "Aa-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}\l${a}" "Aa-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}\u${a}" "Aa-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}\Q${a}\Q${a}" "Aa-Aa\\-Aa\\\\\\-Aa\\\\\\\\\\\\\\-Aa\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}\Q${a}\L${a}" "Aa-Aa\\-Aa\\\\\\-Aa\\\\\\\\\\\\\\-aa\\\\\\\\\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}\Q${a}\U${a}" "Aa-Aa\\-Aa\\\\\\-Aa\\\\\\\\\\\\\\-AA\\\\\\\\\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}\Q${a}\E${a}" "Aa-Aa\\-Aa\\\\\\-Aa\\\\\\\\\\\\\\-Aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}\Q${a}\l${a}" "Aa-Aa\\-Aa\\\\\\-Aa\\\\\\\\\\\\\\-aa\\\\\\\\\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}\Q${a}\u${a}" "Aa-Aa\\-Aa\\\\\\-Aa\\\\\\\\\\\\\\-Aa\\\\\\\\\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}\L${a}\Q${a}" "Aa-Aa\\-Aa\\\\\\-aa\\\\\\-aa\\\\\\\\\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}\L${a}\L${a}" "Aa-Aa\\-Aa\\\\\\-aa\\\\\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}\L${a}\U${a}" "Aa-Aa\\-Aa\\\\\\-aa\\\\\\-AA\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}\L${a}\E${a}" "Aa-Aa\\-Aa\\\\\\-aa\\\\\\-Aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}\L${a}\l${a}" "Aa-Aa\\-Aa\\\\\\-aa\\\\\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}\L${a}\u${a}" "Aa-Aa\\-Aa\\\\\\-aa\\\\\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}\U${a}\Q${a}" "Aa-Aa\\-Aa\\\\\\-AA\\\\\\-AA\\\\\\\\\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}\U${a}\L${a}" "Aa-Aa\\-Aa\\\\\\-AA\\\\\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}\U${a}\U${a}" "Aa-Aa\\-Aa\\\\\\-AA\\\\\\-AA\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}\U${a}\E${a}" "Aa-Aa\\-Aa\\\\\\-AA\\\\\\-Aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}\U${a}\l${a}" "Aa-Aa\\-Aa\\\\\\-AA\\\\\\-AA\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}\U${a}\u${a}" "Aa-Aa\\-Aa\\\\\\-AA\\\\\\-AA\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}\E${a}\Q${a}" "Aa-Aa\\-Aa\\\\\\-Aa\\-Aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}\E${a}\L${a}" "Aa-Aa\\-Aa\\\\\\-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}\E${a}\U${a}" "Aa-Aa\\-Aa\\\\\\-Aa\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}\E${a}\E${a}" "Aa-Aa\\-Aa\\\\\\-Aa\\-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}\E${a}\l${a}" "Aa-Aa\\-Aa\\\\\\-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}\E${a}\u${a}" "Aa-Aa\\-Aa\\\\\\-Aa\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}\l${a}\Q${a}" "Aa-Aa\\-Aa\\\\\\-aa\\\\\\-Aa\\\\\\\\\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}\l${a}\L${a}" "Aa-Aa\\-Aa\\\\\\-aa\\\\\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}\l${a}\U${a}" "Aa-Aa\\-Aa\\\\\\-aa\\\\\\-AA\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}\l${a}\E${a}" "Aa-Aa\\-Aa\\\\\\-aa\\\\\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}\l${a}\l${a}" "Aa-Aa\\-Aa\\\\\\-aa\\\\\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}\l${a}\u${a}" "Aa-Aa\\-Aa\\\\\\-aa\\\\\\-Aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}\u${a}\Q${a}" "Aa-Aa\\-Aa\\\\\\-Aa\\\\\\-Aa\\\\\\\\\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}\u${a}\L${a}" "Aa-Aa\\-Aa\\\\\\-Aa\\\\\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}\u${a}\U${a}" "Aa-Aa\\-Aa\\\\\\-Aa\\\\\\-AA\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}\u${a}\E${a}" "Aa-Aa\\-Aa\\\\\\-Aa\\\\\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}\u${a}\l${a}" "Aa-Aa\\-Aa\\\\\\-Aa\\\\\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\Q${a}\u${a}\u${a}" "Aa-Aa\\-Aa\\\\\\-Aa\\\\\\-Aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}\Q${a}\Q${a}" "Aa-Aa\\-aa\\-aa\\\\\\-aa\\\\\\\\\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}\Q${a}\L${a}" "Aa-Aa\\-aa\\-aa\\\\\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}\Q${a}\U${a}" "Aa-Aa\\-aa\\-aa\\\\\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}\Q${a}\E${a}" "Aa-Aa\\-aa\\-aa\\\\\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}\Q${a}\l${a}" "Aa-Aa\\-aa\\-aa\\\\\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}\Q${a}\u${a}" "Aa-Aa\\-aa\\-aa\\\\\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}\L${a}\Q${a}" "Aa-Aa\\-aa\\-aa\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}\L${a}\L${a}" "Aa-Aa\\-aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}\L${a}\U${a}" "Aa-Aa\\-aa\\-aa\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}\L${a}\E${a}" "Aa-Aa\\-aa\\-aa\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}\L${a}\l${a}" "Aa-Aa\\-aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}\L${a}\u${a}" "Aa-Aa\\-aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}\U${a}\Q${a}" "Aa-Aa\\-aa\\-AA\\-AA\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}\U${a}\L${a}" "Aa-Aa\\-aa\\-AA\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}\U${a}\U${a}" "Aa-Aa\\-aa\\-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}\U${a}\E${a}" "Aa-Aa\\-aa\\-AA\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}\U${a}\l${a}" "Aa-Aa\\-aa\\-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}\U${a}\u${a}" "Aa-Aa\\-aa\\-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}\E${a}\Q${a}" "Aa-Aa\\-aa\\-Aa\\-Aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}\E${a}\L${a}" "Aa-Aa\\-aa\\-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}\E${a}\U${a}" "Aa-Aa\\-aa\\-Aa\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}\E${a}\E${a}" "Aa-Aa\\-aa\\-Aa\\-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}\E${a}\l${a}" "Aa-Aa\\-aa\\-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}\E${a}\u${a}" "Aa-Aa\\-aa\\-Aa\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}\l${a}\Q${a}" "Aa-Aa\\-aa\\-aa\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}\l${a}\L${a}" "Aa-Aa\\-aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}\l${a}\U${a}" "Aa-Aa\\-aa\\-aa\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}\l${a}\E${a}" "Aa-Aa\\-aa\\-aa\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}\l${a}\l${a}" "Aa-Aa\\-aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}\l${a}\u${a}" "Aa-Aa\\-aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}\u${a}\Q${a}" "Aa-Aa\\-aa\\-aa\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}\u${a}\L${a}" "Aa-Aa\\-aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}\u${a}\U${a}" "Aa-Aa\\-aa\\-aa\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}\u${a}\E${a}" "Aa-Aa\\-aa\\-aa\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}\u${a}\l${a}" "Aa-Aa\\-aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\L${a}\u${a}\u${a}" "Aa-Aa\\-aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}\Q${a}\Q${a}" "Aa-Aa\\-AA\\-AA\\\\\\-AA\\\\\\\\\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}\Q${a}\L${a}" "Aa-Aa\\-AA\\-AA\\\\\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}\Q${a}\U${a}" "Aa-Aa\\-AA\\-AA\\\\\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}\Q${a}\E${a}" "Aa-Aa\\-AA\\-AA\\\\\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}\Q${a}\l${a}" "Aa-Aa\\-AA\\-AA\\\\\\-AA\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}\Q${a}\u${a}" "Aa-Aa\\-AA\\-AA\\\\\\-AA\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}\L${a}\Q${a}" "Aa-Aa\\-AA\\-aa\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}\L${a}\L${a}" "Aa-Aa\\-AA\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}\L${a}\U${a}" "Aa-Aa\\-AA\\-aa\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}\L${a}\E${a}" "Aa-Aa\\-AA\\-aa\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}\L${a}\l${a}" "Aa-Aa\\-AA\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}\L${a}\u${a}" "Aa-Aa\\-AA\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}\U${a}\Q${a}" "Aa-Aa\\-AA\\-AA\\-AA\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}\U${a}\L${a}" "Aa-Aa\\-AA\\-AA\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}\U${a}\U${a}" "Aa-Aa\\-AA\\-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}\U${a}\E${a}" "Aa-Aa\\-AA\\-AA\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}\U${a}\l${a}" "Aa-Aa\\-AA\\-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}\U${a}\u${a}" "Aa-Aa\\-AA\\-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}\E${a}\Q${a}" "Aa-Aa\\-AA\\-Aa\\-Aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}\E${a}\L${a}" "Aa-Aa\\-AA\\-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}\E${a}\U${a}" "Aa-Aa\\-AA\\-Aa\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}\E${a}\E${a}" "Aa-Aa\\-AA\\-Aa\\-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}\E${a}\l${a}" "Aa-Aa\\-AA\\-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}\E${a}\u${a}" "Aa-Aa\\-AA\\-Aa\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}\l${a}\Q${a}" "Aa-Aa\\-AA\\-AA\\-AA\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}\l${a}\L${a}" "Aa-Aa\\-AA\\-AA\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}\l${a}\U${a}" "Aa-Aa\\-AA\\-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}\l${a}\E${a}" "Aa-Aa\\-AA\\-AA\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}\l${a}\l${a}" "Aa-Aa\\-AA\\-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}\l${a}\u${a}" "Aa-Aa\\-AA\\-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}\u${a}\Q${a}" "Aa-Aa\\-AA\\-AA\\-AA\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}\u${a}\L${a}" "Aa-Aa\\-AA\\-AA\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}\u${a}\U${a}" "Aa-Aa\\-AA\\-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}\u${a}\E${a}" "Aa-Aa\\-AA\\-AA\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}\u${a}\l${a}" "Aa-Aa\\-AA\\-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\U${a}\u${a}\u${a}" "Aa-Aa\\-AA\\-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}\Q${a}\Q${a}" "Aa-Aa\\-Aa-Aa\\-Aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}\Q${a}\L${a}" "Aa-Aa\\-Aa-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}\Q${a}\U${a}" "Aa-Aa\\-Aa-Aa\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}\Q${a}\E${a}" "Aa-Aa\\-Aa-Aa\\-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}\Q${a}\l${a}" "Aa-Aa\\-Aa-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}\Q${a}\u${a}" "Aa-Aa\\-Aa-Aa\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}\L${a}\Q${a}" "Aa-Aa\\-Aa-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}\L${a}\L${a}" "Aa-Aa\\-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}\L${a}\U${a}" "Aa-Aa\\-Aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}\L${a}\E${a}" "Aa-Aa\\-Aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}\L${a}\l${a}" "Aa-Aa\\-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}\L${a}\u${a}" "Aa-Aa\\-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}\U${a}\Q${a}" "Aa-Aa\\-Aa-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}\U${a}\L${a}" "Aa-Aa\\-Aa-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}\U${a}\U${a}" "Aa-Aa\\-Aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}\U${a}\E${a}" "Aa-Aa\\-Aa-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}\U${a}\l${a}" "Aa-Aa\\-Aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}\U${a}\u${a}" "Aa-Aa\\-Aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}\E${a}\Q${a}" "Aa-Aa\\-Aa-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}\E${a}\L${a}" "Aa-Aa\\-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}\E${a}\U${a}" "Aa-Aa\\-Aa-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}\E${a}\E${a}" "Aa-Aa\\-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}\E${a}\l${a}" "Aa-Aa\\-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}\E${a}\u${a}" "Aa-Aa\\-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}\l${a}\Q${a}" "Aa-Aa\\-Aa-aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}\l${a}\L${a}" "Aa-Aa\\-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}\l${a}\U${a}" "Aa-Aa\\-Aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}\l${a}\E${a}" "Aa-Aa\\-Aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}\l${a}\l${a}" "Aa-Aa\\-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}\l${a}\u${a}" "Aa-Aa\\-Aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}\u${a}\Q${a}" "Aa-Aa\\-Aa-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}\u${a}\L${a}" "Aa-Aa\\-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}\u${a}\U${a}" "Aa-Aa\\-Aa-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}\u${a}\E${a}" "Aa-Aa\\-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}\u${a}\l${a}" "Aa-Aa\\-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\E${a}\u${a}\u${a}" "Aa-Aa\\-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}\Q${a}\Q${a}" "Aa-Aa\\-aa\\-Aa\\\\\\-Aa\\\\\\\\\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}\Q${a}\L${a}" "Aa-Aa\\-aa\\-Aa\\\\\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}\Q${a}\U${a}" "Aa-Aa\\-aa\\-Aa\\\\\\-AA\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}\Q${a}\E${a}" "Aa-Aa\\-aa\\-Aa\\\\\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}\Q${a}\l${a}" "Aa-Aa\\-aa\\-Aa\\\\\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}\Q${a}\u${a}" "Aa-Aa\\-aa\\-Aa\\\\\\-Aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}\L${a}\Q${a}" "Aa-Aa\\-aa\\-aa\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}\L${a}\L${a}" "Aa-Aa\\-aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}\L${a}\U${a}" "Aa-Aa\\-aa\\-aa\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}\L${a}\E${a}" "Aa-Aa\\-aa\\-aa\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}\L${a}\l${a}" "Aa-Aa\\-aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}\L${a}\u${a}" "Aa-Aa\\-aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}\U${a}\Q${a}" "Aa-Aa\\-aa\\-AA\\-AA\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}\U${a}\L${a}" "Aa-Aa\\-aa\\-AA\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}\U${a}\U${a}" "Aa-Aa\\-aa\\-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}\U${a}\E${a}" "Aa-Aa\\-aa\\-AA\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}\U${a}\l${a}" "Aa-Aa\\-aa\\-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}\U${a}\u${a}" "Aa-Aa\\-aa\\-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}\E${a}\Q${a}" "Aa-Aa\\-aa\\-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}\E${a}\L${a}" "Aa-Aa\\-aa\\-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}\E${a}\U${a}" "Aa-Aa\\-aa\\-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}\E${a}\E${a}" "Aa-Aa\\-aa\\-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}\E${a}\l${a}" "Aa-Aa\\-aa\\-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}\E${a}\u${a}" "Aa-Aa\\-aa\\-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}\l${a}\Q${a}" "Aa-Aa\\-aa\\-aa\\-Aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}\l${a}\L${a}" "Aa-Aa\\-aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}\l${a}\U${a}" "Aa-Aa\\-aa\\-aa\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}\l${a}\E${a}" "Aa-Aa\\-aa\\-aa\\-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}\l${a}\l${a}" "Aa-Aa\\-aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}\l${a}\u${a}" "Aa-Aa\\-aa\\-aa\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}\u${a}\Q${a}" "Aa-Aa\\-aa\\-Aa\\-Aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}\u${a}\L${a}" "Aa-Aa\\-aa\\-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}\u${a}\U${a}" "Aa-Aa\\-aa\\-Aa\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}\u${a}\E${a}" "Aa-Aa\\-aa\\-Aa\\-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}\u${a}\l${a}" "Aa-Aa\\-aa\\-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\l${a}\u${a}\u${a}" "Aa-Aa\\-aa\\-Aa\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}\Q${a}\Q${a}" "Aa-Aa\\-Aa\\-Aa\\\\\\-Aa\\\\\\\\\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}\Q${a}\L${a}" "Aa-Aa\\-Aa\\-Aa\\\\\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}\Q${a}\U${a}" "Aa-Aa\\-Aa\\-Aa\\\\\\-AA\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}\Q${a}\E${a}" "Aa-Aa\\-Aa\\-Aa\\\\\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}\Q${a}\l${a}" "Aa-Aa\\-Aa\\-Aa\\\\\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}\Q${a}\u${a}" "Aa-Aa\\-Aa\\-Aa\\\\\\-Aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}\L${a}\Q${a}" "Aa-Aa\\-Aa\\-aa\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}\L${a}\L${a}" "Aa-Aa\\-Aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}\L${a}\U${a}" "Aa-Aa\\-Aa\\-aa\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}\L${a}\E${a}" "Aa-Aa\\-Aa\\-aa\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}\L${a}\l${a}" "Aa-Aa\\-Aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}\L${a}\u${a}" "Aa-Aa\\-Aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}\U${a}\Q${a}" "Aa-Aa\\-Aa\\-AA\\-AA\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}\U${a}\L${a}" "Aa-Aa\\-Aa\\-AA\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}\U${a}\U${a}" "Aa-Aa\\-Aa\\-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}\U${a}\E${a}" "Aa-Aa\\-Aa\\-AA\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}\U${a}\l${a}" "Aa-Aa\\-Aa\\-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}\U${a}\u${a}" "Aa-Aa\\-Aa\\-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}\E${a}\Q${a}" "Aa-Aa\\-Aa\\-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}\E${a}\L${a}" "Aa-Aa\\-Aa\\-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}\E${a}\U${a}" "Aa-Aa\\-Aa\\-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}\E${a}\E${a}" "Aa-Aa\\-Aa\\-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}\E${a}\l${a}" "Aa-Aa\\-Aa\\-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}\E${a}\u${a}" "Aa-Aa\\-Aa\\-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}\l${a}\Q${a}" "Aa-Aa\\-Aa\\-aa\\-Aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}\l${a}\L${a}" "Aa-Aa\\-Aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}\l${a}\U${a}" "Aa-Aa\\-Aa\\-aa\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}\l${a}\E${a}" "Aa-Aa\\-Aa\\-aa\\-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}\l${a}\l${a}" "Aa-Aa\\-Aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}\l${a}\u${a}" "Aa-Aa\\-Aa\\-aa\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}\u${a}\Q${a}" "Aa-Aa\\-Aa\\-Aa\\-Aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}\u${a}\L${a}" "Aa-Aa\\-Aa\\-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}\u${a}\U${a}" "Aa-Aa\\-Aa\\-Aa\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}\u${a}\E${a}" "Aa-Aa\\-Aa\\-Aa\\-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}\u${a}\l${a}" "Aa-Aa\\-Aa\\-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\Q${a}\u${a}\u${a}\u${a}" "Aa-Aa\\-Aa\\-Aa\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}\Q${a}\Q${a}" "Aa-aa-aa\\-aa\\\\\\-aa\\\\\\\\\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}\Q${a}\L${a}" "Aa-aa-aa\\-aa\\\\\\-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}\Q${a}\U${a}" "Aa-aa-aa\\-aa\\\\\\-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}\Q${a}\E${a}" "Aa-aa-aa\\-aa\\\\\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}\Q${a}\l${a}" "Aa-aa-aa\\-aa\\\\\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}\Q${a}\u${a}" "Aa-aa-aa\\-aa\\\\\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}\L${a}\Q${a}" "Aa-aa-aa\\-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}\L${a}\L${a}" "Aa-aa-aa\\-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}\L${a}\U${a}" "Aa-aa-aa\\-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}\L${a}\E${a}" "Aa-aa-aa\\-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}\L${a}\l${a}" "Aa-aa-aa\\-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}\L${a}\u${a}" "Aa-aa-aa\\-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}\U${a}\Q${a}" "Aa-aa-aa\\-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}\U${a}\L${a}" "Aa-aa-aa\\-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}\U${a}\U${a}" "Aa-aa-aa\\-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}\U${a}\E${a}" "Aa-aa-aa\\-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}\U${a}\l${a}" "Aa-aa-aa\\-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}\U${a}\u${a}" "Aa-aa-aa\\-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}\E${a}\Q${a}" "Aa-aa-aa\\-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}\E${a}\L${a}" "Aa-aa-aa\\-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}\E${a}\U${a}" "Aa-aa-aa\\-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}\E${a}\E${a}" "Aa-aa-aa\\-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}\E${a}\l${a}" "Aa-aa-aa\\-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}\E${a}\u${a}" "Aa-aa-aa\\-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}\l${a}\Q${a}" "Aa-aa-aa\\-aa\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}\l${a}\L${a}" "Aa-aa-aa\\-aa\\-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}\l${a}\U${a}" "Aa-aa-aa\\-aa\\-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}\l${a}\E${a}" "Aa-aa-aa\\-aa\\-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}\l${a}\l${a}" "Aa-aa-aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}\l${a}\u${a}" "Aa-aa-aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}\u${a}\Q${a}" "Aa-aa-aa\\-aa\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}\u${a}\L${a}" "Aa-aa-aa\\-aa\\-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}\u${a}\U${a}" "Aa-aa-aa\\-aa\\-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}\u${a}\E${a}" "Aa-aa-aa\\-aa\\-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}\u${a}\l${a}" "Aa-aa-aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\Q${a}\u${a}\u${a}" "Aa-aa-aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}\Q${a}\Q${a}" "Aa-aa-aa-aa\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}\Q${a}\L${a}" "Aa-aa-aa-aa\\-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}\Q${a}\U${a}" "Aa-aa-aa-aa\\-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}\Q${a}\E${a}" "Aa-aa-aa-aa\\-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}\Q${a}\l${a}" "Aa-aa-aa-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}\Q${a}\u${a}" "Aa-aa-aa-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}\L${a}\Q${a}" "Aa-aa-aa-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}\L${a}\L${a}" "Aa-aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}\L${a}\U${a}" "Aa-aa-aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}\L${a}\E${a}" "Aa-aa-aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}\L${a}\l${a}" "Aa-aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}\L${a}\u${a}" "Aa-aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}\U${a}\Q${a}" "Aa-aa-aa-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}\U${a}\L${a}" "Aa-aa-aa-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}\U${a}\U${a}" "Aa-aa-aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}\U${a}\E${a}" "Aa-aa-aa-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}\U${a}\l${a}" "Aa-aa-aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}\U${a}\u${a}" "Aa-aa-aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}\E${a}\Q${a}" "Aa-aa-aa-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}\E${a}\L${a}" "Aa-aa-aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}\E${a}\U${a}" "Aa-aa-aa-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}\E${a}\E${a}" "Aa-aa-aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}\E${a}\l${a}" "Aa-aa-aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}\E${a}\u${a}" "Aa-aa-aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}\l${a}\Q${a}" "Aa-aa-aa-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}\l${a}\L${a}" "Aa-aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}\l${a}\U${a}" "Aa-aa-aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}\l${a}\E${a}" "Aa-aa-aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}\l${a}\l${a}" "Aa-aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}\l${a}\u${a}" "Aa-aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}\u${a}\Q${a}" "Aa-aa-aa-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}\u${a}\L${a}" "Aa-aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}\u${a}\U${a}" "Aa-aa-aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}\u${a}\E${a}" "Aa-aa-aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}\u${a}\l${a}" "Aa-aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\L${a}\u${a}\u${a}" "Aa-aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}\Q${a}\Q${a}" "Aa-aa-AA-AA\\-AA\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}\Q${a}\L${a}" "Aa-aa-AA-AA\\-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}\Q${a}\U${a}" "Aa-aa-AA-AA\\-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}\Q${a}\E${a}" "Aa-aa-AA-AA\\-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}\Q${a}\l${a}" "Aa-aa-AA-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}\Q${a}\u${a}" "Aa-aa-AA-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}\L${a}\Q${a}" "Aa-aa-AA-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}\L${a}\L${a}" "Aa-aa-AA-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}\L${a}\U${a}" "Aa-aa-AA-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}\L${a}\E${a}" "Aa-aa-AA-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}\L${a}\l${a}" "Aa-aa-AA-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}\L${a}\u${a}" "Aa-aa-AA-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}\U${a}\Q${a}" "Aa-aa-AA-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}\U${a}\L${a}" "Aa-aa-AA-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}\U${a}\U${a}" "Aa-aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}\U${a}\E${a}" "Aa-aa-AA-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}\U${a}\l${a}" "Aa-aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}\U${a}\u${a}" "Aa-aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}\E${a}\Q${a}" "Aa-aa-AA-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}\E${a}\L${a}" "Aa-aa-AA-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}\E${a}\U${a}" "Aa-aa-AA-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}\E${a}\E${a}" "Aa-aa-AA-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}\E${a}\l${a}" "Aa-aa-AA-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}\E${a}\u${a}" "Aa-aa-AA-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}\l${a}\Q${a}" "Aa-aa-AA-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}\l${a}\L${a}" "Aa-aa-AA-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}\l${a}\U${a}" "Aa-aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}\l${a}\E${a}" "Aa-aa-AA-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}\l${a}\l${a}" "Aa-aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}\l${a}\u${a}" "Aa-aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}\u${a}\Q${a}" "Aa-aa-AA-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}\u${a}\L${a}" "Aa-aa-AA-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}\u${a}\U${a}" "Aa-aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}\u${a}\E${a}" "Aa-aa-AA-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}\u${a}\l${a}" "Aa-aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\U${a}\u${a}\u${a}" "Aa-aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}\Q${a}\Q${a}" "Aa-aa-Aa-Aa\\-Aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}\Q${a}\L${a}" "Aa-aa-Aa-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}\Q${a}\U${a}" "Aa-aa-Aa-Aa\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}\Q${a}\E${a}" "Aa-aa-Aa-Aa\\-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}\Q${a}\l${a}" "Aa-aa-Aa-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}\Q${a}\u${a}" "Aa-aa-Aa-Aa\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}\L${a}\Q${a}" "Aa-aa-Aa-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}\L${a}\L${a}" "Aa-aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}\L${a}\U${a}" "Aa-aa-Aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}\L${a}\E${a}" "Aa-aa-Aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}\L${a}\l${a}" "Aa-aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}\L${a}\u${a}" "Aa-aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}\U${a}\Q${a}" "Aa-aa-Aa-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}\U${a}\L${a}" "Aa-aa-Aa-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}\U${a}\U${a}" "Aa-aa-Aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}\U${a}\E${a}" "Aa-aa-Aa-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}\U${a}\l${a}" "Aa-aa-Aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}\U${a}\u${a}" "Aa-aa-Aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}\E${a}\Q${a}" "Aa-aa-Aa-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}\E${a}\L${a}" "Aa-aa-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}\E${a}\U${a}" "Aa-aa-Aa-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}\E${a}\E${a}" "Aa-aa-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}\E${a}\l${a}" "Aa-aa-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}\E${a}\u${a}" "Aa-aa-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}\l${a}\Q${a}" "Aa-aa-Aa-aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}\l${a}\L${a}" "Aa-aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}\l${a}\U${a}" "Aa-aa-Aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}\l${a}\E${a}" "Aa-aa-Aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}\l${a}\l${a}" "Aa-aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}\l${a}\u${a}" "Aa-aa-Aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}\u${a}\Q${a}" "Aa-aa-Aa-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}\u${a}\L${a}" "Aa-aa-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}\u${a}\U${a}" "Aa-aa-Aa-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}\u${a}\E${a}" "Aa-aa-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}\u${a}\l${a}" "Aa-aa-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\E${a}\u${a}\u${a}" "Aa-aa-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}\Q${a}\Q${a}" "Aa-aa-aa-aa\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}\Q${a}\L${a}" "Aa-aa-aa-aa\\-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}\Q${a}\U${a}" "Aa-aa-aa-aa\\-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}\Q${a}\E${a}" "Aa-aa-aa-aa\\-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}\Q${a}\l${a}" "Aa-aa-aa-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}\Q${a}\u${a}" "Aa-aa-aa-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}\L${a}\Q${a}" "Aa-aa-aa-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}\L${a}\L${a}" "Aa-aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}\L${a}\U${a}" "Aa-aa-aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}\L${a}\E${a}" "Aa-aa-aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}\L${a}\l${a}" "Aa-aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}\L${a}\u${a}" "Aa-aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}\U${a}\Q${a}" "Aa-aa-aa-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}\U${a}\L${a}" "Aa-aa-aa-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}\U${a}\U${a}" "Aa-aa-aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}\U${a}\E${a}" "Aa-aa-aa-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}\U${a}\l${a}" "Aa-aa-aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}\U${a}\u${a}" "Aa-aa-aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}\E${a}\Q${a}" "Aa-aa-aa-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}\E${a}\L${a}" "Aa-aa-aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}\E${a}\U${a}" "Aa-aa-aa-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}\E${a}\E${a}" "Aa-aa-aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}\E${a}\l${a}" "Aa-aa-aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}\E${a}\u${a}" "Aa-aa-aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}\l${a}\Q${a}" "Aa-aa-aa-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}\l${a}\L${a}" "Aa-aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}\l${a}\U${a}" "Aa-aa-aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}\l${a}\E${a}" "Aa-aa-aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}\l${a}\l${a}" "Aa-aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}\l${a}\u${a}" "Aa-aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}\u${a}\Q${a}" "Aa-aa-aa-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}\u${a}\L${a}" "Aa-aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}\u${a}\U${a}" "Aa-aa-aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}\u${a}\E${a}" "Aa-aa-aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}\u${a}\l${a}" "Aa-aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\l${a}\u${a}\u${a}" "Aa-aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}\Q${a}\Q${a}" "Aa-aa-aa-aa\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}\Q${a}\L${a}" "Aa-aa-aa-aa\\-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}\Q${a}\U${a}" "Aa-aa-aa-aa\\-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}\Q${a}\E${a}" "Aa-aa-aa-aa\\-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}\Q${a}\l${a}" "Aa-aa-aa-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}\Q${a}\u${a}" "Aa-aa-aa-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}\L${a}\Q${a}" "Aa-aa-aa-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}\L${a}\L${a}" "Aa-aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}\L${a}\U${a}" "Aa-aa-aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}\L${a}\E${a}" "Aa-aa-aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}\L${a}\l${a}" "Aa-aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}\L${a}\u${a}" "Aa-aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}\U${a}\Q${a}" "Aa-aa-aa-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}\U${a}\L${a}" "Aa-aa-aa-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}\U${a}\U${a}" "Aa-aa-aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}\U${a}\E${a}" "Aa-aa-aa-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}\U${a}\l${a}" "Aa-aa-aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}\U${a}\u${a}" "Aa-aa-aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}\E${a}\Q${a}" "Aa-aa-aa-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}\E${a}\L${a}" "Aa-aa-aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}\E${a}\U${a}" "Aa-aa-aa-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}\E${a}\E${a}" "Aa-aa-aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}\E${a}\l${a}" "Aa-aa-aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}\E${a}\u${a}" "Aa-aa-aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}\l${a}\Q${a}" "Aa-aa-aa-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}\l${a}\L${a}" "Aa-aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}\l${a}\U${a}" "Aa-aa-aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}\l${a}\E${a}" "Aa-aa-aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}\l${a}\l${a}" "Aa-aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}\l${a}\u${a}" "Aa-aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}\u${a}\Q${a}" "Aa-aa-aa-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}\u${a}\L${a}" "Aa-aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}\u${a}\U${a}" "Aa-aa-aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}\u${a}\E${a}" "Aa-aa-aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}\u${a}\l${a}" "Aa-aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\L${a}\u${a}\u${a}\u${a}" "Aa-aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}\Q${a}\Q${a}" "Aa-AA-AA\\-AA\\\\\\-AA\\\\\\\\\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}\Q${a}\L${a}" "Aa-AA-AA\\-AA\\\\\\-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}\Q${a}\U${a}" "Aa-AA-AA\\-AA\\\\\\-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}\Q${a}\E${a}" "Aa-AA-AA\\-AA\\\\\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}\Q${a}\l${a}" "Aa-AA-AA\\-AA\\\\\\-AA\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}\Q${a}\u${a}" "Aa-AA-AA\\-AA\\\\\\-AA\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}\L${a}\Q${a}" "Aa-AA-AA\\-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}\L${a}\L${a}" "Aa-AA-AA\\-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}\L${a}\U${a}" "Aa-AA-AA\\-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}\L${a}\E${a}" "Aa-AA-AA\\-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}\L${a}\l${a}" "Aa-AA-AA\\-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}\L${a}\u${a}" "Aa-AA-AA\\-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}\U${a}\Q${a}" "Aa-AA-AA\\-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}\U${a}\L${a}" "Aa-AA-AA\\-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}\U${a}\U${a}" "Aa-AA-AA\\-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}\U${a}\E${a}" "Aa-AA-AA\\-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}\U${a}\l${a}" "Aa-AA-AA\\-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}\U${a}\u${a}" "Aa-AA-AA\\-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}\E${a}\Q${a}" "Aa-AA-AA\\-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}\E${a}\L${a}" "Aa-AA-AA\\-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}\E${a}\U${a}" "Aa-AA-AA\\-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}\E${a}\E${a}" "Aa-AA-AA\\-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}\E${a}\l${a}" "Aa-AA-AA\\-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}\E${a}\u${a}" "Aa-AA-AA\\-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}\l${a}\Q${a}" "Aa-AA-AA\\-AA\\-AA\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}\l${a}\L${a}" "Aa-AA-AA\\-AA\\-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}\l${a}\U${a}" "Aa-AA-AA\\-AA\\-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}\l${a}\E${a}" "Aa-AA-AA\\-AA\\-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}\l${a}\l${a}" "Aa-AA-AA\\-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}\l${a}\u${a}" "Aa-AA-AA\\-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}\u${a}\Q${a}" "Aa-AA-AA\\-AA\\-AA\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}\u${a}\L${a}" "Aa-AA-AA\\-AA\\-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}\u${a}\U${a}" "Aa-AA-AA\\-AA\\-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}\u${a}\E${a}" "Aa-AA-AA\\-AA\\-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}\u${a}\l${a}" "Aa-AA-AA\\-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\Q${a}\u${a}\u${a}" "Aa-AA-AA\\-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}\Q${a}\Q${a}" "Aa-AA-aa-aa\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}\Q${a}\L${a}" "Aa-AA-aa-aa\\-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}\Q${a}\U${a}" "Aa-AA-aa-aa\\-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}\Q${a}\E${a}" "Aa-AA-aa-aa\\-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}\Q${a}\l${a}" "Aa-AA-aa-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}\Q${a}\u${a}" "Aa-AA-aa-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}\L${a}\Q${a}" "Aa-AA-aa-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}\L${a}\L${a}" "Aa-AA-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}\L${a}\U${a}" "Aa-AA-aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}\L${a}\E${a}" "Aa-AA-aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}\L${a}\l${a}" "Aa-AA-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}\L${a}\u${a}" "Aa-AA-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}\U${a}\Q${a}" "Aa-AA-aa-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}\U${a}\L${a}" "Aa-AA-aa-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}\U${a}\U${a}" "Aa-AA-aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}\U${a}\E${a}" "Aa-AA-aa-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}\U${a}\l${a}" "Aa-AA-aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}\U${a}\u${a}" "Aa-AA-aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}\E${a}\Q${a}" "Aa-AA-aa-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}\E${a}\L${a}" "Aa-AA-aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}\E${a}\U${a}" "Aa-AA-aa-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}\E${a}\E${a}" "Aa-AA-aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}\E${a}\l${a}" "Aa-AA-aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}\E${a}\u${a}" "Aa-AA-aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}\l${a}\Q${a}" "Aa-AA-aa-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}\l${a}\L${a}" "Aa-AA-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}\l${a}\U${a}" "Aa-AA-aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}\l${a}\E${a}" "Aa-AA-aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}\l${a}\l${a}" "Aa-AA-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}\l${a}\u${a}" "Aa-AA-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}\u${a}\Q${a}" "Aa-AA-aa-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}\u${a}\L${a}" "Aa-AA-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}\u${a}\U${a}" "Aa-AA-aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}\u${a}\E${a}" "Aa-AA-aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}\u${a}\l${a}" "Aa-AA-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\L${a}\u${a}\u${a}" "Aa-AA-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}\Q${a}\Q${a}" "Aa-AA-AA-AA\\-AA\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}\Q${a}\L${a}" "Aa-AA-AA-AA\\-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}\Q${a}\U${a}" "Aa-AA-AA-AA\\-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}\Q${a}\E${a}" "Aa-AA-AA-AA\\-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}\Q${a}\l${a}" "Aa-AA-AA-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}\Q${a}\u${a}" "Aa-AA-AA-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}\L${a}\Q${a}" "Aa-AA-AA-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}\L${a}\L${a}" "Aa-AA-AA-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}\L${a}\U${a}" "Aa-AA-AA-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}\L${a}\E${a}" "Aa-AA-AA-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}\L${a}\l${a}" "Aa-AA-AA-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}\L${a}\u${a}" "Aa-AA-AA-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}\U${a}\Q${a}" "Aa-AA-AA-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}\U${a}\L${a}" "Aa-AA-AA-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}\U${a}\U${a}" "Aa-AA-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}\U${a}\E${a}" "Aa-AA-AA-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}\U${a}\l${a}" "Aa-AA-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}\U${a}\u${a}" "Aa-AA-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}\E${a}\Q${a}" "Aa-AA-AA-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}\E${a}\L${a}" "Aa-AA-AA-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}\E${a}\U${a}" "Aa-AA-AA-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}\E${a}\E${a}" "Aa-AA-AA-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}\E${a}\l${a}" "Aa-AA-AA-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}\E${a}\u${a}" "Aa-AA-AA-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}\l${a}\Q${a}" "Aa-AA-AA-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}\l${a}\L${a}" "Aa-AA-AA-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}\l${a}\U${a}" "Aa-AA-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}\l${a}\E${a}" "Aa-AA-AA-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}\l${a}\l${a}" "Aa-AA-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}\l${a}\u${a}" "Aa-AA-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}\u${a}\Q${a}" "Aa-AA-AA-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}\u${a}\L${a}" "Aa-AA-AA-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}\u${a}\U${a}" "Aa-AA-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}\u${a}\E${a}" "Aa-AA-AA-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}\u${a}\l${a}" "Aa-AA-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\U${a}\u${a}\u${a}" "Aa-AA-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}\Q${a}\Q${a}" "Aa-AA-Aa-Aa\\-Aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}\Q${a}\L${a}" "Aa-AA-Aa-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}\Q${a}\U${a}" "Aa-AA-Aa-Aa\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}\Q${a}\E${a}" "Aa-AA-Aa-Aa\\-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}\Q${a}\l${a}" "Aa-AA-Aa-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}\Q${a}\u${a}" "Aa-AA-Aa-Aa\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}\L${a}\Q${a}" "Aa-AA-Aa-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}\L${a}\L${a}" "Aa-AA-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}\L${a}\U${a}" "Aa-AA-Aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}\L${a}\E${a}" "Aa-AA-Aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}\L${a}\l${a}" "Aa-AA-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}\L${a}\u${a}" "Aa-AA-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}\U${a}\Q${a}" "Aa-AA-Aa-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}\U${a}\L${a}" "Aa-AA-Aa-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}\U${a}\U${a}" "Aa-AA-Aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}\U${a}\E${a}" "Aa-AA-Aa-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}\U${a}\l${a}" "Aa-AA-Aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}\U${a}\u${a}" "Aa-AA-Aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}\E${a}\Q${a}" "Aa-AA-Aa-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}\E${a}\L${a}" "Aa-AA-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}\E${a}\U${a}" "Aa-AA-Aa-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}\E${a}\E${a}" "Aa-AA-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}\E${a}\l${a}" "Aa-AA-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}\E${a}\u${a}" "Aa-AA-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}\l${a}\Q${a}" "Aa-AA-Aa-aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}\l${a}\L${a}" "Aa-AA-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}\l${a}\U${a}" "Aa-AA-Aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}\l${a}\E${a}" "Aa-AA-Aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}\l${a}\l${a}" "Aa-AA-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}\l${a}\u${a}" "Aa-AA-Aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}\u${a}\Q${a}" "Aa-AA-Aa-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}\u${a}\L${a}" "Aa-AA-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}\u${a}\U${a}" "Aa-AA-Aa-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}\u${a}\E${a}" "Aa-AA-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}\u${a}\l${a}" "Aa-AA-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\E${a}\u${a}\u${a}" "Aa-AA-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}\Q${a}\Q${a}" "Aa-AA-AA-AA\\-AA\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}\Q${a}\L${a}" "Aa-AA-AA-AA\\-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}\Q${a}\U${a}" "Aa-AA-AA-AA\\-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}\Q${a}\E${a}" "Aa-AA-AA-AA\\-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}\Q${a}\l${a}" "Aa-AA-AA-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}\Q${a}\u${a}" "Aa-AA-AA-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}\L${a}\Q${a}" "Aa-AA-AA-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}\L${a}\L${a}" "Aa-AA-AA-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}\L${a}\U${a}" "Aa-AA-AA-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}\L${a}\E${a}" "Aa-AA-AA-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}\L${a}\l${a}" "Aa-AA-AA-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}\L${a}\u${a}" "Aa-AA-AA-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}\U${a}\Q${a}" "Aa-AA-AA-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}\U${a}\L${a}" "Aa-AA-AA-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}\U${a}\U${a}" "Aa-AA-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}\U${a}\E${a}" "Aa-AA-AA-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}\U${a}\l${a}" "Aa-AA-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}\U${a}\u${a}" "Aa-AA-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}\E${a}\Q${a}" "Aa-AA-AA-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}\E${a}\L${a}" "Aa-AA-AA-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}\E${a}\U${a}" "Aa-AA-AA-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}\E${a}\E${a}" "Aa-AA-AA-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}\E${a}\l${a}" "Aa-AA-AA-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}\E${a}\u${a}" "Aa-AA-AA-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}\l${a}\Q${a}" "Aa-AA-AA-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}\l${a}\L${a}" "Aa-AA-AA-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}\l${a}\U${a}" "Aa-AA-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}\l${a}\E${a}" "Aa-AA-AA-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}\l${a}\l${a}" "Aa-AA-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}\l${a}\u${a}" "Aa-AA-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}\u${a}\Q${a}" "Aa-AA-AA-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}\u${a}\L${a}" "Aa-AA-AA-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}\u${a}\U${a}" "Aa-AA-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}\u${a}\E${a}" "Aa-AA-AA-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}\u${a}\l${a}" "Aa-AA-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\l${a}\u${a}\u${a}" "Aa-AA-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}\Q${a}\Q${a}" "Aa-AA-AA-AA\\-AA\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}\Q${a}\L${a}" "Aa-AA-AA-AA\\-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}\Q${a}\U${a}" "Aa-AA-AA-AA\\-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}\Q${a}\E${a}" "Aa-AA-AA-AA\\-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}\Q${a}\l${a}" "Aa-AA-AA-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}\Q${a}\u${a}" "Aa-AA-AA-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}\L${a}\Q${a}" "Aa-AA-AA-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}\L${a}\L${a}" "Aa-AA-AA-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}\L${a}\U${a}" "Aa-AA-AA-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}\L${a}\E${a}" "Aa-AA-AA-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}\L${a}\l${a}" "Aa-AA-AA-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}\L${a}\u${a}" "Aa-AA-AA-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}\U${a}\Q${a}" "Aa-AA-AA-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}\U${a}\L${a}" "Aa-AA-AA-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}\U${a}\U${a}" "Aa-AA-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}\U${a}\E${a}" "Aa-AA-AA-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}\U${a}\l${a}" "Aa-AA-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}\U${a}\u${a}" "Aa-AA-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}\E${a}\Q${a}" "Aa-AA-AA-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}\E${a}\L${a}" "Aa-AA-AA-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}\E${a}\U${a}" "Aa-AA-AA-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}\E${a}\E${a}" "Aa-AA-AA-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}\E${a}\l${a}" "Aa-AA-AA-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}\E${a}\u${a}" "Aa-AA-AA-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}\l${a}\Q${a}" "Aa-AA-AA-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}\l${a}\L${a}" "Aa-AA-AA-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}\l${a}\U${a}" "Aa-AA-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}\l${a}\E${a}" "Aa-AA-AA-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}\l${a}\l${a}" "Aa-AA-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}\l${a}\u${a}" "Aa-AA-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}\u${a}\Q${a}" "Aa-AA-AA-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}\u${a}\L${a}" "Aa-AA-AA-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}\u${a}\U${a}" "Aa-AA-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}\u${a}\E${a}" "Aa-AA-AA-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}\u${a}\l${a}" "Aa-AA-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\U${a}\u${a}\u${a}\u${a}" "Aa-AA-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}\Q${a}\Q${a}" "Aa-Aa-Aa\\-Aa\\\\\\-Aa\\\\\\\\\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}\Q${a}\L${a}" "Aa-Aa-Aa\\-Aa\\\\\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}\Q${a}\U${a}" "Aa-Aa-Aa\\-Aa\\\\\\-AA\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}\Q${a}\E${a}" "Aa-Aa-Aa\\-Aa\\\\\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}\Q${a}\l${a}" "Aa-Aa-Aa\\-Aa\\\\\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}\Q${a}\u${a}" "Aa-Aa-Aa\\-Aa\\\\\\-Aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}\L${a}\Q${a}" "Aa-Aa-Aa\\-aa\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}\L${a}\L${a}" "Aa-Aa-Aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}\L${a}\U${a}" "Aa-Aa-Aa\\-aa\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}\L${a}\E${a}" "Aa-Aa-Aa\\-aa\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}\L${a}\l${a}" "Aa-Aa-Aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}\L${a}\u${a}" "Aa-Aa-Aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}\U${a}\Q${a}" "Aa-Aa-Aa\\-AA\\-AA\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}\U${a}\L${a}" "Aa-Aa-Aa\\-AA\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}\U${a}\U${a}" "Aa-Aa-Aa\\-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}\U${a}\E${a}" "Aa-Aa-Aa\\-AA\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}\U${a}\l${a}" "Aa-Aa-Aa\\-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}\U${a}\u${a}" "Aa-Aa-Aa\\-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}\E${a}\Q${a}" "Aa-Aa-Aa\\-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}\E${a}\L${a}" "Aa-Aa-Aa\\-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}\E${a}\U${a}" "Aa-Aa-Aa\\-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}\E${a}\E${a}" "Aa-Aa-Aa\\-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}\E${a}\l${a}" "Aa-Aa-Aa\\-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}\E${a}\u${a}" "Aa-Aa-Aa\\-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}\l${a}\Q${a}" "Aa-Aa-Aa\\-aa\\-Aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}\l${a}\L${a}" "Aa-Aa-Aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}\l${a}\U${a}" "Aa-Aa-Aa\\-aa\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}\l${a}\E${a}" "Aa-Aa-Aa\\-aa\\-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}\l${a}\l${a}" "Aa-Aa-Aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}\l${a}\u${a}" "Aa-Aa-Aa\\-aa\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}\u${a}\Q${a}" "Aa-Aa-Aa\\-Aa\\-Aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}\u${a}\L${a}" "Aa-Aa-Aa\\-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}\u${a}\U${a}" "Aa-Aa-Aa\\-Aa\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}\u${a}\E${a}" "Aa-Aa-Aa\\-Aa\\-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}\u${a}\l${a}" "Aa-Aa-Aa\\-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\Q${a}\u${a}\u${a}" "Aa-Aa-Aa\\-Aa\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}\Q${a}\Q${a}" "Aa-Aa-aa-aa\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}\Q${a}\L${a}" "Aa-Aa-aa-aa\\-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}\Q${a}\U${a}" "Aa-Aa-aa-aa\\-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}\Q${a}\E${a}" "Aa-Aa-aa-aa\\-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}\Q${a}\l${a}" "Aa-Aa-aa-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}\Q${a}\u${a}" "Aa-Aa-aa-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}\L${a}\Q${a}" "Aa-Aa-aa-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}\L${a}\L${a}" "Aa-Aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}\L${a}\U${a}" "Aa-Aa-aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}\L${a}\E${a}" "Aa-Aa-aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}\L${a}\l${a}" "Aa-Aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}\L${a}\u${a}" "Aa-Aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}\U${a}\Q${a}" "Aa-Aa-aa-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}\U${a}\L${a}" "Aa-Aa-aa-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}\U${a}\U${a}" "Aa-Aa-aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}\U${a}\E${a}" "Aa-Aa-aa-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}\U${a}\l${a}" "Aa-Aa-aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}\U${a}\u${a}" "Aa-Aa-aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}\E${a}\Q${a}" "Aa-Aa-aa-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}\E${a}\L${a}" "Aa-Aa-aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}\E${a}\U${a}" "Aa-Aa-aa-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}\E${a}\E${a}" "Aa-Aa-aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}\E${a}\l${a}" "Aa-Aa-aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}\E${a}\u${a}" "Aa-Aa-aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}\l${a}\Q${a}" "Aa-Aa-aa-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}\l${a}\L${a}" "Aa-Aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}\l${a}\U${a}" "Aa-Aa-aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}\l${a}\E${a}" "Aa-Aa-aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}\l${a}\l${a}" "Aa-Aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}\l${a}\u${a}" "Aa-Aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}\u${a}\Q${a}" "Aa-Aa-aa-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}\u${a}\L${a}" "Aa-Aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}\u${a}\U${a}" "Aa-Aa-aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}\u${a}\E${a}" "Aa-Aa-aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}\u${a}\l${a}" "Aa-Aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\L${a}\u${a}\u${a}" "Aa-Aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}\Q${a}\Q${a}" "Aa-Aa-AA-AA\\-AA\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}\Q${a}\L${a}" "Aa-Aa-AA-AA\\-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}\Q${a}\U${a}" "Aa-Aa-AA-AA\\-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}\Q${a}\E${a}" "Aa-Aa-AA-AA\\-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}\Q${a}\l${a}" "Aa-Aa-AA-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}\Q${a}\u${a}" "Aa-Aa-AA-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}\L${a}\Q${a}" "Aa-Aa-AA-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}\L${a}\L${a}" "Aa-Aa-AA-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}\L${a}\U${a}" "Aa-Aa-AA-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}\L${a}\E${a}" "Aa-Aa-AA-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}\L${a}\l${a}" "Aa-Aa-AA-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}\L${a}\u${a}" "Aa-Aa-AA-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}\U${a}\Q${a}" "Aa-Aa-AA-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}\U${a}\L${a}" "Aa-Aa-AA-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}\U${a}\U${a}" "Aa-Aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}\U${a}\E${a}" "Aa-Aa-AA-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}\U${a}\l${a}" "Aa-Aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}\U${a}\u${a}" "Aa-Aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}\E${a}\Q${a}" "Aa-Aa-AA-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}\E${a}\L${a}" "Aa-Aa-AA-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}\E${a}\U${a}" "Aa-Aa-AA-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}\E${a}\E${a}" "Aa-Aa-AA-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}\E${a}\l${a}" "Aa-Aa-AA-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}\E${a}\u${a}" "Aa-Aa-AA-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}\l${a}\Q${a}" "Aa-Aa-AA-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}\l${a}\L${a}" "Aa-Aa-AA-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}\l${a}\U${a}" "Aa-Aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}\l${a}\E${a}" "Aa-Aa-AA-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}\l${a}\l${a}" "Aa-Aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}\l${a}\u${a}" "Aa-Aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}\u${a}\Q${a}" "Aa-Aa-AA-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}\u${a}\L${a}" "Aa-Aa-AA-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}\u${a}\U${a}" "Aa-Aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}\u${a}\E${a}" "Aa-Aa-AA-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}\u${a}\l${a}" "Aa-Aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\U${a}\u${a}\u${a}" "Aa-Aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}\Q${a}\Q${a}" "Aa-Aa-Aa-Aa\\-Aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}\Q${a}\L${a}" "Aa-Aa-Aa-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}\Q${a}\U${a}" "Aa-Aa-Aa-Aa\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}\Q${a}\E${a}" "Aa-Aa-Aa-Aa\\-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}\Q${a}\l${a}" "Aa-Aa-Aa-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}\Q${a}\u${a}" "Aa-Aa-Aa-Aa\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}\L${a}\Q${a}" "Aa-Aa-Aa-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}\L${a}\L${a}" "Aa-Aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}\L${a}\U${a}" "Aa-Aa-Aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}\L${a}\E${a}" "Aa-Aa-Aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}\L${a}\l${a}" "Aa-Aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}\L${a}\u${a}" "Aa-Aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}\U${a}\Q${a}" "Aa-Aa-Aa-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}\U${a}\L${a}" "Aa-Aa-Aa-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}\U${a}\U${a}" "Aa-Aa-Aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}\U${a}\E${a}" "Aa-Aa-Aa-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}\U${a}\l${a}" "Aa-Aa-Aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}\U${a}\u${a}" "Aa-Aa-Aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}\E${a}\Q${a}" "Aa-Aa-Aa-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}\E${a}\L${a}" "Aa-Aa-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}\E${a}\U${a}" "Aa-Aa-Aa-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}\E${a}\E${a}" "Aa-Aa-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}\E${a}\l${a}" "Aa-Aa-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}\E${a}\u${a}" "Aa-Aa-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}\l${a}\Q${a}" "Aa-Aa-Aa-aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}\l${a}\L${a}" "Aa-Aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}\l${a}\U${a}" "Aa-Aa-Aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}\l${a}\E${a}" "Aa-Aa-Aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}\l${a}\l${a}" "Aa-Aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}\l${a}\u${a}" "Aa-Aa-Aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}\u${a}\Q${a}" "Aa-Aa-Aa-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}\u${a}\L${a}" "Aa-Aa-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}\u${a}\U${a}" "Aa-Aa-Aa-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}\u${a}\E${a}" "Aa-Aa-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}\u${a}\l${a}" "Aa-Aa-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\E${a}\u${a}\u${a}" "Aa-Aa-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}\Q${a}\Q${a}" "Aa-Aa-aa-Aa\\-Aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}\Q${a}\L${a}" "Aa-Aa-aa-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}\Q${a}\U${a}" "Aa-Aa-aa-Aa\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}\Q${a}\E${a}" "Aa-Aa-aa-Aa\\-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}\Q${a}\l${a}" "Aa-Aa-aa-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}\Q${a}\u${a}" "Aa-Aa-aa-Aa\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}\L${a}\Q${a}" "Aa-Aa-aa-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}\L${a}\L${a}" "Aa-Aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}\L${a}\U${a}" "Aa-Aa-aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}\L${a}\E${a}" "Aa-Aa-aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}\L${a}\l${a}" "Aa-Aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}\L${a}\u${a}" "Aa-Aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}\U${a}\Q${a}" "Aa-Aa-aa-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}\U${a}\L${a}" "Aa-Aa-aa-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}\U${a}\U${a}" "Aa-Aa-aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}\U${a}\E${a}" "Aa-Aa-aa-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}\U${a}\l${a}" "Aa-Aa-aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}\U${a}\u${a}" "Aa-Aa-aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}\E${a}\Q${a}" "Aa-Aa-aa-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}\E${a}\L${a}" "Aa-Aa-aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}\E${a}\U${a}" "Aa-Aa-aa-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}\E${a}\E${a}" "Aa-Aa-aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}\E${a}\l${a}" "Aa-Aa-aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}\E${a}\u${a}" "Aa-Aa-aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}\l${a}\Q${a}" "Aa-Aa-aa-aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}\l${a}\L${a}" "Aa-Aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}\l${a}\U${a}" "Aa-Aa-aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}\l${a}\E${a}" "Aa-Aa-aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}\l${a}\l${a}" "Aa-Aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}\l${a}\u${a}" "Aa-Aa-aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}\u${a}\Q${a}" "Aa-Aa-aa-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}\u${a}\L${a}" "Aa-Aa-aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}\u${a}\U${a}" "Aa-Aa-aa-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}\u${a}\E${a}" "Aa-Aa-aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}\u${a}\l${a}" "Aa-Aa-aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\l${a}\u${a}\u${a}" "Aa-Aa-aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}\Q${a}\Q${a}" "Aa-Aa-Aa-Aa\\-Aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}\Q${a}\L${a}" "Aa-Aa-Aa-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}\Q${a}\U${a}" "Aa-Aa-Aa-Aa\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}\Q${a}\E${a}" "Aa-Aa-Aa-Aa\\-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}\Q${a}\l${a}" "Aa-Aa-Aa-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}\Q${a}\u${a}" "Aa-Aa-Aa-Aa\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}\L${a}\Q${a}" "Aa-Aa-Aa-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}\L${a}\L${a}" "Aa-Aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}\L${a}\U${a}" "Aa-Aa-Aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}\L${a}\E${a}" "Aa-Aa-Aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}\L${a}\l${a}" "Aa-Aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}\L${a}\u${a}" "Aa-Aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}\U${a}\Q${a}" "Aa-Aa-Aa-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}\U${a}\L${a}" "Aa-Aa-Aa-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}\U${a}\U${a}" "Aa-Aa-Aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}\U${a}\E${a}" "Aa-Aa-Aa-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}\U${a}\l${a}" "Aa-Aa-Aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}\U${a}\u${a}" "Aa-Aa-Aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}\E${a}\Q${a}" "Aa-Aa-Aa-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}\E${a}\L${a}" "Aa-Aa-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}\E${a}\U${a}" "Aa-Aa-Aa-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}\E${a}\E${a}" "Aa-Aa-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}\E${a}\l${a}" "Aa-Aa-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}\E${a}\u${a}" "Aa-Aa-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}\l${a}\Q${a}" "Aa-Aa-Aa-aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}\l${a}\L${a}" "Aa-Aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}\l${a}\U${a}" "Aa-Aa-Aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}\l${a}\E${a}" "Aa-Aa-Aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}\l${a}\l${a}" "Aa-Aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}\l${a}\u${a}" "Aa-Aa-Aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}\u${a}\Q${a}" "Aa-Aa-Aa-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}\u${a}\L${a}" "Aa-Aa-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}\u${a}\U${a}" "Aa-Aa-Aa-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}\u${a}\E${a}" "Aa-Aa-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}\u${a}\l${a}" "Aa-Aa-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\E${a}\u${a}\u${a}\u${a}" "Aa-Aa-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}\Q${a}\Q${a}" "Aa-aa-Aa\\-Aa\\\\\\-Aa\\\\\\\\\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}\Q${a}\L${a}" "Aa-aa-Aa\\-Aa\\\\\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}\Q${a}\U${a}" "Aa-aa-Aa\\-Aa\\\\\\-AA\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}\Q${a}\E${a}" "Aa-aa-Aa\\-Aa\\\\\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}\Q${a}\l${a}" "Aa-aa-Aa\\-Aa\\\\\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}\Q${a}\u${a}" "Aa-aa-Aa\\-Aa\\\\\\-Aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}\L${a}\Q${a}" "Aa-aa-Aa\\-aa\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}\L${a}\L${a}" "Aa-aa-Aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}\L${a}\U${a}" "Aa-aa-Aa\\-aa\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}\L${a}\E${a}" "Aa-aa-Aa\\-aa\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}\L${a}\l${a}" "Aa-aa-Aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}\L${a}\u${a}" "Aa-aa-Aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}\U${a}\Q${a}" "Aa-aa-Aa\\-AA\\-AA\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}\U${a}\L${a}" "Aa-aa-Aa\\-AA\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}\U${a}\U${a}" "Aa-aa-Aa\\-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}\U${a}\E${a}" "Aa-aa-Aa\\-AA\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}\U${a}\l${a}" "Aa-aa-Aa\\-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}\U${a}\u${a}" "Aa-aa-Aa\\-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}\E${a}\Q${a}" "Aa-aa-Aa\\-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}\E${a}\L${a}" "Aa-aa-Aa\\-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}\E${a}\U${a}" "Aa-aa-Aa\\-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}\E${a}\E${a}" "Aa-aa-Aa\\-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}\E${a}\l${a}" "Aa-aa-Aa\\-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}\E${a}\u${a}" "Aa-aa-Aa\\-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}\l${a}\Q${a}" "Aa-aa-Aa\\-aa\\-Aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}\l${a}\L${a}" "Aa-aa-Aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}\l${a}\U${a}" "Aa-aa-Aa\\-aa\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}\l${a}\E${a}" "Aa-aa-Aa\\-aa\\-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}\l${a}\l${a}" "Aa-aa-Aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}\l${a}\u${a}" "Aa-aa-Aa\\-aa\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}\u${a}\Q${a}" "Aa-aa-Aa\\-Aa\\-Aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}\u${a}\L${a}" "Aa-aa-Aa\\-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}\u${a}\U${a}" "Aa-aa-Aa\\-Aa\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}\u${a}\E${a}" "Aa-aa-Aa\\-Aa\\-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}\u${a}\l${a}" "Aa-aa-Aa\\-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\Q${a}\u${a}\u${a}" "Aa-aa-Aa\\-Aa\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}\Q${a}\Q${a}" "Aa-aa-aa-aa\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}\Q${a}\L${a}" "Aa-aa-aa-aa\\-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}\Q${a}\U${a}" "Aa-aa-aa-aa\\-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}\Q${a}\E${a}" "Aa-aa-aa-aa\\-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}\Q${a}\l${a}" "Aa-aa-aa-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}\Q${a}\u${a}" "Aa-aa-aa-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}\L${a}\Q${a}" "Aa-aa-aa-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}\L${a}\L${a}" "Aa-aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}\L${a}\U${a}" "Aa-aa-aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}\L${a}\E${a}" "Aa-aa-aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}\L${a}\l${a}" "Aa-aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}\L${a}\u${a}" "Aa-aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}\U${a}\Q${a}" "Aa-aa-aa-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}\U${a}\L${a}" "Aa-aa-aa-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}\U${a}\U${a}" "Aa-aa-aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}\U${a}\E${a}" "Aa-aa-aa-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}\U${a}\l${a}" "Aa-aa-aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}\U${a}\u${a}" "Aa-aa-aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}\E${a}\Q${a}" "Aa-aa-aa-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}\E${a}\L${a}" "Aa-aa-aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}\E${a}\U${a}" "Aa-aa-aa-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}\E${a}\E${a}" "Aa-aa-aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}\E${a}\l${a}" "Aa-aa-aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}\E${a}\u${a}" "Aa-aa-aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}\l${a}\Q${a}" "Aa-aa-aa-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}\l${a}\L${a}" "Aa-aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}\l${a}\U${a}" "Aa-aa-aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}\l${a}\E${a}" "Aa-aa-aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}\l${a}\l${a}" "Aa-aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}\l${a}\u${a}" "Aa-aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}\u${a}\Q${a}" "Aa-aa-aa-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}\u${a}\L${a}" "Aa-aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}\u${a}\U${a}" "Aa-aa-aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}\u${a}\E${a}" "Aa-aa-aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}\u${a}\l${a}" "Aa-aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\L${a}\u${a}\u${a}" "Aa-aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}\Q${a}\Q${a}" "Aa-aa-AA-AA\\-AA\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}\Q${a}\L${a}" "Aa-aa-AA-AA\\-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}\Q${a}\U${a}" "Aa-aa-AA-AA\\-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}\Q${a}\E${a}" "Aa-aa-AA-AA\\-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}\Q${a}\l${a}" "Aa-aa-AA-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}\Q${a}\u${a}" "Aa-aa-AA-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}\L${a}\Q${a}" "Aa-aa-AA-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}\L${a}\L${a}" "Aa-aa-AA-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}\L${a}\U${a}" "Aa-aa-AA-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}\L${a}\E${a}" "Aa-aa-AA-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}\L${a}\l${a}" "Aa-aa-AA-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}\L${a}\u${a}" "Aa-aa-AA-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}\U${a}\Q${a}" "Aa-aa-AA-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}\U${a}\L${a}" "Aa-aa-AA-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}\U${a}\U${a}" "Aa-aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}\U${a}\E${a}" "Aa-aa-AA-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}\U${a}\l${a}" "Aa-aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}\U${a}\u${a}" "Aa-aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}\E${a}\Q${a}" "Aa-aa-AA-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}\E${a}\L${a}" "Aa-aa-AA-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}\E${a}\U${a}" "Aa-aa-AA-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}\E${a}\E${a}" "Aa-aa-AA-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}\E${a}\l${a}" "Aa-aa-AA-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}\E${a}\u${a}" "Aa-aa-AA-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}\l${a}\Q${a}" "Aa-aa-AA-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}\l${a}\L${a}" "Aa-aa-AA-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}\l${a}\U${a}" "Aa-aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}\l${a}\E${a}" "Aa-aa-AA-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}\l${a}\l${a}" "Aa-aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}\l${a}\u${a}" "Aa-aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}\u${a}\Q${a}" "Aa-aa-AA-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}\u${a}\L${a}" "Aa-aa-AA-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}\u${a}\U${a}" "Aa-aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}\u${a}\E${a}" "Aa-aa-AA-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}\u${a}\l${a}" "Aa-aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\U${a}\u${a}\u${a}" "Aa-aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}\Q${a}\Q${a}" "Aa-aa-Aa-Aa\\-Aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}\Q${a}\L${a}" "Aa-aa-Aa-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}\Q${a}\U${a}" "Aa-aa-Aa-Aa\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}\Q${a}\E${a}" "Aa-aa-Aa-Aa\\-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}\Q${a}\l${a}" "Aa-aa-Aa-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}\Q${a}\u${a}" "Aa-aa-Aa-Aa\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}\L${a}\Q${a}" "Aa-aa-Aa-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}\L${a}\L${a}" "Aa-aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}\L${a}\U${a}" "Aa-aa-Aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}\L${a}\E${a}" "Aa-aa-Aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}\L${a}\l${a}" "Aa-aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}\L${a}\u${a}" "Aa-aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}\U${a}\Q${a}" "Aa-aa-Aa-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}\U${a}\L${a}" "Aa-aa-Aa-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}\U${a}\U${a}" "Aa-aa-Aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}\U${a}\E${a}" "Aa-aa-Aa-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}\U${a}\l${a}" "Aa-aa-Aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}\U${a}\u${a}" "Aa-aa-Aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}\E${a}\Q${a}" "Aa-aa-Aa-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}\E${a}\L${a}" "Aa-aa-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}\E${a}\U${a}" "Aa-aa-Aa-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}\E${a}\E${a}" "Aa-aa-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}\E${a}\l${a}" "Aa-aa-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}\E${a}\u${a}" "Aa-aa-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}\l${a}\Q${a}" "Aa-aa-Aa-aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}\l${a}\L${a}" "Aa-aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}\l${a}\U${a}" "Aa-aa-Aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}\l${a}\E${a}" "Aa-aa-Aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}\l${a}\l${a}" "Aa-aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}\l${a}\u${a}" "Aa-aa-Aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}\u${a}\Q${a}" "Aa-aa-Aa-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}\u${a}\L${a}" "Aa-aa-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}\u${a}\U${a}" "Aa-aa-Aa-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}\u${a}\E${a}" "Aa-aa-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}\u${a}\l${a}" "Aa-aa-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\E${a}\u${a}\u${a}" "Aa-aa-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}\Q${a}\Q${a}" "Aa-aa-aa-Aa\\-Aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}\Q${a}\L${a}" "Aa-aa-aa-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}\Q${a}\U${a}" "Aa-aa-aa-Aa\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}\Q${a}\E${a}" "Aa-aa-aa-Aa\\-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}\Q${a}\l${a}" "Aa-aa-aa-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}\Q${a}\u${a}" "Aa-aa-aa-Aa\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}\L${a}\Q${a}" "Aa-aa-aa-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}\L${a}\L${a}" "Aa-aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}\L${a}\U${a}" "Aa-aa-aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}\L${a}\E${a}" "Aa-aa-aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}\L${a}\l${a}" "Aa-aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}\L${a}\u${a}" "Aa-aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}\U${a}\Q${a}" "Aa-aa-aa-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}\U${a}\L${a}" "Aa-aa-aa-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}\U${a}\U${a}" "Aa-aa-aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}\U${a}\E${a}" "Aa-aa-aa-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}\U${a}\l${a}" "Aa-aa-aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}\U${a}\u${a}" "Aa-aa-aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}\E${a}\Q${a}" "Aa-aa-aa-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}\E${a}\L${a}" "Aa-aa-aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}\E${a}\U${a}" "Aa-aa-aa-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}\E${a}\E${a}" "Aa-aa-aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}\E${a}\l${a}" "Aa-aa-aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}\E${a}\u${a}" "Aa-aa-aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}\l${a}\Q${a}" "Aa-aa-aa-aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}\l${a}\L${a}" "Aa-aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}\l${a}\U${a}" "Aa-aa-aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}\l${a}\E${a}" "Aa-aa-aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}\l${a}\l${a}" "Aa-aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}\l${a}\u${a}" "Aa-aa-aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}\u${a}\Q${a}" "Aa-aa-aa-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}\u${a}\L${a}" "Aa-aa-aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}\u${a}\U${a}" "Aa-aa-aa-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}\u${a}\E${a}" "Aa-aa-aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}\u${a}\l${a}" "Aa-aa-aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\l${a}\u${a}\u${a}" "Aa-aa-aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}\Q${a}\Q${a}" "Aa-aa-Aa-Aa\\-Aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}\Q${a}\L${a}" "Aa-aa-Aa-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}\Q${a}\U${a}" "Aa-aa-Aa-Aa\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}\Q${a}\E${a}" "Aa-aa-Aa-Aa\\-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}\Q${a}\l${a}" "Aa-aa-Aa-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}\Q${a}\u${a}" "Aa-aa-Aa-Aa\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}\L${a}\Q${a}" "Aa-aa-Aa-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}\L${a}\L${a}" "Aa-aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}\L${a}\U${a}" "Aa-aa-Aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}\L${a}\E${a}" "Aa-aa-Aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}\L${a}\l${a}" "Aa-aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}\L${a}\u${a}" "Aa-aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}\U${a}\Q${a}" "Aa-aa-Aa-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}\U${a}\L${a}" "Aa-aa-Aa-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}\U${a}\U${a}" "Aa-aa-Aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}\U${a}\E${a}" "Aa-aa-Aa-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}\U${a}\l${a}" "Aa-aa-Aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}\U${a}\u${a}" "Aa-aa-Aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}\E${a}\Q${a}" "Aa-aa-Aa-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}\E${a}\L${a}" "Aa-aa-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}\E${a}\U${a}" "Aa-aa-Aa-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}\E${a}\E${a}" "Aa-aa-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}\E${a}\l${a}" "Aa-aa-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}\E${a}\u${a}" "Aa-aa-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}\l${a}\Q${a}" "Aa-aa-Aa-aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}\l${a}\L${a}" "Aa-aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}\l${a}\U${a}" "Aa-aa-Aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}\l${a}\E${a}" "Aa-aa-Aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}\l${a}\l${a}" "Aa-aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}\l${a}\u${a}" "Aa-aa-Aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}\u${a}\Q${a}" "Aa-aa-Aa-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}\u${a}\L${a}" "Aa-aa-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}\u${a}\U${a}" "Aa-aa-Aa-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}\u${a}\E${a}" "Aa-aa-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}\u${a}\l${a}" "Aa-aa-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\l${a}\u${a}\u${a}\u${a}" "Aa-aa-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}\Q${a}\Q${a}" "Aa-Aa-Aa\\-Aa\\\\\\-Aa\\\\\\\\\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}\Q${a}\L${a}" "Aa-Aa-Aa\\-Aa\\\\\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}\Q${a}\U${a}" "Aa-Aa-Aa\\-Aa\\\\\\-AA\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}\Q${a}\E${a}" "Aa-Aa-Aa\\-Aa\\\\\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}\Q${a}\l${a}" "Aa-Aa-Aa\\-Aa\\\\\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}\Q${a}\u${a}" "Aa-Aa-Aa\\-Aa\\\\\\-Aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}\L${a}\Q${a}" "Aa-Aa-Aa\\-aa\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}\L${a}\L${a}" "Aa-Aa-Aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}\L${a}\U${a}" "Aa-Aa-Aa\\-aa\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}\L${a}\E${a}" "Aa-Aa-Aa\\-aa\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}\L${a}\l${a}" "Aa-Aa-Aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}\L${a}\u${a}" "Aa-Aa-Aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}\U${a}\Q${a}" "Aa-Aa-Aa\\-AA\\-AA\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}\U${a}\L${a}" "Aa-Aa-Aa\\-AA\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}\U${a}\U${a}" "Aa-Aa-Aa\\-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}\U${a}\E${a}" "Aa-Aa-Aa\\-AA\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}\U${a}\l${a}" "Aa-Aa-Aa\\-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}\U${a}\u${a}" "Aa-Aa-Aa\\-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}\E${a}\Q${a}" "Aa-Aa-Aa\\-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}\E${a}\L${a}" "Aa-Aa-Aa\\-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}\E${a}\U${a}" "Aa-Aa-Aa\\-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}\E${a}\E${a}" "Aa-Aa-Aa\\-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}\E${a}\l${a}" "Aa-Aa-Aa\\-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}\E${a}\u${a}" "Aa-Aa-Aa\\-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}\l${a}\Q${a}" "Aa-Aa-Aa\\-aa\\-Aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}\l${a}\L${a}" "Aa-Aa-Aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}\l${a}\U${a}" "Aa-Aa-Aa\\-aa\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}\l${a}\E${a}" "Aa-Aa-Aa\\-aa\\-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}\l${a}\l${a}" "Aa-Aa-Aa\\-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}\l${a}\u${a}" "Aa-Aa-Aa\\-aa\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}\u${a}\Q${a}" "Aa-Aa-Aa\\-Aa\\-Aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}\u${a}\L${a}" "Aa-Aa-Aa\\-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}\u${a}\U${a}" "Aa-Aa-Aa\\-Aa\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}\u${a}\E${a}" "Aa-Aa-Aa\\-Aa\\-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}\u${a}\l${a}" "Aa-Aa-Aa\\-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\Q${a}\u${a}\u${a}" "Aa-Aa-Aa\\-Aa\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}\Q${a}\Q${a}" "Aa-Aa-aa-aa\\-aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}\Q${a}\L${a}" "Aa-Aa-aa-aa\\-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}\Q${a}\U${a}" "Aa-Aa-aa-aa\\-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}\Q${a}\E${a}" "Aa-Aa-aa-aa\\-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}\Q${a}\l${a}" "Aa-Aa-aa-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}\Q${a}\u${a}" "Aa-Aa-aa-aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}\L${a}\Q${a}" "Aa-Aa-aa-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}\L${a}\L${a}" "Aa-Aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}\L${a}\U${a}" "Aa-Aa-aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}\L${a}\E${a}" "Aa-Aa-aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}\L${a}\l${a}" "Aa-Aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}\L${a}\u${a}" "Aa-Aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}\U${a}\Q${a}" "Aa-Aa-aa-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}\U${a}\L${a}" "Aa-Aa-aa-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}\U${a}\U${a}" "Aa-Aa-aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}\U${a}\E${a}" "Aa-Aa-aa-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}\U${a}\l${a}" "Aa-Aa-aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}\U${a}\u${a}" "Aa-Aa-aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}\E${a}\Q${a}" "Aa-Aa-aa-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}\E${a}\L${a}" "Aa-Aa-aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}\E${a}\U${a}" "Aa-Aa-aa-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}\E${a}\E${a}" "Aa-Aa-aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}\E${a}\l${a}" "Aa-Aa-aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}\E${a}\u${a}" "Aa-Aa-aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}\l${a}\Q${a}" "Aa-Aa-aa-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}\l${a}\L${a}" "Aa-Aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}\l${a}\U${a}" "Aa-Aa-aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}\l${a}\E${a}" "Aa-Aa-aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}\l${a}\l${a}" "Aa-Aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}\l${a}\u${a}" "Aa-Aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}\u${a}\Q${a}" "Aa-Aa-aa-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}\u${a}\L${a}" "Aa-Aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}\u${a}\U${a}" "Aa-Aa-aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}\u${a}\E${a}" "Aa-Aa-aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}\u${a}\l${a}" "Aa-Aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\L${a}\u${a}\u${a}" "Aa-Aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}\Q${a}\Q${a}" "Aa-Aa-AA-AA\\-AA\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}\Q${a}\L${a}" "Aa-Aa-AA-AA\\-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}\Q${a}\U${a}" "Aa-Aa-AA-AA\\-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}\Q${a}\E${a}" "Aa-Aa-AA-AA\\-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}\Q${a}\l${a}" "Aa-Aa-AA-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}\Q${a}\u${a}" "Aa-Aa-AA-AA\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}\L${a}\Q${a}" "Aa-Aa-AA-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}\L${a}\L${a}" "Aa-Aa-AA-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}\L${a}\U${a}" "Aa-Aa-AA-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}\L${a}\E${a}" "Aa-Aa-AA-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}\L${a}\l${a}" "Aa-Aa-AA-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}\L${a}\u${a}" "Aa-Aa-AA-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}\U${a}\Q${a}" "Aa-Aa-AA-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}\U${a}\L${a}" "Aa-Aa-AA-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}\U${a}\U${a}" "Aa-Aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}\U${a}\E${a}" "Aa-Aa-AA-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}\U${a}\l${a}" "Aa-Aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}\U${a}\u${a}" "Aa-Aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}\E${a}\Q${a}" "Aa-Aa-AA-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}\E${a}\L${a}" "Aa-Aa-AA-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}\E${a}\U${a}" "Aa-Aa-AA-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}\E${a}\E${a}" "Aa-Aa-AA-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}\E${a}\l${a}" "Aa-Aa-AA-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}\E${a}\u${a}" "Aa-Aa-AA-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}\l${a}\Q${a}" "Aa-Aa-AA-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}\l${a}\L${a}" "Aa-Aa-AA-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}\l${a}\U${a}" "Aa-Aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}\l${a}\E${a}" "Aa-Aa-AA-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}\l${a}\l${a}" "Aa-Aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}\l${a}\u${a}" "Aa-Aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}\u${a}\Q${a}" "Aa-Aa-AA-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}\u${a}\L${a}" "Aa-Aa-AA-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}\u${a}\U${a}" "Aa-Aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}\u${a}\E${a}" "Aa-Aa-AA-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}\u${a}\l${a}" "Aa-Aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\U${a}\u${a}\u${a}" "Aa-Aa-AA-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}\Q${a}\Q${a}" "Aa-Aa-Aa-Aa\\-Aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}\Q${a}\L${a}" "Aa-Aa-Aa-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}\Q${a}\U${a}" "Aa-Aa-Aa-Aa\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}\Q${a}\E${a}" "Aa-Aa-Aa-Aa\\-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}\Q${a}\l${a}" "Aa-Aa-Aa-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}\Q${a}\u${a}" "Aa-Aa-Aa-Aa\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}\L${a}\Q${a}" "Aa-Aa-Aa-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}\L${a}\L${a}" "Aa-Aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}\L${a}\U${a}" "Aa-Aa-Aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}\L${a}\E${a}" "Aa-Aa-Aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}\L${a}\l${a}" "Aa-Aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}\L${a}\u${a}" "Aa-Aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}\U${a}\Q${a}" "Aa-Aa-Aa-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}\U${a}\L${a}" "Aa-Aa-Aa-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}\U${a}\U${a}" "Aa-Aa-Aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}\U${a}\E${a}" "Aa-Aa-Aa-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}\U${a}\l${a}" "Aa-Aa-Aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}\U${a}\u${a}" "Aa-Aa-Aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}\E${a}\Q${a}" "Aa-Aa-Aa-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}\E${a}\L${a}" "Aa-Aa-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}\E${a}\U${a}" "Aa-Aa-Aa-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}\E${a}\E${a}" "Aa-Aa-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}\E${a}\l${a}" "Aa-Aa-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}\E${a}\u${a}" "Aa-Aa-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}\l${a}\Q${a}" "Aa-Aa-Aa-aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}\l${a}\L${a}" "Aa-Aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}\l${a}\U${a}" "Aa-Aa-Aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}\l${a}\E${a}" "Aa-Aa-Aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}\l${a}\l${a}" "Aa-Aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}\l${a}\u${a}" "Aa-Aa-Aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}\u${a}\Q${a}" "Aa-Aa-Aa-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}\u${a}\L${a}" "Aa-Aa-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}\u${a}\U${a}" "Aa-Aa-Aa-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}\u${a}\E${a}" "Aa-Aa-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}\u${a}\l${a}" "Aa-Aa-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\E${a}\u${a}\u${a}" "Aa-Aa-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}\Q${a}\Q${a}" "Aa-Aa-aa-Aa\\-Aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}\Q${a}\L${a}" "Aa-Aa-aa-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}\Q${a}\U${a}" "Aa-Aa-aa-Aa\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}\Q${a}\E${a}" "Aa-Aa-aa-Aa\\-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}\Q${a}\l${a}" "Aa-Aa-aa-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}\Q${a}\u${a}" "Aa-Aa-aa-Aa\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}\L${a}\Q${a}" "Aa-Aa-aa-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}\L${a}\L${a}" "Aa-Aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}\L${a}\U${a}" "Aa-Aa-aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}\L${a}\E${a}" "Aa-Aa-aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}\L${a}\l${a}" "Aa-Aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}\L${a}\u${a}" "Aa-Aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}\U${a}\Q${a}" "Aa-Aa-aa-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}\U${a}\L${a}" "Aa-Aa-aa-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}\U${a}\U${a}" "Aa-Aa-aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}\U${a}\E${a}" "Aa-Aa-aa-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}\U${a}\l${a}" "Aa-Aa-aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}\U${a}\u${a}" "Aa-Aa-aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}\E${a}\Q${a}" "Aa-Aa-aa-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}\E${a}\L${a}" "Aa-Aa-aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}\E${a}\U${a}" "Aa-Aa-aa-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}\E${a}\E${a}" "Aa-Aa-aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}\E${a}\l${a}" "Aa-Aa-aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}\E${a}\u${a}" "Aa-Aa-aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}\l${a}\Q${a}" "Aa-Aa-aa-aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}\l${a}\L${a}" "Aa-Aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}\l${a}\U${a}" "Aa-Aa-aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}\l${a}\E${a}" "Aa-Aa-aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}\l${a}\l${a}" "Aa-Aa-aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}\l${a}\u${a}" "Aa-Aa-aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}\u${a}\Q${a}" "Aa-Aa-aa-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}\u${a}\L${a}" "Aa-Aa-aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}\u${a}\U${a}" "Aa-Aa-aa-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}\u${a}\E${a}" "Aa-Aa-aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}\u${a}\l${a}" "Aa-Aa-aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\l${a}\u${a}\u${a}" "Aa-Aa-aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}\Q${a}\Q${a}" "Aa-Aa-Aa-Aa\\-Aa\\\\\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}\Q${a}\L${a}" "Aa-Aa-Aa-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}\Q${a}\U${a}" "Aa-Aa-Aa-Aa\\-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}\Q${a}\E${a}" "Aa-Aa-Aa-Aa\\-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}\Q${a}\l${a}" "Aa-Aa-Aa-Aa\\-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}\Q${a}\u${a}" "Aa-Aa-Aa-Aa\\-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}\L${a}\Q${a}" "Aa-Aa-Aa-aa-aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}\L${a}\L${a}" "Aa-Aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}\L${a}\U${a}" "Aa-Aa-Aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}\L${a}\E${a}" "Aa-Aa-Aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}\L${a}\l${a}" "Aa-Aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}\L${a}\u${a}" "Aa-Aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}\U${a}\Q${a}" "Aa-Aa-Aa-AA-AA\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}\U${a}\L${a}" "Aa-Aa-Aa-AA-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}\U${a}\U${a}" "Aa-Aa-Aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}\U${a}\E${a}" "Aa-Aa-Aa-AA-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}\U${a}\l${a}" "Aa-Aa-Aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}\U${a}\u${a}" "Aa-Aa-Aa-AA-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}\E${a}\Q${a}" "Aa-Aa-Aa-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}\E${a}\L${a}" "Aa-Aa-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}\E${a}\U${a}" "Aa-Aa-Aa-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}\E${a}\E${a}" "Aa-Aa-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}\E${a}\l${a}" "Aa-Aa-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}\E${a}\u${a}" "Aa-Aa-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}\l${a}\Q${a}" "Aa-Aa-Aa-aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}\l${a}\L${a}" "Aa-Aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}\l${a}\U${a}" "Aa-Aa-Aa-aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}\l${a}\E${a}" "Aa-Aa-Aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}\l${a}\l${a}" "Aa-Aa-Aa-aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}\l${a}\u${a}" "Aa-Aa-Aa-aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}\u${a}\Q${a}" "Aa-Aa-Aa-Aa-Aa\\-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}\u${a}\L${a}" "Aa-Aa-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}\u${a}\U${a}" "Aa-Aa-Aa-Aa-AA-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}\u${a}\E${a}" "Aa-Aa-Aa-Aa-Aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}\u${a}\l${a}" "Aa-Aa-Aa-Aa-aa-"))
+(let ((a "Aa-"))
+ (test #?"${a}\u${a}\u${a}\u${a}\u${a}" "Aa-Aa-Aa-Aa-Aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}" "aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}" "aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}" "aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}" "aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}" "aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}" "aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}" "aA-aA\\-aA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}" "aA-aA\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}" "aA-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}" "aA-aA\\-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}" "aA-aA\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}" "aA-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}" "aA-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}" "aA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}" "aA-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}" "aA-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}" "aA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}" "aA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}" "aA-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}" "aA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}" "aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}" "aA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}" "aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}" "aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}" "aA-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}" "aA-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}" "aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}" "aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}" "aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}" "aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}" "aA-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}" "aA-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}" "aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}" "aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}" "aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}" "aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}" "aA-AA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}" "aA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}" "aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}" "aA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}" "aA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}" "aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}\Q${a}" "aA-aA\\-aA\\\\\\-aA\\\\\\\\\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}\L${a}" "aA-aA\\-aA\\\\\\-aa\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}\U${a}" "aA-aA\\-aA\\\\\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}\E${a}" "aA-aA\\-aA\\\\\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}\l${a}" "aA-aA\\-aA\\\\\\-aA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}\u${a}" "aA-aA\\-aA\\\\\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}\Q${a}" "aA-aA\\-aa\\-aa\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}\L${a}" "aA-aA\\-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}\U${a}" "aA-aA\\-aa\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}\E${a}" "aA-aA\\-aa\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}\l${a}" "aA-aA\\-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}\u${a}" "aA-aA\\-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}\Q${a}" "aA-aA\\-AA\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}\L${a}" "aA-aA\\-AA\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}\U${a}" "aA-aA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}\E${a}" "aA-aA\\-AA\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}\l${a}" "aA-aA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}\u${a}" "aA-aA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}\Q${a}" "aA-aA\\-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}\L${a}" "aA-aA\\-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}\U${a}" "aA-aA\\-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}\E${a}" "aA-aA\\-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}\l${a}" "aA-aA\\-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}\u${a}" "aA-aA\\-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}\Q${a}" "aA-aA\\-aA\\-aA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}\L${a}" "aA-aA\\-aA\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}\U${a}" "aA-aA\\-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}\E${a}" "aA-aA\\-aA\\-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}\l${a}" "aA-aA\\-aA\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}\u${a}" "aA-aA\\-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}\Q${a}" "aA-aA\\-AA\\-aA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}\L${a}" "aA-aA\\-AA\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}\U${a}" "aA-aA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}\E${a}" "aA-aA\\-AA\\-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}\l${a}" "aA-aA\\-AA\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}\u${a}" "aA-aA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}\Q${a}" "aA-aa-aa\\-aa\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}\L${a}" "aA-aa-aa\\-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}\U${a}" "aA-aa-aa\\-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}\E${a}" "aA-aa-aa\\-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}\l${a}" "aA-aa-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}\u${a}" "aA-aa-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}\Q${a}" "aA-aa-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}\L${a}" "aA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}\U${a}" "aA-aa-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}\E${a}" "aA-aa-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}\l${a}" "aA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}\u${a}" "aA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}\Q${a}" "aA-aa-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}\L${a}" "aA-aa-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}\U${a}" "aA-aa-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}\E${a}" "aA-aa-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}\l${a}" "aA-aa-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}\u${a}" "aA-aa-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}\Q${a}" "aA-aa-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}\L${a}" "aA-aa-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}\U${a}" "aA-aa-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}\E${a}" "aA-aa-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}\l${a}" "aA-aa-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}\u${a}" "aA-aa-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}\Q${a}" "aA-aa-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}\L${a}" "aA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}\U${a}" "aA-aa-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}\E${a}" "aA-aa-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}\l${a}" "aA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}\u${a}" "aA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}\Q${a}" "aA-aa-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}\L${a}" "aA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}\U${a}" "aA-aa-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}\E${a}" "aA-aa-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}\l${a}" "aA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}\u${a}" "aA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}\Q${a}" "aA-AA-AA\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}\L${a}" "aA-AA-AA\\-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}\U${a}" "aA-AA-AA\\-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}\E${a}" "aA-AA-AA\\-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}\l${a}" "aA-AA-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}\u${a}" "aA-AA-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}\Q${a}" "aA-AA-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}\L${a}" "aA-AA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}\U${a}" "aA-AA-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}\E${a}" "aA-AA-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}\l${a}" "aA-AA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}\u${a}" "aA-AA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}\Q${a}" "aA-AA-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}\L${a}" "aA-AA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}\U${a}" "aA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}\E${a}" "aA-AA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}\l${a}" "aA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}\u${a}" "aA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}\Q${a}" "aA-AA-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}\L${a}" "aA-AA-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}\U${a}" "aA-AA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}\E${a}" "aA-AA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}\l${a}" "aA-AA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}\u${a}" "aA-AA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}\Q${a}" "aA-AA-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}\L${a}" "aA-AA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}\U${a}" "aA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}\E${a}" "aA-AA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}\l${a}" "aA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}\u${a}" "aA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}\Q${a}" "aA-AA-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}\L${a}" "aA-AA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}\U${a}" "aA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}\E${a}" "aA-AA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}\l${a}" "aA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}\u${a}" "aA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}\Q${a}" "aA-aA-aA\\-aA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}\L${a}" "aA-aA-aA\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}\U${a}" "aA-aA-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}\E${a}" "aA-aA-aA\\-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}\l${a}" "aA-aA-aA\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}\u${a}" "aA-aA-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}\Q${a}" "aA-aA-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}\L${a}" "aA-aA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}\U${a}" "aA-aA-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}\E${a}" "aA-aA-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}\l${a}" "aA-aA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}\u${a}" "aA-aA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}\Q${a}" "aA-aA-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}\L${a}" "aA-aA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}\U${a}" "aA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}\E${a}" "aA-aA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}\l${a}" "aA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}\u${a}" "aA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}\Q${a}" "aA-aA-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}\L${a}" "aA-aA-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}\U${a}" "aA-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}\E${a}" "aA-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}\l${a}" "aA-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}\u${a}" "aA-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}\Q${a}" "aA-aA-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}\L${a}" "aA-aA-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}\U${a}" "aA-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}\E${a}" "aA-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}\l${a}" "aA-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}\u${a}" "aA-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}\Q${a}" "aA-aA-AA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}\L${a}" "aA-aA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}\U${a}" "aA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}\E${a}" "aA-aA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}\l${a}" "aA-aA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}\u${a}" "aA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}\Q${a}" "aA-aA-aA\\-aA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}\L${a}" "aA-aA-aA\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}\U${a}" "aA-aA-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}\E${a}" "aA-aA-aA\\-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}\l${a}" "aA-aA-aA\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}\u${a}" "aA-aA-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}\Q${a}" "aA-aA-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}\L${a}" "aA-aA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}\U${a}" "aA-aA-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}\E${a}" "aA-aA-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}\l${a}" "aA-aA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}\u${a}" "aA-aA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}\Q${a}" "aA-aA-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}\L${a}" "aA-aA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}\U${a}" "aA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}\E${a}" "aA-aA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}\l${a}" "aA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}\u${a}" "aA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}\Q${a}" "aA-aA-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}\L${a}" "aA-aA-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}\U${a}" "aA-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}\E${a}" "aA-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}\l${a}" "aA-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}\u${a}" "aA-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}\Q${a}" "aA-aA-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}\L${a}" "aA-aA-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}\U${a}" "aA-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}\E${a}" "aA-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}\l${a}" "aA-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}\u${a}" "aA-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}\Q${a}" "aA-aA-AA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}\L${a}" "aA-aA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}\U${a}" "aA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}\E${a}" "aA-aA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}\l${a}" "aA-aA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}\u${a}" "aA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}\Q${a}" "aA-AA-aA\\-aA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}\L${a}" "aA-AA-aA\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}\U${a}" "aA-AA-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}\E${a}" "aA-AA-aA\\-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}\l${a}" "aA-AA-aA\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}\u${a}" "aA-AA-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}\Q${a}" "aA-AA-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}\L${a}" "aA-AA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}\U${a}" "aA-AA-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}\E${a}" "aA-AA-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}\l${a}" "aA-AA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}\u${a}" "aA-AA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}\Q${a}" "aA-AA-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}\L${a}" "aA-AA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}\U${a}" "aA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}\E${a}" "aA-AA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}\l${a}" "aA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}\u${a}" "aA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}\Q${a}" "aA-AA-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}\L${a}" "aA-AA-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}\U${a}" "aA-AA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}\E${a}" "aA-AA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}\l${a}" "aA-AA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}\u${a}" "aA-AA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}\Q${a}" "aA-AA-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}\L${a}" "aA-AA-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}\U${a}" "aA-AA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}\E${a}" "aA-AA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}\l${a}" "aA-AA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}\u${a}" "aA-AA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}\Q${a}" "aA-AA-AA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}\L${a}" "aA-AA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}\U${a}" "aA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}\E${a}" "aA-AA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}\l${a}" "aA-AA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}\u${a}" "aA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}\Q${a}\Q${a}" "aA-aA\\-aA\\\\\\-aA\\\\\\\\\\\\\\-aA\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}\Q${a}\L${a}" "aA-aA\\-aA\\\\\\-aA\\\\\\\\\\\\\\-aa\\\\\\\\\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}\Q${a}\U${a}" "aA-aA\\-aA\\\\\\-aA\\\\\\\\\\\\\\-AA\\\\\\\\\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}\Q${a}\E${a}" "aA-aA\\-aA\\\\\\-aA\\\\\\\\\\\\\\-aA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}\Q${a}\l${a}" "aA-aA\\-aA\\\\\\-aA\\\\\\\\\\\\\\-aA\\\\\\\\\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}\Q${a}\u${a}" "aA-aA\\-aA\\\\\\-aA\\\\\\\\\\\\\\-AA\\\\\\\\\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}\L${a}\Q${a}" "aA-aA\\-aA\\\\\\-aa\\\\\\-aa\\\\\\\\\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}\L${a}\L${a}" "aA-aA\\-aA\\\\\\-aa\\\\\\-aa\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}\L${a}\U${a}" "aA-aA\\-aA\\\\\\-aa\\\\\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}\L${a}\E${a}" "aA-aA\\-aA\\\\\\-aa\\\\\\-aA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}\L${a}\l${a}" "aA-aA\\-aA\\\\\\-aa\\\\\\-aa\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}\L${a}\u${a}" "aA-aA\\-aA\\\\\\-aa\\\\\\-aa\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}\U${a}\Q${a}" "aA-aA\\-aA\\\\\\-AA\\\\\\-AA\\\\\\\\\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}\U${a}\L${a}" "aA-aA\\-aA\\\\\\-AA\\\\\\-aa\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}\U${a}\U${a}" "aA-aA\\-aA\\\\\\-AA\\\\\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}\U${a}\E${a}" "aA-aA\\-aA\\\\\\-AA\\\\\\-aA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}\U${a}\l${a}" "aA-aA\\-aA\\\\\\-AA\\\\\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}\U${a}\u${a}" "aA-aA\\-aA\\\\\\-AA\\\\\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}\E${a}\Q${a}" "aA-aA\\-aA\\\\\\-aA\\-aA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}\E${a}\L${a}" "aA-aA\\-aA\\\\\\-aA\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}\E${a}\U${a}" "aA-aA\\-aA\\\\\\-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}\E${a}\E${a}" "aA-aA\\-aA\\\\\\-aA\\-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}\E${a}\l${a}" "aA-aA\\-aA\\\\\\-aA\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}\E${a}\u${a}" "aA-aA\\-aA\\\\\\-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}\l${a}\Q${a}" "aA-aA\\-aA\\\\\\-aA\\\\\\-aA\\\\\\\\\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}\l${a}\L${a}" "aA-aA\\-aA\\\\\\-aA\\\\\\-aa\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}\l${a}\U${a}" "aA-aA\\-aA\\\\\\-aA\\\\\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}\l${a}\E${a}" "aA-aA\\-aA\\\\\\-aA\\\\\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}\l${a}\l${a}" "aA-aA\\-aA\\\\\\-aA\\\\\\-aA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}\l${a}\u${a}" "aA-aA\\-aA\\\\\\-aA\\\\\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}\u${a}\Q${a}" "aA-aA\\-aA\\\\\\-AA\\\\\\-aA\\\\\\\\\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}\u${a}\L${a}" "aA-aA\\-aA\\\\\\-AA\\\\\\-aa\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}\u${a}\U${a}" "aA-aA\\-aA\\\\\\-AA\\\\\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}\u${a}\E${a}" "aA-aA\\-aA\\\\\\-AA\\\\\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}\u${a}\l${a}" "aA-aA\\-aA\\\\\\-AA\\\\\\-aA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\Q${a}\u${a}\u${a}" "aA-aA\\-aA\\\\\\-AA\\\\\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}\Q${a}\Q${a}" "aA-aA\\-aa\\-aa\\\\\\-aa\\\\\\\\\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}\Q${a}\L${a}" "aA-aA\\-aa\\-aa\\\\\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}\Q${a}\U${a}" "aA-aA\\-aa\\-aa\\\\\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}\Q${a}\E${a}" "aA-aA\\-aa\\-aa\\\\\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}\Q${a}\l${a}" "aA-aA\\-aa\\-aa\\\\\\-aa\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}\Q${a}\u${a}" "aA-aA\\-aa\\-aa\\\\\\-aa\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}\L${a}\Q${a}" "aA-aA\\-aa\\-aa\\-aa\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}\L${a}\L${a}" "aA-aA\\-aa\\-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}\L${a}\U${a}" "aA-aA\\-aa\\-aa\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}\L${a}\E${a}" "aA-aA\\-aa\\-aa\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}\L${a}\l${a}" "aA-aA\\-aa\\-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}\L${a}\u${a}" "aA-aA\\-aa\\-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}\U${a}\Q${a}" "aA-aA\\-aa\\-AA\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}\U${a}\L${a}" "aA-aA\\-aa\\-AA\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}\U${a}\U${a}" "aA-aA\\-aa\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}\U${a}\E${a}" "aA-aA\\-aa\\-AA\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}\U${a}\l${a}" "aA-aA\\-aa\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}\U${a}\u${a}" "aA-aA\\-aa\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}\E${a}\Q${a}" "aA-aA\\-aa\\-aA\\-aA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}\E${a}\L${a}" "aA-aA\\-aa\\-aA\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}\E${a}\U${a}" "aA-aA\\-aa\\-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}\E${a}\E${a}" "aA-aA\\-aa\\-aA\\-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}\E${a}\l${a}" "aA-aA\\-aa\\-aA\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}\E${a}\u${a}" "aA-aA\\-aa\\-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}\l${a}\Q${a}" "aA-aA\\-aa\\-aa\\-aa\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}\l${a}\L${a}" "aA-aA\\-aa\\-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}\l${a}\U${a}" "aA-aA\\-aa\\-aa\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}\l${a}\E${a}" "aA-aA\\-aa\\-aa\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}\l${a}\l${a}" "aA-aA\\-aa\\-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}\l${a}\u${a}" "aA-aA\\-aa\\-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}\u${a}\Q${a}" "aA-aA\\-aa\\-aa\\-aa\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}\u${a}\L${a}" "aA-aA\\-aa\\-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}\u${a}\U${a}" "aA-aA\\-aa\\-aa\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}\u${a}\E${a}" "aA-aA\\-aa\\-aa\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}\u${a}\l${a}" "aA-aA\\-aa\\-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\L${a}\u${a}\u${a}" "aA-aA\\-aa\\-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}\Q${a}\Q${a}" "aA-aA\\-AA\\-AA\\\\\\-AA\\\\\\\\\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}\Q${a}\L${a}" "aA-aA\\-AA\\-AA\\\\\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}\Q${a}\U${a}" "aA-aA\\-AA\\-AA\\\\\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}\Q${a}\E${a}" "aA-aA\\-AA\\-AA\\\\\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}\Q${a}\l${a}" "aA-aA\\-AA\\-AA\\\\\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}\Q${a}\u${a}" "aA-aA\\-AA\\-AA\\\\\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}\L${a}\Q${a}" "aA-aA\\-AA\\-aa\\-aa\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}\L${a}\L${a}" "aA-aA\\-AA\\-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}\L${a}\U${a}" "aA-aA\\-AA\\-aa\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}\L${a}\E${a}" "aA-aA\\-AA\\-aa\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}\L${a}\l${a}" "aA-aA\\-AA\\-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}\L${a}\u${a}" "aA-aA\\-AA\\-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}\U${a}\Q${a}" "aA-aA\\-AA\\-AA\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}\U${a}\L${a}" "aA-aA\\-AA\\-AA\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}\U${a}\U${a}" "aA-aA\\-AA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}\U${a}\E${a}" "aA-aA\\-AA\\-AA\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}\U${a}\l${a}" "aA-aA\\-AA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}\U${a}\u${a}" "aA-aA\\-AA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}\E${a}\Q${a}" "aA-aA\\-AA\\-aA\\-aA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}\E${a}\L${a}" "aA-aA\\-AA\\-aA\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}\E${a}\U${a}" "aA-aA\\-AA\\-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}\E${a}\E${a}" "aA-aA\\-AA\\-aA\\-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}\E${a}\l${a}" "aA-aA\\-AA\\-aA\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}\E${a}\u${a}" "aA-aA\\-AA\\-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}\l${a}\Q${a}" "aA-aA\\-AA\\-AA\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}\l${a}\L${a}" "aA-aA\\-AA\\-AA\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}\l${a}\U${a}" "aA-aA\\-AA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}\l${a}\E${a}" "aA-aA\\-AA\\-AA\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}\l${a}\l${a}" "aA-aA\\-AA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}\l${a}\u${a}" "aA-aA\\-AA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}\u${a}\Q${a}" "aA-aA\\-AA\\-AA\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}\u${a}\L${a}" "aA-aA\\-AA\\-AA\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}\u${a}\U${a}" "aA-aA\\-AA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}\u${a}\E${a}" "aA-aA\\-AA\\-AA\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}\u${a}\l${a}" "aA-aA\\-AA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\U${a}\u${a}\u${a}" "aA-aA\\-AA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}\Q${a}\Q${a}" "aA-aA\\-aA-aA\\-aA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}\Q${a}\L${a}" "aA-aA\\-aA-aA\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}\Q${a}\U${a}" "aA-aA\\-aA-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}\Q${a}\E${a}" "aA-aA\\-aA-aA\\-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}\Q${a}\l${a}" "aA-aA\\-aA-aA\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}\Q${a}\u${a}" "aA-aA\\-aA-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}\L${a}\Q${a}" "aA-aA\\-aA-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}\L${a}\L${a}" "aA-aA\\-aA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}\L${a}\U${a}" "aA-aA\\-aA-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}\L${a}\E${a}" "aA-aA\\-aA-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}\L${a}\l${a}" "aA-aA\\-aA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}\L${a}\u${a}" "aA-aA\\-aA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}\U${a}\Q${a}" "aA-aA\\-aA-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}\U${a}\L${a}" "aA-aA\\-aA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}\U${a}\U${a}" "aA-aA\\-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}\U${a}\E${a}" "aA-aA\\-aA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}\U${a}\l${a}" "aA-aA\\-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}\U${a}\u${a}" "aA-aA\\-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}\E${a}\Q${a}" "aA-aA\\-aA-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}\E${a}\L${a}" "aA-aA\\-aA-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}\E${a}\U${a}" "aA-aA\\-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}\E${a}\E${a}" "aA-aA\\-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}\E${a}\l${a}" "aA-aA\\-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}\E${a}\u${a}" "aA-aA\\-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}\l${a}\Q${a}" "aA-aA\\-aA-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}\l${a}\L${a}" "aA-aA\\-aA-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}\l${a}\U${a}" "aA-aA\\-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}\l${a}\E${a}" "aA-aA\\-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}\l${a}\l${a}" "aA-aA\\-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}\l${a}\u${a}" "aA-aA\\-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}\u${a}\Q${a}" "aA-aA\\-aA-AA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}\u${a}\L${a}" "aA-aA\\-aA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}\u${a}\U${a}" "aA-aA\\-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}\u${a}\E${a}" "aA-aA\\-aA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}\u${a}\l${a}" "aA-aA\\-aA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\E${a}\u${a}\u${a}" "aA-aA\\-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}\Q${a}\Q${a}" "aA-aA\\-aA\\-aA\\\\\\-aA\\\\\\\\\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}\Q${a}\L${a}" "aA-aA\\-aA\\-aA\\\\\\-aa\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}\Q${a}\U${a}" "aA-aA\\-aA\\-aA\\\\\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}\Q${a}\E${a}" "aA-aA\\-aA\\-aA\\\\\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}\Q${a}\l${a}" "aA-aA\\-aA\\-aA\\\\\\-aA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}\Q${a}\u${a}" "aA-aA\\-aA\\-aA\\\\\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}\L${a}\Q${a}" "aA-aA\\-aA\\-aa\\-aa\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}\L${a}\L${a}" "aA-aA\\-aA\\-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}\L${a}\U${a}" "aA-aA\\-aA\\-aa\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}\L${a}\E${a}" "aA-aA\\-aA\\-aa\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}\L${a}\l${a}" "aA-aA\\-aA\\-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}\L${a}\u${a}" "aA-aA\\-aA\\-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}\U${a}\Q${a}" "aA-aA\\-aA\\-AA\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}\U${a}\L${a}" "aA-aA\\-aA\\-AA\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}\U${a}\U${a}" "aA-aA\\-aA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}\U${a}\E${a}" "aA-aA\\-aA\\-AA\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}\U${a}\l${a}" "aA-aA\\-aA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}\U${a}\u${a}" "aA-aA\\-aA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}\E${a}\Q${a}" "aA-aA\\-aA\\-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}\E${a}\L${a}" "aA-aA\\-aA\\-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}\E${a}\U${a}" "aA-aA\\-aA\\-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}\E${a}\E${a}" "aA-aA\\-aA\\-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}\E${a}\l${a}" "aA-aA\\-aA\\-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}\E${a}\u${a}" "aA-aA\\-aA\\-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}\l${a}\Q${a}" "aA-aA\\-aA\\-aA\\-aA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}\l${a}\L${a}" "aA-aA\\-aA\\-aA\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}\l${a}\U${a}" "aA-aA\\-aA\\-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}\l${a}\E${a}" "aA-aA\\-aA\\-aA\\-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}\l${a}\l${a}" "aA-aA\\-aA\\-aA\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}\l${a}\u${a}" "aA-aA\\-aA\\-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}\u${a}\Q${a}" "aA-aA\\-aA\\-AA\\-aA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}\u${a}\L${a}" "aA-aA\\-aA\\-AA\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}\u${a}\U${a}" "aA-aA\\-aA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}\u${a}\E${a}" "aA-aA\\-aA\\-AA\\-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}\u${a}\l${a}" "aA-aA\\-aA\\-AA\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\l${a}\u${a}\u${a}" "aA-aA\\-aA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}\Q${a}\Q${a}" "aA-aA\\-AA\\-aA\\\\\\-aA\\\\\\\\\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}\Q${a}\L${a}" "aA-aA\\-AA\\-aA\\\\\\-aa\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}\Q${a}\U${a}" "aA-aA\\-AA\\-aA\\\\\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}\Q${a}\E${a}" "aA-aA\\-AA\\-aA\\\\\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}\Q${a}\l${a}" "aA-aA\\-AA\\-aA\\\\\\-aA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}\Q${a}\u${a}" "aA-aA\\-AA\\-aA\\\\\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}\L${a}\Q${a}" "aA-aA\\-AA\\-aa\\-aa\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}\L${a}\L${a}" "aA-aA\\-AA\\-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}\L${a}\U${a}" "aA-aA\\-AA\\-aa\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}\L${a}\E${a}" "aA-aA\\-AA\\-aa\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}\L${a}\l${a}" "aA-aA\\-AA\\-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}\L${a}\u${a}" "aA-aA\\-AA\\-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}\U${a}\Q${a}" "aA-aA\\-AA\\-AA\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}\U${a}\L${a}" "aA-aA\\-AA\\-AA\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}\U${a}\U${a}" "aA-aA\\-AA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}\U${a}\E${a}" "aA-aA\\-AA\\-AA\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}\U${a}\l${a}" "aA-aA\\-AA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}\U${a}\u${a}" "aA-aA\\-AA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}\E${a}\Q${a}" "aA-aA\\-AA\\-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}\E${a}\L${a}" "aA-aA\\-AA\\-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}\E${a}\U${a}" "aA-aA\\-AA\\-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}\E${a}\E${a}" "aA-aA\\-AA\\-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}\E${a}\l${a}" "aA-aA\\-AA\\-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}\E${a}\u${a}" "aA-aA\\-AA\\-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}\l${a}\Q${a}" "aA-aA\\-AA\\-aA\\-aA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}\l${a}\L${a}" "aA-aA\\-AA\\-aA\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}\l${a}\U${a}" "aA-aA\\-AA\\-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}\l${a}\E${a}" "aA-aA\\-AA\\-aA\\-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}\l${a}\l${a}" "aA-aA\\-AA\\-aA\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}\l${a}\u${a}" "aA-aA\\-AA\\-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}\u${a}\Q${a}" "aA-aA\\-AA\\-AA\\-aA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}\u${a}\L${a}" "aA-aA\\-AA\\-AA\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}\u${a}\U${a}" "aA-aA\\-AA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}\u${a}\E${a}" "aA-aA\\-AA\\-AA\\-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}\u${a}\l${a}" "aA-aA\\-AA\\-AA\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\Q${a}\u${a}\u${a}\u${a}" "aA-aA\\-AA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}\Q${a}\Q${a}" "aA-aa-aa\\-aa\\\\\\-aa\\\\\\\\\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}\Q${a}\L${a}" "aA-aa-aa\\-aa\\\\\\-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}\Q${a}\U${a}" "aA-aa-aa\\-aa\\\\\\-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}\Q${a}\E${a}" "aA-aa-aa\\-aa\\\\\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}\Q${a}\l${a}" "aA-aa-aa\\-aa\\\\\\-aa\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}\Q${a}\u${a}" "aA-aa-aa\\-aa\\\\\\-aa\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}\L${a}\Q${a}" "aA-aa-aa\\-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}\L${a}\L${a}" "aA-aa-aa\\-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}\L${a}\U${a}" "aA-aa-aa\\-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}\L${a}\E${a}" "aA-aa-aa\\-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}\L${a}\l${a}" "aA-aa-aa\\-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}\L${a}\u${a}" "aA-aa-aa\\-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}\U${a}\Q${a}" "aA-aa-aa\\-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}\U${a}\L${a}" "aA-aa-aa\\-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}\U${a}\U${a}" "aA-aa-aa\\-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}\U${a}\E${a}" "aA-aa-aa\\-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}\U${a}\l${a}" "aA-aa-aa\\-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}\U${a}\u${a}" "aA-aa-aa\\-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}\E${a}\Q${a}" "aA-aa-aa\\-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}\E${a}\L${a}" "aA-aa-aa\\-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}\E${a}\U${a}" "aA-aa-aa\\-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}\E${a}\E${a}" "aA-aa-aa\\-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}\E${a}\l${a}" "aA-aa-aa\\-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}\E${a}\u${a}" "aA-aa-aa\\-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}\l${a}\Q${a}" "aA-aa-aa\\-aa\\-aa\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}\l${a}\L${a}" "aA-aa-aa\\-aa\\-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}\l${a}\U${a}" "aA-aa-aa\\-aa\\-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}\l${a}\E${a}" "aA-aa-aa\\-aa\\-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}\l${a}\l${a}" "aA-aa-aa\\-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}\l${a}\u${a}" "aA-aa-aa\\-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}\u${a}\Q${a}" "aA-aa-aa\\-aa\\-aa\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}\u${a}\L${a}" "aA-aa-aa\\-aa\\-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}\u${a}\U${a}" "aA-aa-aa\\-aa\\-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}\u${a}\E${a}" "aA-aa-aa\\-aa\\-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}\u${a}\l${a}" "aA-aa-aa\\-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\Q${a}\u${a}\u${a}" "aA-aa-aa\\-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}\Q${a}\Q${a}" "aA-aa-aa-aa\\-aa\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}\Q${a}\L${a}" "aA-aa-aa-aa\\-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}\Q${a}\U${a}" "aA-aa-aa-aa\\-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}\Q${a}\E${a}" "aA-aa-aa-aa\\-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}\Q${a}\l${a}" "aA-aa-aa-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}\Q${a}\u${a}" "aA-aa-aa-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}\L${a}\Q${a}" "aA-aa-aa-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}\L${a}\L${a}" "aA-aa-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}\L${a}\U${a}" "aA-aa-aa-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}\L${a}\E${a}" "aA-aa-aa-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}\L${a}\l${a}" "aA-aa-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}\L${a}\u${a}" "aA-aa-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}\U${a}\Q${a}" "aA-aa-aa-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}\U${a}\L${a}" "aA-aa-aa-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}\U${a}\U${a}" "aA-aa-aa-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}\U${a}\E${a}" "aA-aa-aa-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}\U${a}\l${a}" "aA-aa-aa-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}\U${a}\u${a}" "aA-aa-aa-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}\E${a}\Q${a}" "aA-aa-aa-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}\E${a}\L${a}" "aA-aa-aa-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}\E${a}\U${a}" "aA-aa-aa-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}\E${a}\E${a}" "aA-aa-aa-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}\E${a}\l${a}" "aA-aa-aa-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}\E${a}\u${a}" "aA-aa-aa-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}\l${a}\Q${a}" "aA-aa-aa-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}\l${a}\L${a}" "aA-aa-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}\l${a}\U${a}" "aA-aa-aa-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}\l${a}\E${a}" "aA-aa-aa-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}\l${a}\l${a}" "aA-aa-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}\l${a}\u${a}" "aA-aa-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}\u${a}\Q${a}" "aA-aa-aa-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}\u${a}\L${a}" "aA-aa-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}\u${a}\U${a}" "aA-aa-aa-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}\u${a}\E${a}" "aA-aa-aa-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}\u${a}\l${a}" "aA-aa-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\L${a}\u${a}\u${a}" "aA-aa-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}\Q${a}\Q${a}" "aA-aa-AA-AA\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}\Q${a}\L${a}" "aA-aa-AA-AA\\-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}\Q${a}\U${a}" "aA-aa-AA-AA\\-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}\Q${a}\E${a}" "aA-aa-AA-AA\\-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}\Q${a}\l${a}" "aA-aa-AA-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}\Q${a}\u${a}" "aA-aa-AA-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}\L${a}\Q${a}" "aA-aa-AA-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}\L${a}\L${a}" "aA-aa-AA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}\L${a}\U${a}" "aA-aa-AA-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}\L${a}\E${a}" "aA-aa-AA-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}\L${a}\l${a}" "aA-aa-AA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}\L${a}\u${a}" "aA-aa-AA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}\U${a}\Q${a}" "aA-aa-AA-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}\U${a}\L${a}" "aA-aa-AA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}\U${a}\U${a}" "aA-aa-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}\U${a}\E${a}" "aA-aa-AA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}\U${a}\l${a}" "aA-aa-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}\U${a}\u${a}" "aA-aa-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}\E${a}\Q${a}" "aA-aa-AA-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}\E${a}\L${a}" "aA-aa-AA-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}\E${a}\U${a}" "aA-aa-AA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}\E${a}\E${a}" "aA-aa-AA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}\E${a}\l${a}" "aA-aa-AA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}\E${a}\u${a}" "aA-aa-AA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}\l${a}\Q${a}" "aA-aa-AA-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}\l${a}\L${a}" "aA-aa-AA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}\l${a}\U${a}" "aA-aa-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}\l${a}\E${a}" "aA-aa-AA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}\l${a}\l${a}" "aA-aa-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}\l${a}\u${a}" "aA-aa-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}\u${a}\Q${a}" "aA-aa-AA-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}\u${a}\L${a}" "aA-aa-AA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}\u${a}\U${a}" "aA-aa-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}\u${a}\E${a}" "aA-aa-AA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}\u${a}\l${a}" "aA-aa-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\U${a}\u${a}\u${a}" "aA-aa-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}\Q${a}\Q${a}" "aA-aa-aA-aA\\-aA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}\Q${a}\L${a}" "aA-aa-aA-aA\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}\Q${a}\U${a}" "aA-aa-aA-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}\Q${a}\E${a}" "aA-aa-aA-aA\\-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}\Q${a}\l${a}" "aA-aa-aA-aA\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}\Q${a}\u${a}" "aA-aa-aA-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}\L${a}\Q${a}" "aA-aa-aA-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}\L${a}\L${a}" "aA-aa-aA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}\L${a}\U${a}" "aA-aa-aA-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}\L${a}\E${a}" "aA-aa-aA-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}\L${a}\l${a}" "aA-aa-aA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}\L${a}\u${a}" "aA-aa-aA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}\U${a}\Q${a}" "aA-aa-aA-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}\U${a}\L${a}" "aA-aa-aA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}\U${a}\U${a}" "aA-aa-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}\U${a}\E${a}" "aA-aa-aA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}\U${a}\l${a}" "aA-aa-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}\U${a}\u${a}" "aA-aa-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}\E${a}\Q${a}" "aA-aa-aA-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}\E${a}\L${a}" "aA-aa-aA-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}\E${a}\U${a}" "aA-aa-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}\E${a}\E${a}" "aA-aa-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}\E${a}\l${a}" "aA-aa-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}\E${a}\u${a}" "aA-aa-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}\l${a}\Q${a}" "aA-aa-aA-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}\l${a}\L${a}" "aA-aa-aA-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}\l${a}\U${a}" "aA-aa-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}\l${a}\E${a}" "aA-aa-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}\l${a}\l${a}" "aA-aa-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}\l${a}\u${a}" "aA-aa-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}\u${a}\Q${a}" "aA-aa-aA-AA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}\u${a}\L${a}" "aA-aa-aA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}\u${a}\U${a}" "aA-aa-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}\u${a}\E${a}" "aA-aa-aA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}\u${a}\l${a}" "aA-aa-aA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\E${a}\u${a}\u${a}" "aA-aa-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}\Q${a}\Q${a}" "aA-aa-aa-aa\\-aa\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}\Q${a}\L${a}" "aA-aa-aa-aa\\-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}\Q${a}\U${a}" "aA-aa-aa-aa\\-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}\Q${a}\E${a}" "aA-aa-aa-aa\\-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}\Q${a}\l${a}" "aA-aa-aa-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}\Q${a}\u${a}" "aA-aa-aa-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}\L${a}\Q${a}" "aA-aa-aa-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}\L${a}\L${a}" "aA-aa-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}\L${a}\U${a}" "aA-aa-aa-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}\L${a}\E${a}" "aA-aa-aa-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}\L${a}\l${a}" "aA-aa-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}\L${a}\u${a}" "aA-aa-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}\U${a}\Q${a}" "aA-aa-aa-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}\U${a}\L${a}" "aA-aa-aa-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}\U${a}\U${a}" "aA-aa-aa-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}\U${a}\E${a}" "aA-aa-aa-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}\U${a}\l${a}" "aA-aa-aa-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}\U${a}\u${a}" "aA-aa-aa-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}\E${a}\Q${a}" "aA-aa-aa-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}\E${a}\L${a}" "aA-aa-aa-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}\E${a}\U${a}" "aA-aa-aa-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}\E${a}\E${a}" "aA-aa-aa-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}\E${a}\l${a}" "aA-aa-aa-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}\E${a}\u${a}" "aA-aa-aa-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}\l${a}\Q${a}" "aA-aa-aa-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}\l${a}\L${a}" "aA-aa-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}\l${a}\U${a}" "aA-aa-aa-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}\l${a}\E${a}" "aA-aa-aa-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}\l${a}\l${a}" "aA-aa-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}\l${a}\u${a}" "aA-aa-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}\u${a}\Q${a}" "aA-aa-aa-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}\u${a}\L${a}" "aA-aa-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}\u${a}\U${a}" "aA-aa-aa-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}\u${a}\E${a}" "aA-aa-aa-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}\u${a}\l${a}" "aA-aa-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\l${a}\u${a}\u${a}" "aA-aa-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}\Q${a}\Q${a}" "aA-aa-aa-aa\\-aa\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}\Q${a}\L${a}" "aA-aa-aa-aa\\-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}\Q${a}\U${a}" "aA-aa-aa-aa\\-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}\Q${a}\E${a}" "aA-aa-aa-aa\\-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}\Q${a}\l${a}" "aA-aa-aa-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}\Q${a}\u${a}" "aA-aa-aa-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}\L${a}\Q${a}" "aA-aa-aa-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}\L${a}\L${a}" "aA-aa-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}\L${a}\U${a}" "aA-aa-aa-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}\L${a}\E${a}" "aA-aa-aa-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}\L${a}\l${a}" "aA-aa-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}\L${a}\u${a}" "aA-aa-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}\U${a}\Q${a}" "aA-aa-aa-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}\U${a}\L${a}" "aA-aa-aa-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}\U${a}\U${a}" "aA-aa-aa-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}\U${a}\E${a}" "aA-aa-aa-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}\U${a}\l${a}" "aA-aa-aa-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}\U${a}\u${a}" "aA-aa-aa-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}\E${a}\Q${a}" "aA-aa-aa-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}\E${a}\L${a}" "aA-aa-aa-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}\E${a}\U${a}" "aA-aa-aa-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}\E${a}\E${a}" "aA-aa-aa-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}\E${a}\l${a}" "aA-aa-aa-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}\E${a}\u${a}" "aA-aa-aa-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}\l${a}\Q${a}" "aA-aa-aa-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}\l${a}\L${a}" "aA-aa-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}\l${a}\U${a}" "aA-aa-aa-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}\l${a}\E${a}" "aA-aa-aa-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}\l${a}\l${a}" "aA-aa-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}\l${a}\u${a}" "aA-aa-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}\u${a}\Q${a}" "aA-aa-aa-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}\u${a}\L${a}" "aA-aa-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}\u${a}\U${a}" "aA-aa-aa-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}\u${a}\E${a}" "aA-aa-aa-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}\u${a}\l${a}" "aA-aa-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\L${a}\u${a}\u${a}\u${a}" "aA-aa-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}\Q${a}\Q${a}" "aA-AA-AA\\-AA\\\\\\-AA\\\\\\\\\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}\Q${a}\L${a}" "aA-AA-AA\\-AA\\\\\\-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}\Q${a}\U${a}" "aA-AA-AA\\-AA\\\\\\-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}\Q${a}\E${a}" "aA-AA-AA\\-AA\\\\\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}\Q${a}\l${a}" "aA-AA-AA\\-AA\\\\\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}\Q${a}\u${a}" "aA-AA-AA\\-AA\\\\\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}\L${a}\Q${a}" "aA-AA-AA\\-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}\L${a}\L${a}" "aA-AA-AA\\-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}\L${a}\U${a}" "aA-AA-AA\\-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}\L${a}\E${a}" "aA-AA-AA\\-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}\L${a}\l${a}" "aA-AA-AA\\-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}\L${a}\u${a}" "aA-AA-AA\\-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}\U${a}\Q${a}" "aA-AA-AA\\-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}\U${a}\L${a}" "aA-AA-AA\\-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}\U${a}\U${a}" "aA-AA-AA\\-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}\U${a}\E${a}" "aA-AA-AA\\-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}\U${a}\l${a}" "aA-AA-AA\\-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}\U${a}\u${a}" "aA-AA-AA\\-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}\E${a}\Q${a}" "aA-AA-AA\\-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}\E${a}\L${a}" "aA-AA-AA\\-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}\E${a}\U${a}" "aA-AA-AA\\-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}\E${a}\E${a}" "aA-AA-AA\\-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}\E${a}\l${a}" "aA-AA-AA\\-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}\E${a}\u${a}" "aA-AA-AA\\-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}\l${a}\Q${a}" "aA-AA-AA\\-AA\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}\l${a}\L${a}" "aA-AA-AA\\-AA\\-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}\l${a}\U${a}" "aA-AA-AA\\-AA\\-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}\l${a}\E${a}" "aA-AA-AA\\-AA\\-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}\l${a}\l${a}" "aA-AA-AA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}\l${a}\u${a}" "aA-AA-AA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}\u${a}\Q${a}" "aA-AA-AA\\-AA\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}\u${a}\L${a}" "aA-AA-AA\\-AA\\-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}\u${a}\U${a}" "aA-AA-AA\\-AA\\-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}\u${a}\E${a}" "aA-AA-AA\\-AA\\-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}\u${a}\l${a}" "aA-AA-AA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\Q${a}\u${a}\u${a}" "aA-AA-AA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}\Q${a}\Q${a}" "aA-AA-aa-aa\\-aa\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}\Q${a}\L${a}" "aA-AA-aa-aa\\-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}\Q${a}\U${a}" "aA-AA-aa-aa\\-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}\Q${a}\E${a}" "aA-AA-aa-aa\\-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}\Q${a}\l${a}" "aA-AA-aa-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}\Q${a}\u${a}" "aA-AA-aa-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}\L${a}\Q${a}" "aA-AA-aa-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}\L${a}\L${a}" "aA-AA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}\L${a}\U${a}" "aA-AA-aa-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}\L${a}\E${a}" "aA-AA-aa-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}\L${a}\l${a}" "aA-AA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}\L${a}\u${a}" "aA-AA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}\U${a}\Q${a}" "aA-AA-aa-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}\U${a}\L${a}" "aA-AA-aa-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}\U${a}\U${a}" "aA-AA-aa-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}\U${a}\E${a}" "aA-AA-aa-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}\U${a}\l${a}" "aA-AA-aa-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}\U${a}\u${a}" "aA-AA-aa-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}\E${a}\Q${a}" "aA-AA-aa-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}\E${a}\L${a}" "aA-AA-aa-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}\E${a}\U${a}" "aA-AA-aa-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}\E${a}\E${a}" "aA-AA-aa-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}\E${a}\l${a}" "aA-AA-aa-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}\E${a}\u${a}" "aA-AA-aa-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}\l${a}\Q${a}" "aA-AA-aa-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}\l${a}\L${a}" "aA-AA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}\l${a}\U${a}" "aA-AA-aa-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}\l${a}\E${a}" "aA-AA-aa-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}\l${a}\l${a}" "aA-AA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}\l${a}\u${a}" "aA-AA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}\u${a}\Q${a}" "aA-AA-aa-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}\u${a}\L${a}" "aA-AA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}\u${a}\U${a}" "aA-AA-aa-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}\u${a}\E${a}" "aA-AA-aa-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}\u${a}\l${a}" "aA-AA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\L${a}\u${a}\u${a}" "aA-AA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}\Q${a}\Q${a}" "aA-AA-AA-AA\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}\Q${a}\L${a}" "aA-AA-AA-AA\\-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}\Q${a}\U${a}" "aA-AA-AA-AA\\-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}\Q${a}\E${a}" "aA-AA-AA-AA\\-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}\Q${a}\l${a}" "aA-AA-AA-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}\Q${a}\u${a}" "aA-AA-AA-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}\L${a}\Q${a}" "aA-AA-AA-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}\L${a}\L${a}" "aA-AA-AA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}\L${a}\U${a}" "aA-AA-AA-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}\L${a}\E${a}" "aA-AA-AA-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}\L${a}\l${a}" "aA-AA-AA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}\L${a}\u${a}" "aA-AA-AA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}\U${a}\Q${a}" "aA-AA-AA-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}\U${a}\L${a}" "aA-AA-AA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}\U${a}\U${a}" "aA-AA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}\U${a}\E${a}" "aA-AA-AA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}\U${a}\l${a}" "aA-AA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}\U${a}\u${a}" "aA-AA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}\E${a}\Q${a}" "aA-AA-AA-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}\E${a}\L${a}" "aA-AA-AA-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}\E${a}\U${a}" "aA-AA-AA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}\E${a}\E${a}" "aA-AA-AA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}\E${a}\l${a}" "aA-AA-AA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}\E${a}\u${a}" "aA-AA-AA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}\l${a}\Q${a}" "aA-AA-AA-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}\l${a}\L${a}" "aA-AA-AA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}\l${a}\U${a}" "aA-AA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}\l${a}\E${a}" "aA-AA-AA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}\l${a}\l${a}" "aA-AA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}\l${a}\u${a}" "aA-AA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}\u${a}\Q${a}" "aA-AA-AA-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}\u${a}\L${a}" "aA-AA-AA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}\u${a}\U${a}" "aA-AA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}\u${a}\E${a}" "aA-AA-AA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}\u${a}\l${a}" "aA-AA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\U${a}\u${a}\u${a}" "aA-AA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}\Q${a}\Q${a}" "aA-AA-aA-aA\\-aA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}\Q${a}\L${a}" "aA-AA-aA-aA\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}\Q${a}\U${a}" "aA-AA-aA-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}\Q${a}\E${a}" "aA-AA-aA-aA\\-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}\Q${a}\l${a}" "aA-AA-aA-aA\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}\Q${a}\u${a}" "aA-AA-aA-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}\L${a}\Q${a}" "aA-AA-aA-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}\L${a}\L${a}" "aA-AA-aA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}\L${a}\U${a}" "aA-AA-aA-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}\L${a}\E${a}" "aA-AA-aA-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}\L${a}\l${a}" "aA-AA-aA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}\L${a}\u${a}" "aA-AA-aA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}\U${a}\Q${a}" "aA-AA-aA-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}\U${a}\L${a}" "aA-AA-aA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}\U${a}\U${a}" "aA-AA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}\U${a}\E${a}" "aA-AA-aA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}\U${a}\l${a}" "aA-AA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}\U${a}\u${a}" "aA-AA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}\E${a}\Q${a}" "aA-AA-aA-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}\E${a}\L${a}" "aA-AA-aA-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}\E${a}\U${a}" "aA-AA-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}\E${a}\E${a}" "aA-AA-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}\E${a}\l${a}" "aA-AA-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}\E${a}\u${a}" "aA-AA-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}\l${a}\Q${a}" "aA-AA-aA-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}\l${a}\L${a}" "aA-AA-aA-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}\l${a}\U${a}" "aA-AA-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}\l${a}\E${a}" "aA-AA-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}\l${a}\l${a}" "aA-AA-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}\l${a}\u${a}" "aA-AA-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}\u${a}\Q${a}" "aA-AA-aA-AA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}\u${a}\L${a}" "aA-AA-aA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}\u${a}\U${a}" "aA-AA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}\u${a}\E${a}" "aA-AA-aA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}\u${a}\l${a}" "aA-AA-aA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\E${a}\u${a}\u${a}" "aA-AA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}\Q${a}\Q${a}" "aA-AA-AA-AA\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}\Q${a}\L${a}" "aA-AA-AA-AA\\-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}\Q${a}\U${a}" "aA-AA-AA-AA\\-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}\Q${a}\E${a}" "aA-AA-AA-AA\\-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}\Q${a}\l${a}" "aA-AA-AA-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}\Q${a}\u${a}" "aA-AA-AA-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}\L${a}\Q${a}" "aA-AA-AA-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}\L${a}\L${a}" "aA-AA-AA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}\L${a}\U${a}" "aA-AA-AA-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}\L${a}\E${a}" "aA-AA-AA-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}\L${a}\l${a}" "aA-AA-AA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}\L${a}\u${a}" "aA-AA-AA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}\U${a}\Q${a}" "aA-AA-AA-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}\U${a}\L${a}" "aA-AA-AA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}\U${a}\U${a}" "aA-AA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}\U${a}\E${a}" "aA-AA-AA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}\U${a}\l${a}" "aA-AA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}\U${a}\u${a}" "aA-AA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}\E${a}\Q${a}" "aA-AA-AA-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}\E${a}\L${a}" "aA-AA-AA-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}\E${a}\U${a}" "aA-AA-AA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}\E${a}\E${a}" "aA-AA-AA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}\E${a}\l${a}" "aA-AA-AA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}\E${a}\u${a}" "aA-AA-AA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}\l${a}\Q${a}" "aA-AA-AA-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}\l${a}\L${a}" "aA-AA-AA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}\l${a}\U${a}" "aA-AA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}\l${a}\E${a}" "aA-AA-AA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}\l${a}\l${a}" "aA-AA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}\l${a}\u${a}" "aA-AA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}\u${a}\Q${a}" "aA-AA-AA-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}\u${a}\L${a}" "aA-AA-AA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}\u${a}\U${a}" "aA-AA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}\u${a}\E${a}" "aA-AA-AA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}\u${a}\l${a}" "aA-AA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\l${a}\u${a}\u${a}" "aA-AA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}\Q${a}\Q${a}" "aA-AA-AA-AA\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}\Q${a}\L${a}" "aA-AA-AA-AA\\-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}\Q${a}\U${a}" "aA-AA-AA-AA\\-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}\Q${a}\E${a}" "aA-AA-AA-AA\\-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}\Q${a}\l${a}" "aA-AA-AA-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}\Q${a}\u${a}" "aA-AA-AA-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}\L${a}\Q${a}" "aA-AA-AA-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}\L${a}\L${a}" "aA-AA-AA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}\L${a}\U${a}" "aA-AA-AA-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}\L${a}\E${a}" "aA-AA-AA-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}\L${a}\l${a}" "aA-AA-AA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}\L${a}\u${a}" "aA-AA-AA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}\U${a}\Q${a}" "aA-AA-AA-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}\U${a}\L${a}" "aA-AA-AA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}\U${a}\U${a}" "aA-AA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}\U${a}\E${a}" "aA-AA-AA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}\U${a}\l${a}" "aA-AA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}\U${a}\u${a}" "aA-AA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}\E${a}\Q${a}" "aA-AA-AA-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}\E${a}\L${a}" "aA-AA-AA-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}\E${a}\U${a}" "aA-AA-AA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}\E${a}\E${a}" "aA-AA-AA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}\E${a}\l${a}" "aA-AA-AA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}\E${a}\u${a}" "aA-AA-AA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}\l${a}\Q${a}" "aA-AA-AA-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}\l${a}\L${a}" "aA-AA-AA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}\l${a}\U${a}" "aA-AA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}\l${a}\E${a}" "aA-AA-AA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}\l${a}\l${a}" "aA-AA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}\l${a}\u${a}" "aA-AA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}\u${a}\Q${a}" "aA-AA-AA-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}\u${a}\L${a}" "aA-AA-AA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}\u${a}\U${a}" "aA-AA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}\u${a}\E${a}" "aA-AA-AA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}\u${a}\l${a}" "aA-AA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\U${a}\u${a}\u${a}\u${a}" "aA-AA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}\Q${a}\Q${a}" "aA-aA-aA\\-aA\\\\\\-aA\\\\\\\\\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}\Q${a}\L${a}" "aA-aA-aA\\-aA\\\\\\-aa\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}\Q${a}\U${a}" "aA-aA-aA\\-aA\\\\\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}\Q${a}\E${a}" "aA-aA-aA\\-aA\\\\\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}\Q${a}\l${a}" "aA-aA-aA\\-aA\\\\\\-aA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}\Q${a}\u${a}" "aA-aA-aA\\-aA\\\\\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}\L${a}\Q${a}" "aA-aA-aA\\-aa\\-aa\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}\L${a}\L${a}" "aA-aA-aA\\-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}\L${a}\U${a}" "aA-aA-aA\\-aa\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}\L${a}\E${a}" "aA-aA-aA\\-aa\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}\L${a}\l${a}" "aA-aA-aA\\-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}\L${a}\u${a}" "aA-aA-aA\\-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}\U${a}\Q${a}" "aA-aA-aA\\-AA\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}\U${a}\L${a}" "aA-aA-aA\\-AA\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}\U${a}\U${a}" "aA-aA-aA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}\U${a}\E${a}" "aA-aA-aA\\-AA\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}\U${a}\l${a}" "aA-aA-aA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}\U${a}\u${a}" "aA-aA-aA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}\E${a}\Q${a}" "aA-aA-aA\\-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}\E${a}\L${a}" "aA-aA-aA\\-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}\E${a}\U${a}" "aA-aA-aA\\-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}\E${a}\E${a}" "aA-aA-aA\\-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}\E${a}\l${a}" "aA-aA-aA\\-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}\E${a}\u${a}" "aA-aA-aA\\-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}\l${a}\Q${a}" "aA-aA-aA\\-aA\\-aA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}\l${a}\L${a}" "aA-aA-aA\\-aA\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}\l${a}\U${a}" "aA-aA-aA\\-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}\l${a}\E${a}" "aA-aA-aA\\-aA\\-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}\l${a}\l${a}" "aA-aA-aA\\-aA\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}\l${a}\u${a}" "aA-aA-aA\\-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}\u${a}\Q${a}" "aA-aA-aA\\-AA\\-aA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}\u${a}\L${a}" "aA-aA-aA\\-AA\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}\u${a}\U${a}" "aA-aA-aA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}\u${a}\E${a}" "aA-aA-aA\\-AA\\-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}\u${a}\l${a}" "aA-aA-aA\\-AA\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\Q${a}\u${a}\u${a}" "aA-aA-aA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}\Q${a}\Q${a}" "aA-aA-aa-aa\\-aa\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}\Q${a}\L${a}" "aA-aA-aa-aa\\-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}\Q${a}\U${a}" "aA-aA-aa-aa\\-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}\Q${a}\E${a}" "aA-aA-aa-aa\\-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}\Q${a}\l${a}" "aA-aA-aa-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}\Q${a}\u${a}" "aA-aA-aa-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}\L${a}\Q${a}" "aA-aA-aa-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}\L${a}\L${a}" "aA-aA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}\L${a}\U${a}" "aA-aA-aa-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}\L${a}\E${a}" "aA-aA-aa-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}\L${a}\l${a}" "aA-aA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}\L${a}\u${a}" "aA-aA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}\U${a}\Q${a}" "aA-aA-aa-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}\U${a}\L${a}" "aA-aA-aa-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}\U${a}\U${a}" "aA-aA-aa-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}\U${a}\E${a}" "aA-aA-aa-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}\U${a}\l${a}" "aA-aA-aa-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}\U${a}\u${a}" "aA-aA-aa-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}\E${a}\Q${a}" "aA-aA-aa-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}\E${a}\L${a}" "aA-aA-aa-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}\E${a}\U${a}" "aA-aA-aa-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}\E${a}\E${a}" "aA-aA-aa-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}\E${a}\l${a}" "aA-aA-aa-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}\E${a}\u${a}" "aA-aA-aa-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}\l${a}\Q${a}" "aA-aA-aa-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}\l${a}\L${a}" "aA-aA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}\l${a}\U${a}" "aA-aA-aa-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}\l${a}\E${a}" "aA-aA-aa-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}\l${a}\l${a}" "aA-aA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}\l${a}\u${a}" "aA-aA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}\u${a}\Q${a}" "aA-aA-aa-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}\u${a}\L${a}" "aA-aA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}\u${a}\U${a}" "aA-aA-aa-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}\u${a}\E${a}" "aA-aA-aa-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}\u${a}\l${a}" "aA-aA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\L${a}\u${a}\u${a}" "aA-aA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}\Q${a}\Q${a}" "aA-aA-AA-AA\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}\Q${a}\L${a}" "aA-aA-AA-AA\\-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}\Q${a}\U${a}" "aA-aA-AA-AA\\-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}\Q${a}\E${a}" "aA-aA-AA-AA\\-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}\Q${a}\l${a}" "aA-aA-AA-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}\Q${a}\u${a}" "aA-aA-AA-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}\L${a}\Q${a}" "aA-aA-AA-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}\L${a}\L${a}" "aA-aA-AA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}\L${a}\U${a}" "aA-aA-AA-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}\L${a}\E${a}" "aA-aA-AA-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}\L${a}\l${a}" "aA-aA-AA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}\L${a}\u${a}" "aA-aA-AA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}\U${a}\Q${a}" "aA-aA-AA-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}\U${a}\L${a}" "aA-aA-AA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}\U${a}\U${a}" "aA-aA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}\U${a}\E${a}" "aA-aA-AA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}\U${a}\l${a}" "aA-aA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}\U${a}\u${a}" "aA-aA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}\E${a}\Q${a}" "aA-aA-AA-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}\E${a}\L${a}" "aA-aA-AA-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}\E${a}\U${a}" "aA-aA-AA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}\E${a}\E${a}" "aA-aA-AA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}\E${a}\l${a}" "aA-aA-AA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}\E${a}\u${a}" "aA-aA-AA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}\l${a}\Q${a}" "aA-aA-AA-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}\l${a}\L${a}" "aA-aA-AA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}\l${a}\U${a}" "aA-aA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}\l${a}\E${a}" "aA-aA-AA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}\l${a}\l${a}" "aA-aA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}\l${a}\u${a}" "aA-aA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}\u${a}\Q${a}" "aA-aA-AA-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}\u${a}\L${a}" "aA-aA-AA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}\u${a}\U${a}" "aA-aA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}\u${a}\E${a}" "aA-aA-AA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}\u${a}\l${a}" "aA-aA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\U${a}\u${a}\u${a}" "aA-aA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}\Q${a}\Q${a}" "aA-aA-aA-aA\\-aA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}\Q${a}\L${a}" "aA-aA-aA-aA\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}\Q${a}\U${a}" "aA-aA-aA-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}\Q${a}\E${a}" "aA-aA-aA-aA\\-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}\Q${a}\l${a}" "aA-aA-aA-aA\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}\Q${a}\u${a}" "aA-aA-aA-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}\L${a}\Q${a}" "aA-aA-aA-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}\L${a}\L${a}" "aA-aA-aA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}\L${a}\U${a}" "aA-aA-aA-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}\L${a}\E${a}" "aA-aA-aA-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}\L${a}\l${a}" "aA-aA-aA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}\L${a}\u${a}" "aA-aA-aA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}\U${a}\Q${a}" "aA-aA-aA-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}\U${a}\L${a}" "aA-aA-aA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}\U${a}\U${a}" "aA-aA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}\U${a}\E${a}" "aA-aA-aA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}\U${a}\l${a}" "aA-aA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}\U${a}\u${a}" "aA-aA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}\E${a}\Q${a}" "aA-aA-aA-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}\E${a}\L${a}" "aA-aA-aA-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}\E${a}\U${a}" "aA-aA-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}\E${a}\E${a}" "aA-aA-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}\E${a}\l${a}" "aA-aA-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}\E${a}\u${a}" "aA-aA-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}\l${a}\Q${a}" "aA-aA-aA-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}\l${a}\L${a}" "aA-aA-aA-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}\l${a}\U${a}" "aA-aA-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}\l${a}\E${a}" "aA-aA-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}\l${a}\l${a}" "aA-aA-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}\l${a}\u${a}" "aA-aA-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}\u${a}\Q${a}" "aA-aA-aA-AA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}\u${a}\L${a}" "aA-aA-aA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}\u${a}\U${a}" "aA-aA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}\u${a}\E${a}" "aA-aA-aA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}\u${a}\l${a}" "aA-aA-aA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\E${a}\u${a}\u${a}" "aA-aA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}\Q${a}\Q${a}" "aA-aA-aA-aA\\-aA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}\Q${a}\L${a}" "aA-aA-aA-aA\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}\Q${a}\U${a}" "aA-aA-aA-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}\Q${a}\E${a}" "aA-aA-aA-aA\\-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}\Q${a}\l${a}" "aA-aA-aA-aA\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}\Q${a}\u${a}" "aA-aA-aA-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}\L${a}\Q${a}" "aA-aA-aA-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}\L${a}\L${a}" "aA-aA-aA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}\L${a}\U${a}" "aA-aA-aA-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}\L${a}\E${a}" "aA-aA-aA-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}\L${a}\l${a}" "aA-aA-aA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}\L${a}\u${a}" "aA-aA-aA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}\U${a}\Q${a}" "aA-aA-aA-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}\U${a}\L${a}" "aA-aA-aA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}\U${a}\U${a}" "aA-aA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}\U${a}\E${a}" "aA-aA-aA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}\U${a}\l${a}" "aA-aA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}\U${a}\u${a}" "aA-aA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}\E${a}\Q${a}" "aA-aA-aA-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}\E${a}\L${a}" "aA-aA-aA-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}\E${a}\U${a}" "aA-aA-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}\E${a}\E${a}" "aA-aA-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}\E${a}\l${a}" "aA-aA-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}\E${a}\u${a}" "aA-aA-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}\l${a}\Q${a}" "aA-aA-aA-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}\l${a}\L${a}" "aA-aA-aA-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}\l${a}\U${a}" "aA-aA-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}\l${a}\E${a}" "aA-aA-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}\l${a}\l${a}" "aA-aA-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}\l${a}\u${a}" "aA-aA-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}\u${a}\Q${a}" "aA-aA-aA-AA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}\u${a}\L${a}" "aA-aA-aA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}\u${a}\U${a}" "aA-aA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}\u${a}\E${a}" "aA-aA-aA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}\u${a}\l${a}" "aA-aA-aA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\l${a}\u${a}\u${a}" "aA-aA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}\Q${a}\Q${a}" "aA-aA-AA-aA\\-aA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}\Q${a}\L${a}" "aA-aA-AA-aA\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}\Q${a}\U${a}" "aA-aA-AA-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}\Q${a}\E${a}" "aA-aA-AA-aA\\-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}\Q${a}\l${a}" "aA-aA-AA-aA\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}\Q${a}\u${a}" "aA-aA-AA-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}\L${a}\Q${a}" "aA-aA-AA-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}\L${a}\L${a}" "aA-aA-AA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}\L${a}\U${a}" "aA-aA-AA-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}\L${a}\E${a}" "aA-aA-AA-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}\L${a}\l${a}" "aA-aA-AA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}\L${a}\u${a}" "aA-aA-AA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}\U${a}\Q${a}" "aA-aA-AA-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}\U${a}\L${a}" "aA-aA-AA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}\U${a}\U${a}" "aA-aA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}\U${a}\E${a}" "aA-aA-AA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}\U${a}\l${a}" "aA-aA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}\U${a}\u${a}" "aA-aA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}\E${a}\Q${a}" "aA-aA-AA-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}\E${a}\L${a}" "aA-aA-AA-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}\E${a}\U${a}" "aA-aA-AA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}\E${a}\E${a}" "aA-aA-AA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}\E${a}\l${a}" "aA-aA-AA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}\E${a}\u${a}" "aA-aA-AA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}\l${a}\Q${a}" "aA-aA-AA-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}\l${a}\L${a}" "aA-aA-AA-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}\l${a}\U${a}" "aA-aA-AA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}\l${a}\E${a}" "aA-aA-AA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}\l${a}\l${a}" "aA-aA-AA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}\l${a}\u${a}" "aA-aA-AA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}\u${a}\Q${a}" "aA-aA-AA-AA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}\u${a}\L${a}" "aA-aA-AA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}\u${a}\U${a}" "aA-aA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}\u${a}\E${a}" "aA-aA-AA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}\u${a}\l${a}" "aA-aA-AA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\E${a}\u${a}\u${a}\u${a}" "aA-aA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}\Q${a}\Q${a}" "aA-aA-aA\\-aA\\\\\\-aA\\\\\\\\\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}\Q${a}\L${a}" "aA-aA-aA\\-aA\\\\\\-aa\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}\Q${a}\U${a}" "aA-aA-aA\\-aA\\\\\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}\Q${a}\E${a}" "aA-aA-aA\\-aA\\\\\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}\Q${a}\l${a}" "aA-aA-aA\\-aA\\\\\\-aA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}\Q${a}\u${a}" "aA-aA-aA\\-aA\\\\\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}\L${a}\Q${a}" "aA-aA-aA\\-aa\\-aa\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}\L${a}\L${a}" "aA-aA-aA\\-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}\L${a}\U${a}" "aA-aA-aA\\-aa\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}\L${a}\E${a}" "aA-aA-aA\\-aa\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}\L${a}\l${a}" "aA-aA-aA\\-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}\L${a}\u${a}" "aA-aA-aA\\-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}\U${a}\Q${a}" "aA-aA-aA\\-AA\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}\U${a}\L${a}" "aA-aA-aA\\-AA\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}\U${a}\U${a}" "aA-aA-aA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}\U${a}\E${a}" "aA-aA-aA\\-AA\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}\U${a}\l${a}" "aA-aA-aA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}\U${a}\u${a}" "aA-aA-aA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}\E${a}\Q${a}" "aA-aA-aA\\-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}\E${a}\L${a}" "aA-aA-aA\\-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}\E${a}\U${a}" "aA-aA-aA\\-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}\E${a}\E${a}" "aA-aA-aA\\-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}\E${a}\l${a}" "aA-aA-aA\\-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}\E${a}\u${a}" "aA-aA-aA\\-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}\l${a}\Q${a}" "aA-aA-aA\\-aA\\-aA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}\l${a}\L${a}" "aA-aA-aA\\-aA\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}\l${a}\U${a}" "aA-aA-aA\\-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}\l${a}\E${a}" "aA-aA-aA\\-aA\\-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}\l${a}\l${a}" "aA-aA-aA\\-aA\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}\l${a}\u${a}" "aA-aA-aA\\-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}\u${a}\Q${a}" "aA-aA-aA\\-AA\\-aA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}\u${a}\L${a}" "aA-aA-aA\\-AA\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}\u${a}\U${a}" "aA-aA-aA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}\u${a}\E${a}" "aA-aA-aA\\-AA\\-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}\u${a}\l${a}" "aA-aA-aA\\-AA\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\Q${a}\u${a}\u${a}" "aA-aA-aA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}\Q${a}\Q${a}" "aA-aA-aa-aa\\-aa\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}\Q${a}\L${a}" "aA-aA-aa-aa\\-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}\Q${a}\U${a}" "aA-aA-aa-aa\\-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}\Q${a}\E${a}" "aA-aA-aa-aa\\-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}\Q${a}\l${a}" "aA-aA-aa-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}\Q${a}\u${a}" "aA-aA-aa-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}\L${a}\Q${a}" "aA-aA-aa-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}\L${a}\L${a}" "aA-aA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}\L${a}\U${a}" "aA-aA-aa-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}\L${a}\E${a}" "aA-aA-aa-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}\L${a}\l${a}" "aA-aA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}\L${a}\u${a}" "aA-aA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}\U${a}\Q${a}" "aA-aA-aa-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}\U${a}\L${a}" "aA-aA-aa-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}\U${a}\U${a}" "aA-aA-aa-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}\U${a}\E${a}" "aA-aA-aa-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}\U${a}\l${a}" "aA-aA-aa-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}\U${a}\u${a}" "aA-aA-aa-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}\E${a}\Q${a}" "aA-aA-aa-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}\E${a}\L${a}" "aA-aA-aa-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}\E${a}\U${a}" "aA-aA-aa-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}\E${a}\E${a}" "aA-aA-aa-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}\E${a}\l${a}" "aA-aA-aa-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}\E${a}\u${a}" "aA-aA-aa-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}\l${a}\Q${a}" "aA-aA-aa-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}\l${a}\L${a}" "aA-aA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}\l${a}\U${a}" "aA-aA-aa-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}\l${a}\E${a}" "aA-aA-aa-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}\l${a}\l${a}" "aA-aA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}\l${a}\u${a}" "aA-aA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}\u${a}\Q${a}" "aA-aA-aa-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}\u${a}\L${a}" "aA-aA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}\u${a}\U${a}" "aA-aA-aa-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}\u${a}\E${a}" "aA-aA-aa-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}\u${a}\l${a}" "aA-aA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\L${a}\u${a}\u${a}" "aA-aA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}\Q${a}\Q${a}" "aA-aA-AA-AA\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}\Q${a}\L${a}" "aA-aA-AA-AA\\-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}\Q${a}\U${a}" "aA-aA-AA-AA\\-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}\Q${a}\E${a}" "aA-aA-AA-AA\\-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}\Q${a}\l${a}" "aA-aA-AA-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}\Q${a}\u${a}" "aA-aA-AA-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}\L${a}\Q${a}" "aA-aA-AA-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}\L${a}\L${a}" "aA-aA-AA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}\L${a}\U${a}" "aA-aA-AA-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}\L${a}\E${a}" "aA-aA-AA-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}\L${a}\l${a}" "aA-aA-AA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}\L${a}\u${a}" "aA-aA-AA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}\U${a}\Q${a}" "aA-aA-AA-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}\U${a}\L${a}" "aA-aA-AA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}\U${a}\U${a}" "aA-aA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}\U${a}\E${a}" "aA-aA-AA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}\U${a}\l${a}" "aA-aA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}\U${a}\u${a}" "aA-aA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}\E${a}\Q${a}" "aA-aA-AA-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}\E${a}\L${a}" "aA-aA-AA-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}\E${a}\U${a}" "aA-aA-AA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}\E${a}\E${a}" "aA-aA-AA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}\E${a}\l${a}" "aA-aA-AA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}\E${a}\u${a}" "aA-aA-AA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}\l${a}\Q${a}" "aA-aA-AA-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}\l${a}\L${a}" "aA-aA-AA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}\l${a}\U${a}" "aA-aA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}\l${a}\E${a}" "aA-aA-AA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}\l${a}\l${a}" "aA-aA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}\l${a}\u${a}" "aA-aA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}\u${a}\Q${a}" "aA-aA-AA-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}\u${a}\L${a}" "aA-aA-AA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}\u${a}\U${a}" "aA-aA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}\u${a}\E${a}" "aA-aA-AA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}\u${a}\l${a}" "aA-aA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\U${a}\u${a}\u${a}" "aA-aA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}\Q${a}\Q${a}" "aA-aA-aA-aA\\-aA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}\Q${a}\L${a}" "aA-aA-aA-aA\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}\Q${a}\U${a}" "aA-aA-aA-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}\Q${a}\E${a}" "aA-aA-aA-aA\\-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}\Q${a}\l${a}" "aA-aA-aA-aA\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}\Q${a}\u${a}" "aA-aA-aA-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}\L${a}\Q${a}" "aA-aA-aA-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}\L${a}\L${a}" "aA-aA-aA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}\L${a}\U${a}" "aA-aA-aA-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}\L${a}\E${a}" "aA-aA-aA-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}\L${a}\l${a}" "aA-aA-aA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}\L${a}\u${a}" "aA-aA-aA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}\U${a}\Q${a}" "aA-aA-aA-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}\U${a}\L${a}" "aA-aA-aA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}\U${a}\U${a}" "aA-aA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}\U${a}\E${a}" "aA-aA-aA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}\U${a}\l${a}" "aA-aA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}\U${a}\u${a}" "aA-aA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}\E${a}\Q${a}" "aA-aA-aA-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}\E${a}\L${a}" "aA-aA-aA-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}\E${a}\U${a}" "aA-aA-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}\E${a}\E${a}" "aA-aA-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}\E${a}\l${a}" "aA-aA-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}\E${a}\u${a}" "aA-aA-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}\l${a}\Q${a}" "aA-aA-aA-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}\l${a}\L${a}" "aA-aA-aA-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}\l${a}\U${a}" "aA-aA-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}\l${a}\E${a}" "aA-aA-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}\l${a}\l${a}" "aA-aA-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}\l${a}\u${a}" "aA-aA-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}\u${a}\Q${a}" "aA-aA-aA-AA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}\u${a}\L${a}" "aA-aA-aA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}\u${a}\U${a}" "aA-aA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}\u${a}\E${a}" "aA-aA-aA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}\u${a}\l${a}" "aA-aA-aA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\E${a}\u${a}\u${a}" "aA-aA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}\Q${a}\Q${a}" "aA-aA-aA-aA\\-aA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}\Q${a}\L${a}" "aA-aA-aA-aA\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}\Q${a}\U${a}" "aA-aA-aA-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}\Q${a}\E${a}" "aA-aA-aA-aA\\-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}\Q${a}\l${a}" "aA-aA-aA-aA\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}\Q${a}\u${a}" "aA-aA-aA-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}\L${a}\Q${a}" "aA-aA-aA-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}\L${a}\L${a}" "aA-aA-aA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}\L${a}\U${a}" "aA-aA-aA-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}\L${a}\E${a}" "aA-aA-aA-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}\L${a}\l${a}" "aA-aA-aA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}\L${a}\u${a}" "aA-aA-aA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}\U${a}\Q${a}" "aA-aA-aA-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}\U${a}\L${a}" "aA-aA-aA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}\U${a}\U${a}" "aA-aA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}\U${a}\E${a}" "aA-aA-aA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}\U${a}\l${a}" "aA-aA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}\U${a}\u${a}" "aA-aA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}\E${a}\Q${a}" "aA-aA-aA-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}\E${a}\L${a}" "aA-aA-aA-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}\E${a}\U${a}" "aA-aA-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}\E${a}\E${a}" "aA-aA-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}\E${a}\l${a}" "aA-aA-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}\E${a}\u${a}" "aA-aA-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}\l${a}\Q${a}" "aA-aA-aA-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}\l${a}\L${a}" "aA-aA-aA-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}\l${a}\U${a}" "aA-aA-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}\l${a}\E${a}" "aA-aA-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}\l${a}\l${a}" "aA-aA-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}\l${a}\u${a}" "aA-aA-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}\u${a}\Q${a}" "aA-aA-aA-AA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}\u${a}\L${a}" "aA-aA-aA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}\u${a}\U${a}" "aA-aA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}\u${a}\E${a}" "aA-aA-aA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}\u${a}\l${a}" "aA-aA-aA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\l${a}\u${a}\u${a}" "aA-aA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}\Q${a}\Q${a}" "aA-aA-AA-aA\\-aA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}\Q${a}\L${a}" "aA-aA-AA-aA\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}\Q${a}\U${a}" "aA-aA-AA-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}\Q${a}\E${a}" "aA-aA-AA-aA\\-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}\Q${a}\l${a}" "aA-aA-AA-aA\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}\Q${a}\u${a}" "aA-aA-AA-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}\L${a}\Q${a}" "aA-aA-AA-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}\L${a}\L${a}" "aA-aA-AA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}\L${a}\U${a}" "aA-aA-AA-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}\L${a}\E${a}" "aA-aA-AA-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}\L${a}\l${a}" "aA-aA-AA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}\L${a}\u${a}" "aA-aA-AA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}\U${a}\Q${a}" "aA-aA-AA-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}\U${a}\L${a}" "aA-aA-AA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}\U${a}\U${a}" "aA-aA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}\U${a}\E${a}" "aA-aA-AA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}\U${a}\l${a}" "aA-aA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}\U${a}\u${a}" "aA-aA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}\E${a}\Q${a}" "aA-aA-AA-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}\E${a}\L${a}" "aA-aA-AA-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}\E${a}\U${a}" "aA-aA-AA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}\E${a}\E${a}" "aA-aA-AA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}\E${a}\l${a}" "aA-aA-AA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}\E${a}\u${a}" "aA-aA-AA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}\l${a}\Q${a}" "aA-aA-AA-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}\l${a}\L${a}" "aA-aA-AA-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}\l${a}\U${a}" "aA-aA-AA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}\l${a}\E${a}" "aA-aA-AA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}\l${a}\l${a}" "aA-aA-AA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}\l${a}\u${a}" "aA-aA-AA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}\u${a}\Q${a}" "aA-aA-AA-AA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}\u${a}\L${a}" "aA-aA-AA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}\u${a}\U${a}" "aA-aA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}\u${a}\E${a}" "aA-aA-AA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}\u${a}\l${a}" "aA-aA-AA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\l${a}\u${a}\u${a}\u${a}" "aA-aA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}\Q${a}\Q${a}" "aA-AA-aA\\-aA\\\\\\-aA\\\\\\\\\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}\Q${a}\L${a}" "aA-AA-aA\\-aA\\\\\\-aa\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}\Q${a}\U${a}" "aA-AA-aA\\-aA\\\\\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}\Q${a}\E${a}" "aA-AA-aA\\-aA\\\\\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}\Q${a}\l${a}" "aA-AA-aA\\-aA\\\\\\-aA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}\Q${a}\u${a}" "aA-AA-aA\\-aA\\\\\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}\L${a}\Q${a}" "aA-AA-aA\\-aa\\-aa\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}\L${a}\L${a}" "aA-AA-aA\\-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}\L${a}\U${a}" "aA-AA-aA\\-aa\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}\L${a}\E${a}" "aA-AA-aA\\-aa\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}\L${a}\l${a}" "aA-AA-aA\\-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}\L${a}\u${a}" "aA-AA-aA\\-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}\U${a}\Q${a}" "aA-AA-aA\\-AA\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}\U${a}\L${a}" "aA-AA-aA\\-AA\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}\U${a}\U${a}" "aA-AA-aA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}\U${a}\E${a}" "aA-AA-aA\\-AA\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}\U${a}\l${a}" "aA-AA-aA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}\U${a}\u${a}" "aA-AA-aA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}\E${a}\Q${a}" "aA-AA-aA\\-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}\E${a}\L${a}" "aA-AA-aA\\-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}\E${a}\U${a}" "aA-AA-aA\\-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}\E${a}\E${a}" "aA-AA-aA\\-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}\E${a}\l${a}" "aA-AA-aA\\-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}\E${a}\u${a}" "aA-AA-aA\\-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}\l${a}\Q${a}" "aA-AA-aA\\-aA\\-aA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}\l${a}\L${a}" "aA-AA-aA\\-aA\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}\l${a}\U${a}" "aA-AA-aA\\-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}\l${a}\E${a}" "aA-AA-aA\\-aA\\-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}\l${a}\l${a}" "aA-AA-aA\\-aA\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}\l${a}\u${a}" "aA-AA-aA\\-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}\u${a}\Q${a}" "aA-AA-aA\\-AA\\-aA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}\u${a}\L${a}" "aA-AA-aA\\-AA\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}\u${a}\U${a}" "aA-AA-aA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}\u${a}\E${a}" "aA-AA-aA\\-AA\\-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}\u${a}\l${a}" "aA-AA-aA\\-AA\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\Q${a}\u${a}\u${a}" "aA-AA-aA\\-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}\Q${a}\Q${a}" "aA-AA-aa-aa\\-aa\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}\Q${a}\L${a}" "aA-AA-aa-aa\\-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}\Q${a}\U${a}" "aA-AA-aa-aa\\-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}\Q${a}\E${a}" "aA-AA-aa-aa\\-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}\Q${a}\l${a}" "aA-AA-aa-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}\Q${a}\u${a}" "aA-AA-aa-aa\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}\L${a}\Q${a}" "aA-AA-aa-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}\L${a}\L${a}" "aA-AA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}\L${a}\U${a}" "aA-AA-aa-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}\L${a}\E${a}" "aA-AA-aa-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}\L${a}\l${a}" "aA-AA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}\L${a}\u${a}" "aA-AA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}\U${a}\Q${a}" "aA-AA-aa-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}\U${a}\L${a}" "aA-AA-aa-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}\U${a}\U${a}" "aA-AA-aa-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}\U${a}\E${a}" "aA-AA-aa-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}\U${a}\l${a}" "aA-AA-aa-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}\U${a}\u${a}" "aA-AA-aa-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}\E${a}\Q${a}" "aA-AA-aa-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}\E${a}\L${a}" "aA-AA-aa-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}\E${a}\U${a}" "aA-AA-aa-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}\E${a}\E${a}" "aA-AA-aa-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}\E${a}\l${a}" "aA-AA-aa-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}\E${a}\u${a}" "aA-AA-aa-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}\l${a}\Q${a}" "aA-AA-aa-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}\l${a}\L${a}" "aA-AA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}\l${a}\U${a}" "aA-AA-aa-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}\l${a}\E${a}" "aA-AA-aa-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}\l${a}\l${a}" "aA-AA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}\l${a}\u${a}" "aA-AA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}\u${a}\Q${a}" "aA-AA-aa-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}\u${a}\L${a}" "aA-AA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}\u${a}\U${a}" "aA-AA-aa-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}\u${a}\E${a}" "aA-AA-aa-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}\u${a}\l${a}" "aA-AA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\L${a}\u${a}\u${a}" "aA-AA-aa-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}\Q${a}\Q${a}" "aA-AA-AA-AA\\-AA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}\Q${a}\L${a}" "aA-AA-AA-AA\\-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}\Q${a}\U${a}" "aA-AA-AA-AA\\-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}\Q${a}\E${a}" "aA-AA-AA-AA\\-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}\Q${a}\l${a}" "aA-AA-AA-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}\Q${a}\u${a}" "aA-AA-AA-AA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}\L${a}\Q${a}" "aA-AA-AA-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}\L${a}\L${a}" "aA-AA-AA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}\L${a}\U${a}" "aA-AA-AA-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}\L${a}\E${a}" "aA-AA-AA-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}\L${a}\l${a}" "aA-AA-AA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}\L${a}\u${a}" "aA-AA-AA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}\U${a}\Q${a}" "aA-AA-AA-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}\U${a}\L${a}" "aA-AA-AA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}\U${a}\U${a}" "aA-AA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}\U${a}\E${a}" "aA-AA-AA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}\U${a}\l${a}" "aA-AA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}\U${a}\u${a}" "aA-AA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}\E${a}\Q${a}" "aA-AA-AA-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}\E${a}\L${a}" "aA-AA-AA-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}\E${a}\U${a}" "aA-AA-AA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}\E${a}\E${a}" "aA-AA-AA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}\E${a}\l${a}" "aA-AA-AA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}\E${a}\u${a}" "aA-AA-AA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}\l${a}\Q${a}" "aA-AA-AA-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}\l${a}\L${a}" "aA-AA-AA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}\l${a}\U${a}" "aA-AA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}\l${a}\E${a}" "aA-AA-AA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}\l${a}\l${a}" "aA-AA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}\l${a}\u${a}" "aA-AA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}\u${a}\Q${a}" "aA-AA-AA-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}\u${a}\L${a}" "aA-AA-AA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}\u${a}\U${a}" "aA-AA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}\u${a}\E${a}" "aA-AA-AA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}\u${a}\l${a}" "aA-AA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\U${a}\u${a}\u${a}" "aA-AA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}\Q${a}\Q${a}" "aA-AA-aA-aA\\-aA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}\Q${a}\L${a}" "aA-AA-aA-aA\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}\Q${a}\U${a}" "aA-AA-aA-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}\Q${a}\E${a}" "aA-AA-aA-aA\\-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}\Q${a}\l${a}" "aA-AA-aA-aA\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}\Q${a}\u${a}" "aA-AA-aA-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}\L${a}\Q${a}" "aA-AA-aA-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}\L${a}\L${a}" "aA-AA-aA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}\L${a}\U${a}" "aA-AA-aA-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}\L${a}\E${a}" "aA-AA-aA-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}\L${a}\l${a}" "aA-AA-aA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}\L${a}\u${a}" "aA-AA-aA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}\U${a}\Q${a}" "aA-AA-aA-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}\U${a}\L${a}" "aA-AA-aA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}\U${a}\U${a}" "aA-AA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}\U${a}\E${a}" "aA-AA-aA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}\U${a}\l${a}" "aA-AA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}\U${a}\u${a}" "aA-AA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}\E${a}\Q${a}" "aA-AA-aA-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}\E${a}\L${a}" "aA-AA-aA-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}\E${a}\U${a}" "aA-AA-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}\E${a}\E${a}" "aA-AA-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}\E${a}\l${a}" "aA-AA-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}\E${a}\u${a}" "aA-AA-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}\l${a}\Q${a}" "aA-AA-aA-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}\l${a}\L${a}" "aA-AA-aA-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}\l${a}\U${a}" "aA-AA-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}\l${a}\E${a}" "aA-AA-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}\l${a}\l${a}" "aA-AA-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}\l${a}\u${a}" "aA-AA-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}\u${a}\Q${a}" "aA-AA-aA-AA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}\u${a}\L${a}" "aA-AA-aA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}\u${a}\U${a}" "aA-AA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}\u${a}\E${a}" "aA-AA-aA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}\u${a}\l${a}" "aA-AA-aA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\E${a}\u${a}\u${a}" "aA-AA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}\Q${a}\Q${a}" "aA-AA-aA-aA\\-aA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}\Q${a}\L${a}" "aA-AA-aA-aA\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}\Q${a}\U${a}" "aA-AA-aA-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}\Q${a}\E${a}" "aA-AA-aA-aA\\-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}\Q${a}\l${a}" "aA-AA-aA-aA\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}\Q${a}\u${a}" "aA-AA-aA-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}\L${a}\Q${a}" "aA-AA-aA-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}\L${a}\L${a}" "aA-AA-aA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}\L${a}\U${a}" "aA-AA-aA-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}\L${a}\E${a}" "aA-AA-aA-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}\L${a}\l${a}" "aA-AA-aA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}\L${a}\u${a}" "aA-AA-aA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}\U${a}\Q${a}" "aA-AA-aA-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}\U${a}\L${a}" "aA-AA-aA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}\U${a}\U${a}" "aA-AA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}\U${a}\E${a}" "aA-AA-aA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}\U${a}\l${a}" "aA-AA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}\U${a}\u${a}" "aA-AA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}\E${a}\Q${a}" "aA-AA-aA-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}\E${a}\L${a}" "aA-AA-aA-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}\E${a}\U${a}" "aA-AA-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}\E${a}\E${a}" "aA-AA-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}\E${a}\l${a}" "aA-AA-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}\E${a}\u${a}" "aA-AA-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}\l${a}\Q${a}" "aA-AA-aA-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}\l${a}\L${a}" "aA-AA-aA-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}\l${a}\U${a}" "aA-AA-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}\l${a}\E${a}" "aA-AA-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}\l${a}\l${a}" "aA-AA-aA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}\l${a}\u${a}" "aA-AA-aA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}\u${a}\Q${a}" "aA-AA-aA-AA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}\u${a}\L${a}" "aA-AA-aA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}\u${a}\U${a}" "aA-AA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}\u${a}\E${a}" "aA-AA-aA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}\u${a}\l${a}" "aA-AA-aA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\l${a}\u${a}\u${a}" "aA-AA-aA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}\Q${a}\Q${a}" "aA-AA-AA-aA\\-aA\\\\\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}\Q${a}\L${a}" "aA-AA-AA-aA\\-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}\Q${a}\U${a}" "aA-AA-AA-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}\Q${a}\E${a}" "aA-AA-AA-aA\\-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}\Q${a}\l${a}" "aA-AA-AA-aA\\-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}\Q${a}\u${a}" "aA-AA-AA-aA\\-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}\L${a}\Q${a}" "aA-AA-AA-aa-aa\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}\L${a}\L${a}" "aA-AA-AA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}\L${a}\U${a}" "aA-AA-AA-aa-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}\L${a}\E${a}" "aA-AA-AA-aa-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}\L${a}\l${a}" "aA-AA-AA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}\L${a}\u${a}" "aA-AA-AA-aa-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}\U${a}\Q${a}" "aA-AA-AA-AA-AA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}\U${a}\L${a}" "aA-AA-AA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}\U${a}\U${a}" "aA-AA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}\U${a}\E${a}" "aA-AA-AA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}\U${a}\l${a}" "aA-AA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}\U${a}\u${a}" "aA-AA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}\E${a}\Q${a}" "aA-AA-AA-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}\E${a}\L${a}" "aA-AA-AA-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}\E${a}\U${a}" "aA-AA-AA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}\E${a}\E${a}" "aA-AA-AA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}\E${a}\l${a}" "aA-AA-AA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}\E${a}\u${a}" "aA-AA-AA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}\l${a}\Q${a}" "aA-AA-AA-aA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}\l${a}\L${a}" "aA-AA-AA-aA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}\l${a}\U${a}" "aA-AA-AA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}\l${a}\E${a}" "aA-AA-AA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}\l${a}\l${a}" "aA-AA-AA-aA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}\l${a}\u${a}" "aA-AA-AA-aA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}\u${a}\Q${a}" "aA-AA-AA-AA-aA\\-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}\u${a}\L${a}" "aA-AA-AA-AA-aa-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}\u${a}\U${a}" "aA-AA-AA-AA-AA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}\u${a}\E${a}" "aA-AA-AA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}\u${a}\l${a}" "aA-AA-AA-AA-aA-"))
+(let ((a "aA-"))
+ (test #?"${a}\u${a}\u${a}\u${a}\u${a}" "aA-AA-AA-AA-AA-"))
+
+(disable-interpol-syntax)
Added: branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/unicode.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/unicode.lisp 2007-10-04 19:13:23 UTC (rev 2205)
+++ branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/unicode.lisp 2007-10-04 19:49:06 UTC (rev 2206)
@@ -0,0 +1,13912 @@
+;;; -*- Mode: LISP; Syntax: COMMON-LISP; Package: CL-INTERPOL; Base: 10 -*-
+;;; $Header: /usr/local/cvsrep/cl-interpol/unicode.lisp,v 1.6 2003/10/22 09:22:45 edi Exp $
+
+;;; Copyright (c) 2003, Dr. Edmund Weitz. All rights reserved.
+
+;;; Redistribution and use in source and binary forms, with or without
+;;; modification, are permitted provided that the following conditions
+;;; are met:
+
+;;; * Redistributions of source code must retain the above copyright
+;;; notice, this list of conditions and the following disclaimer.
+
+;;; * Redistributions in binary form must reproduce the above
+;;; copyright notice, this list of conditions and the following
+;;; disclaimer in the documentation and/or other materials
+;;; provided with the distribution.
+
+;;; THIS SOFTWARE IS PROVIDED BY THE AUTHOR 'AS IS' AND ANY EXPRESSED
+;;; OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
+;;; WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+;;; ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
+;;; DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+;;; DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
+;;; GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
+;;; INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
+;;; WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
+;;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
+;;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+
+(in-package #:cl-interpol)
+
+;;; this code prepares the hashtable *UNICODE-NAMES*
+
+(loop for (name . code) in '(("NULL" . 0)
+ ("START OF HEADING" . 1)
+ ("START OF TEXT" . 2)
+ ("END OF TEXT" . 3)
+ ("END OF TRANSMISSION" . 4)
+ ("ENQUIRY" . 5)
+ ("ACKNOWLEDGE" . 6)
+ ("BELL" . 7)
+ ("BACKSPACE" . 8)
+ ("CHARACTER TABULATION" . 9)
+ ("LINE FEED (LF)" . 10)
+ ("LINE TABULATION" . 11)
+ ("FORM FEED (FF)" . 12)
+ ("CARRIAGE RETURN (CR)" . 13)
+ ("SHIFT OUT" . 14)
+ ("SHIFT IN" . 15)
+ ("DATA LINK ESCAPE" . 16)
+ ("DEVICE CONTROL ONE" . 17)
+ ("DEVICE CONTROL TWO" . 18)
+ ("DEVICE CONTROL THREE" . 19)
+ ("DEVICE CONTROL FOUR" . 20)
+ ("NEGATIVE ACKNOWLEDGE" . 21)
+ ("SYNCHRONOUS IDLE" . 22)
+ ("END OF TRANSMISSION BLOCK" . 23)
+ ("CANCEL" . 24)
+ ("END OF MEDIUM" . 25)
+ ("SUBSTITUTE" . 26)
+ ("ESCAPE" . 27)
+ ("INFORMATION SEPARATOR FOUR" . 28)
+ ("INFORMATION SEPARATOR THREE" . 29)
+ ("INFORMATION SEPARATOR TWO" . 30)
+ ("INFORMATION SEPARATOR ONE" . 31)
+ ("SPACE" . 32)
+ ("EXCLAMATION MARK" . 33)
+ ("QUOTATION MARK" . 34)
+ ("NUMBER SIGN" . 35)
+ ("DOLLAR SIGN" . 36)
+ ("PERCENT SIGN" . 37)
+ ("AMPERSAND" . 38)
+ ("APOSTROPHE" . 39)
+ ("LEFT PARENTHESIS" . 40)
+ ("RIGHT PARENTHESIS" . 41)
+ ("ASTERISK" . 42)
+ ("PLUS SIGN" . 43)
+ ("COMMA" . 44)
+ ("HYPHEN-MINUS" . 45)
+ ("FULL STOP" . 46)
+ ("SOLIDUS" . 47)
+ ("DIGIT ZERO" . 48)
+ ("DIGIT ONE" . 49)
+ ("DIGIT TWO" . 50)
+ ("DIGIT THREE" . 51)
+ ("DIGIT FOUR" . 52)
+ ("DIGIT FIVE" . 53)
+ ("DIGIT SIX" . 54)
+ ("DIGIT SEVEN" . 55)
+ ("DIGIT EIGHT" . 56)
+ ("DIGIT NINE" . 57)
+ ("COLON" . 58)
+ ("SEMICOLON" . 59)
+ ("LESS-THAN SIGN" . 60)
+ ("EQUALS SIGN" . 61)
+ ("GREATER-THAN SIGN" . 62)
+ ("QUESTION MARK" . 63)
+ ("COMMERCIAL AT" . 64)
+ ("LATIN CAPITAL LETTER A" . 65)
+ ("LATIN CAPITAL LETTER B" . 66)
+ ("LATIN CAPITAL LETTER C" . 67)
+ ("LATIN CAPITAL LETTER D" . 68)
+ ("LATIN CAPITAL LETTER E" . 69)
+ ("LATIN CAPITAL LETTER F" . 70)
+ ("LATIN CAPITAL LETTER G" . 71)
+ ("LATIN CAPITAL LETTER H" . 72)
+ ("LATIN CAPITAL LETTER I" . 73)
+ ("LATIN CAPITAL LETTER J" . 74)
+ ("LATIN CAPITAL LETTER K" . 75)
+ ("LATIN CAPITAL LETTER L" . 76)
+ ("LATIN CAPITAL LETTER M" . 77)
+ ("LATIN CAPITAL LETTER N" . 78)
+ ("LATIN CAPITAL LETTER O" . 79)
+ ("LATIN CAPITAL LETTER P" . 80)
+ ("LATIN CAPITAL LETTER Q" . 81)
+ ("LATIN CAPITAL LETTER R" . 82)
+ ("LATIN CAPITAL LETTER S" . 83)
+ ("LATIN CAPITAL LETTER T" . 84)
+ ("LATIN CAPITAL LETTER U" . 85)
+ ("LATIN CAPITAL LETTER V" . 86)
+ ("LATIN CAPITAL LETTER W" . 87)
+ ("LATIN CAPITAL LETTER X" . 88)
+ ("LATIN CAPITAL LETTER Y" . 89)
+ ("LATIN CAPITAL LETTER Z" . 90)
+ ("LEFT SQUARE BRACKET" . 91)
+ ("REVERSE SOLIDUS" . 92)
+ ("RIGHT SQUARE BRACKET" . 93)
+ ("CIRCUMFLEX ACCENT" . 94)
+ ("LOW LINE" . 95)
+ ("GRAVE ACCENT" . 96)
+ ("LATIN SMALL LETTER A" . 97)
+ ("LATIN SMALL LETTER B" . 98)
+ ("LATIN SMALL LETTER C" . 99)
+ ("LATIN SMALL LETTER D" . 100)
+ ("LATIN SMALL LETTER E" . 101)
+ ("LATIN SMALL LETTER F" . 102)
+ ("LATIN SMALL LETTER G" . 103)
+ ("LATIN SMALL LETTER H" . 104)
+ ("LATIN SMALL LETTER I" . 105)
+ ("LATIN SMALL LETTER J" . 106)
+ ("LATIN SMALL LETTER K" . 107)
+ ("LATIN SMALL LETTER L" . 108)
+ ("LATIN SMALL LETTER M" . 109)
+ ("LATIN SMALL LETTER N" . 110)
+ ("LATIN SMALL LETTER O" . 111)
+ ("LATIN SMALL LETTER P" . 112)
+ ("LATIN SMALL LETTER Q" . 113)
+ ("LATIN SMALL LETTER R" . 114)
+ ("LATIN SMALL LETTER S" . 115)
+ ("LATIN SMALL LETTER T" . 116)
+ ("LATIN SMALL LETTER U" . 117)
+ ("LATIN SMALL LETTER V" . 118)
+ ("LATIN SMALL LETTER W" . 119)
+ ("LATIN SMALL LETTER X" . 120)
+ ("LATIN SMALL LETTER Y" . 121)
+ ("LATIN SMALL LETTER Z" . 122)
+ ("LEFT CURLY BRACKET" . 123)
+ ("VERTICAL LINE" . 124)
+ ("RIGHT CURLY BRACKET" . 125)
+ ("TILDE" . 126)
+ ("DELETE" . 127)
+ ("BREAK PERMITTED HERE" . 130)
+ ("NO BREAK HERE" . 131)
+ ("NEXT LINE (NEL)" . 133)
+ ("START OF SELECTED AREA" . 134)
+ ("END OF SELECTED AREA" . 135)
+ ("CHARACTER TABULATION SET" . 136)
+ ("CHARACTER TABULATION WITH JUSTIFICATION" . 137)
+ ("LINE TABULATION SET" . 138)
+ ("PARTIAL LINE FORWARD" . 139)
+ ("PARTIAL LINE BACKWARD" . 140)
+ ("REVERSE LINE FEED" . 141)
+ ("SINGLE SHIFT TWO" . 142)
+ ("SINGLE SHIFT THREE" . 143)
+ ("DEVICE CONTROL STRING" . 144)
+ ("PRIVATE USE ONE" . 145)
+ ("PRIVATE USE TWO" . 146)
+ ("SET TRANSMIT STATE" . 147)
+ ("CANCEL CHARACTER" . 148)
+ ("MESSAGE WAITING" . 149)
+ ("START OF GUARDED AREA" . 150)
+ ("END OF GUARDED AREA" . 151)
+ ("START OF STRING" . 152)
+ ("SINGLE CHARACTER INTRODUCER" . 154)
+ ("CONTROL SEQUENCE INTRODUCER" . 155)
+ ("STRING TERMINATOR" . 156)
+ ("OPERATING SYSTEM COMMAND" . 157)
+ ("PRIVACY MESSAGE" . 158)
+ ("APPLICATION PROGRAM COMMAND" . 159)
+ ("NO-BREAK SPACE" . 160)
+ ("INVERTED EXCLAMATION MARK" . 161)
+ ("CENT SIGN" . 162)
+ ("POUND SIGN" . 163)
+ ("CURRENCY SIGN" . 164)
+ ("YEN SIGN" . 165)
+ ("BROKEN BAR" . 166)
+ ("SECTION SIGN" . 167)
+ ("DIAERESIS" . 168)
+ ("COPYRIGHT SIGN" . 169)
+ ("FEMININE ORDINAL INDICATOR" . 170)
+ ("LEFT-POINTING DOUBLE ANGLE QUOTATION MARK" . 171)
+ ("NOT SIGN" . 172)
+ ("SOFT HYPHEN" . 173)
+ ("REGISTERED SIGN" . 174)
+ ("MACRON" . 175)
+ ("DEGREE SIGN" . 176)
+ ("PLUS-MINUS SIGN" . 177)
+ ("SUPERSCRIPT TWO" . 178)
+ ("SUPERSCRIPT THREE" . 179)
+ ("ACUTE ACCENT" . 180)
+ ("MICRO SIGN" . 181)
+ ("PILCROW SIGN" . 182)
+ ("MIDDLE DOT" . 183)
+ ("CEDILLA" . 184)
+ ("SUPERSCRIPT ONE" . 185)
+ ("MASCULINE ORDINAL INDICATOR" . 186)
+ ("RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK" . 187)
+ ("VULGAR FRACTION ONE QUARTER" . 188)
+ ("VULGAR FRACTION ONE HALF" . 189)
+ ("VULGAR FRACTION THREE QUARTERS" . 190)
+ ("INVERTED QUESTION MARK" . 191)
+ ("LATIN CAPITAL LETTER A WITH GRAVE" . 192)
+ ("LATIN CAPITAL LETTER A WITH ACUTE" . 193)
+ ("LATIN CAPITAL LETTER A WITH CIRCUMFLEX" . 194)
+ ("LATIN CAPITAL LETTER A WITH TILDE" . 195)
+ ("LATIN CAPITAL LETTER A WITH DIAERESIS" . 196)
+ ("LATIN CAPITAL LETTER A WITH RING ABOVE" . 197)
+ ("LATIN CAPITAL LETTER AE" . 198)
+ ("LATIN CAPITAL LETTER C WITH CEDILLA" . 199)
+ ("LATIN CAPITAL LETTER E WITH GRAVE" . 200)
+ ("LATIN CAPITAL LETTER E WITH ACUTE" . 201)
+ ("LATIN CAPITAL LETTER E WITH CIRCUMFLEX" . 202)
+ ("LATIN CAPITAL LETTER E WITH DIAERESIS" . 203)
+ ("LATIN CAPITAL LETTER I WITH GRAVE" . 204)
+ ("LATIN CAPITAL LETTER I WITH ACUTE" . 205)
+ ("LATIN CAPITAL LETTER I WITH CIRCUMFLEX" . 206)
+ ("LATIN CAPITAL LETTER I WITH DIAERESIS" . 207)
+ ("LATIN CAPITAL LETTER ETH" . 208)
+ ("LATIN CAPITAL LETTER N WITH TILDE" . 209)
+ ("LATIN CAPITAL LETTER O WITH GRAVE" . 210)
+ ("LATIN CAPITAL LETTER O WITH ACUTE" . 211)
+ ("LATIN CAPITAL LETTER O WITH CIRCUMFLEX" . 212)
+ ("LATIN CAPITAL LETTER O WITH TILDE" . 213)
+ ("LATIN CAPITAL LETTER O WITH DIAERESIS" . 214)
+ ("MULTIPLICATION SIGN" . 215)
+ ("LATIN CAPITAL LETTER O WITH STROKE" . 216)
+ ("LATIN CAPITAL LETTER U WITH GRAVE" . 217)
+ ("LATIN CAPITAL LETTER U WITH ACUTE" . 218)
+ ("LATIN CAPITAL LETTER U WITH CIRCUMFLEX" . 219)
+ ("LATIN CAPITAL LETTER U WITH DIAERESIS" . 220)
+ ("LATIN CAPITAL LETTER Y WITH ACUTE" . 221)
+ ("LATIN CAPITAL LETTER THORN" . 222)
+ ("LATIN SMALL LETTER SHARP S" . 223)
+ ("LATIN SMALL LETTER A WITH GRAVE" . 224)
+ ("LATIN SMALL LETTER A WITH ACUTE" . 225)
+ ("LATIN SMALL LETTER A WITH CIRCUMFLEX" . 226)
+ ("LATIN SMALL LETTER A WITH TILDE" . 227)
+ ("LATIN SMALL LETTER A WITH DIAERESIS" . 228)
+ ("LATIN SMALL LETTER A WITH RING ABOVE" . 229)
+ ("LATIN SMALL LETTER AE" . 230)
+ ("LATIN SMALL LETTER C WITH CEDILLA" . 231)
+ ("LATIN SMALL LETTER E WITH GRAVE" . 232)
+ ("LATIN SMALL LETTER E WITH ACUTE" . 233)
+ ("LATIN SMALL LETTER E WITH CIRCUMFLEX" . 234)
+ ("LATIN SMALL LETTER E WITH DIAERESIS" . 235)
+ ("LATIN SMALL LETTER I WITH GRAVE" . 236)
+ ("LATIN SMALL LETTER I WITH ACUTE" . 237)
+ ("LATIN SMALL LETTER I WITH CIRCUMFLEX" . 238)
+ ("LATIN SMALL LETTER I WITH DIAERESIS" . 239)
+ ("LATIN SMALL LETTER ETH" . 240)
+ ("LATIN SMALL LETTER N WITH TILDE" . 241)
+ ("LATIN SMALL LETTER O WITH GRAVE" . 242)
+ ("LATIN SMALL LETTER O WITH ACUTE" . 243)
+ ("LATIN SMALL LETTER O WITH CIRCUMFLEX" . 244)
+ ("LATIN SMALL LETTER O WITH TILDE" . 245)
+ ("LATIN SMALL LETTER O WITH DIAERESIS" . 246)
+ ("DIVISION SIGN" . 247)
+ ("LATIN SMALL LETTER O WITH STROKE" . 248)
+ ("LATIN SMALL LETTER U WITH GRAVE" . 249)
+ ("LATIN SMALL LETTER U WITH ACUTE" . 250)
+ ("LATIN SMALL LETTER U WITH CIRCUMFLEX" . 251)
+ ("LATIN SMALL LETTER U WITH DIAERESIS" . 252)
+ ("LATIN SMALL LETTER Y WITH ACUTE" . 253)
+ ("LATIN SMALL LETTER THORN" . 254)
+ ("LATIN SMALL LETTER Y WITH DIAERESIS" . 255)
+ ("LATIN CAPITAL LETTER A WITH MACRON" . 256)
+ ("LATIN SMALL LETTER A WITH MACRON" . 257)
+ ("LATIN CAPITAL LETTER A WITH BREVE" . 258)
+ ("LATIN SMALL LETTER A WITH BREVE" . 259)
+ ("LATIN CAPITAL LETTER A WITH OGONEK" . 260)
+ ("LATIN SMALL LETTER A WITH OGONEK" . 261)
+ ("LATIN CAPITAL LETTER C WITH ACUTE" . 262)
+ ("LATIN SMALL LETTER C WITH ACUTE" . 263)
+ ("LATIN CAPITAL LETTER C WITH CIRCUMFLEX" . 264)
+ ("LATIN SMALL LETTER C WITH CIRCUMFLEX" . 265)
+ ("LATIN CAPITAL LETTER C WITH DOT ABOVE" . 266)
+ ("LATIN SMALL LETTER C WITH DOT ABOVE" . 267)
+ ("LATIN CAPITAL LETTER C WITH CARON" . 268)
+ ("LATIN SMALL LETTER C WITH CARON" . 269)
+ ("LATIN CAPITAL LETTER D WITH CARON" . 270)
+ ("LATIN SMALL LETTER D WITH CARON" . 271)
+ ("LATIN CAPITAL LETTER D WITH STROKE" . 272)
+ ("LATIN SMALL LETTER D WITH STROKE" . 273)
+ ("LATIN CAPITAL LETTER E WITH MACRON" . 274)
+ ("LATIN SMALL LETTER E WITH MACRON" . 275)
+ ("LATIN CAPITAL LETTER E WITH BREVE" . 276)
+ ("LATIN SMALL LETTER E WITH BREVE" . 277)
+ ("LATIN CAPITAL LETTER E WITH DOT ABOVE" . 278)
+ ("LATIN SMALL LETTER E WITH DOT ABOVE" . 279)
+ ("LATIN CAPITAL LETTER E WITH OGONEK" . 280)
+ ("LATIN SMALL LETTER E WITH OGONEK" . 281)
+ ("LATIN CAPITAL LETTER E WITH CARON" . 282)
+ ("LATIN SMALL LETTER E WITH CARON" . 283)
+ ("LATIN CAPITAL LETTER G WITH CIRCUMFLEX" . 284)
+ ("LATIN SMALL LETTER G WITH CIRCUMFLEX" . 285)
+ ("LATIN CAPITAL LETTER G WITH BREVE" . 286)
+ ("LATIN SMALL LETTER G WITH BREVE" . 287)
+ ("LATIN CAPITAL LETTER G WITH DOT ABOVE" . 288)
+ ("LATIN SMALL LETTER G WITH DOT ABOVE" . 289)
+ ("LATIN CAPITAL LETTER G WITH CEDILLA" . 290)
+ ("LATIN SMALL LETTER G WITH CEDILLA" . 291)
+ ("LATIN CAPITAL LETTER H WITH CIRCUMFLEX" . 292)
+ ("LATIN SMALL LETTER H WITH CIRCUMFLEX" . 293)
+ ("LATIN CAPITAL LETTER H WITH STROKE" . 294)
+ ("LATIN SMALL LETTER H WITH STROKE" . 295)
+ ("LATIN CAPITAL LETTER I WITH TILDE" . 296)
+ ("LATIN SMALL LETTER I WITH TILDE" . 297)
+ ("LATIN CAPITAL LETTER I WITH MACRON" . 298)
+ ("LATIN SMALL LETTER I WITH MACRON" . 299)
+ ("LATIN CAPITAL LETTER I WITH BREVE" . 300)
+ ("LATIN SMALL LETTER I WITH BREVE" . 301)
+ ("LATIN CAPITAL LETTER I WITH OGONEK" . 302)
+ ("LATIN SMALL LETTER I WITH OGONEK" . 303)
+ ("LATIN CAPITAL LETTER I WITH DOT ABOVE" . 304)
+ ("LATIN SMALL LETTER DOTLESS I" . 305)
+ ("LATIN CAPITAL LIGATURE IJ" . 306)
+ ("LATIN SMALL LIGATURE IJ" . 307)
+ ("LATIN CAPITAL LETTER J WITH CIRCUMFLEX" . 308)
+ ("LATIN SMALL LETTER J WITH CIRCUMFLEX" . 309)
+ ("LATIN CAPITAL LETTER K WITH CEDILLA" . 310)
+ ("LATIN SMALL LETTER K WITH CEDILLA" . 311)
+ ("LATIN SMALL LETTER KRA" . 312)
+ ("LATIN CAPITAL LETTER L WITH ACUTE" . 313)
+ ("LATIN SMALL LETTER L WITH ACUTE" . 314)
+ ("LATIN CAPITAL LETTER L WITH CEDILLA" . 315)
+ ("LATIN SMALL LETTER L WITH CEDILLA" . 316)
+ ("LATIN CAPITAL LETTER L WITH CARON" . 317)
+ ("LATIN SMALL LETTER L WITH CARON" . 318)
+ ("LATIN CAPITAL LETTER L WITH MIDDLE DOT" . 319)
+ ("LATIN SMALL LETTER L WITH MIDDLE DOT" . 320)
+ ("LATIN CAPITAL LETTER L WITH STROKE" . 321)
+ ("LATIN SMALL LETTER L WITH STROKE" . 322)
+ ("LATIN CAPITAL LETTER N WITH ACUTE" . 323)
+ ("LATIN SMALL LETTER N WITH ACUTE" . 324)
+ ("LATIN CAPITAL LETTER N WITH CEDILLA" . 325)
+ ("LATIN SMALL LETTER N WITH CEDILLA" . 326)
+ ("LATIN CAPITAL LETTER N WITH CARON" . 327)
+ ("LATIN SMALL LETTER N WITH CARON" . 328)
+ ("LATIN SMALL LETTER N PRECEDED BY APOSTROPHE" . 329)
+ ("LATIN CAPITAL LETTER ENG" . 330)
+ ("LATIN SMALL LETTER ENG" . 331)
+ ("LATIN CAPITAL LETTER O WITH MACRON" . 332)
+ ("LATIN SMALL LETTER O WITH MACRON" . 333)
+ ("LATIN CAPITAL LETTER O WITH BREVE" . 334)
+ ("LATIN SMALL LETTER O WITH BREVE" . 335)
+ ("LATIN CAPITAL LETTER O WITH DOUBLE ACUTE" . 336)
+ ("LATIN SMALL LETTER O WITH DOUBLE ACUTE" . 337)
+ ("LATIN CAPITAL LIGATURE OE" . 338)
+ ("LATIN SMALL LIGATURE OE" . 339)
+ ("LATIN CAPITAL LETTER R WITH ACUTE" . 340)
+ ("LATIN SMALL LETTER R WITH ACUTE" . 341)
+ ("LATIN CAPITAL LETTER R WITH CEDILLA" . 342)
+ ("LATIN SMALL LETTER R WITH CEDILLA" . 343)
+ ("LATIN CAPITAL LETTER R WITH CARON" . 344)
+ ("LATIN SMALL LETTER R WITH CARON" . 345)
+ ("LATIN CAPITAL LETTER S WITH ACUTE" . 346)
+ ("LATIN SMALL LETTER S WITH ACUTE" . 347)
+ ("LATIN CAPITAL LETTER S WITH CIRCUMFLEX" . 348)
+ ("LATIN SMALL LETTER S WITH CIRCUMFLEX" . 349)
+ ("LATIN CAPITAL LETTER S WITH CEDILLA" . 350)
+ ("LATIN SMALL LETTER S WITH CEDILLA" . 351)
+ ("LATIN CAPITAL LETTER S WITH CARON" . 352)
+ ("LATIN SMALL LETTER S WITH CARON" . 353)
+ ("LATIN CAPITAL LETTER T WITH CEDILLA" . 354)
+ ("LATIN SMALL LETTER T WITH CEDILLA" . 355)
+ ("LATIN CAPITAL LETTER T WITH CARON" . 356)
+ ("LATIN SMALL LETTER T WITH CARON" . 357)
+ ("LATIN CAPITAL LETTER T WITH STROKE" . 358)
+ ("LATIN SMALL LETTER T WITH STROKE" . 359)
+ ("LATIN CAPITAL LETTER U WITH TILDE" . 360)
+ ("LATIN SMALL LETTER U WITH TILDE" . 361)
+ ("LATIN CAPITAL LETTER U WITH MACRON" . 362)
+ ("LATIN SMALL LETTER U WITH MACRON" . 363)
+ ("LATIN CAPITAL LETTER U WITH BREVE" . 364)
+ ("LATIN SMALL LETTER U WITH BREVE" . 365)
+ ("LATIN CAPITAL LETTER U WITH RING ABOVE" . 366)
+ ("LATIN SMALL LETTER U WITH RING ABOVE" . 367)
+ ("LATIN CAPITAL LETTER U WITH DOUBLE ACUTE" . 368)
+ ("LATIN SMALL LETTER U WITH DOUBLE ACUTE" . 369)
+ ("LATIN CAPITAL LETTER U WITH OGONEK" . 370)
+ ("LATIN SMALL LETTER U WITH OGONEK" . 371)
+ ("LATIN CAPITAL LETTER W WITH CIRCUMFLEX" . 372)
+ ("LATIN SMALL LETTER W WITH CIRCUMFLEX" . 373)
+ ("LATIN CAPITAL LETTER Y WITH CIRCUMFLEX" . 374)
+ ("LATIN SMALL LETTER Y WITH CIRCUMFLEX" . 375)
+ ("LATIN CAPITAL LETTER Y WITH DIAERESIS" . 376)
+ ("LATIN CAPITAL LETTER Z WITH ACUTE" . 377)
+ ("LATIN SMALL LETTER Z WITH ACUTE" . 378)
+ ("LATIN CAPITAL LETTER Z WITH DOT ABOVE" . 379)
+ ("LATIN SMALL LETTER Z WITH DOT ABOVE" . 380)
+ ("LATIN CAPITAL LETTER Z WITH CARON" . 381)
+ ("LATIN SMALL LETTER Z WITH CARON" . 382)
+ ("LATIN SMALL LETTER LONG S" . 383)
+ ("LATIN SMALL LETTER B WITH STROKE" . 384)
+ ("LATIN CAPITAL LETTER B WITH HOOK" . 385)
+ ("LATIN CAPITAL LETTER B WITH TOPBAR" . 386)
+ ("LATIN SMALL LETTER B WITH TOPBAR" . 387)
+ ("LATIN CAPITAL LETTER TONE SIX" . 388)
+ ("LATIN SMALL LETTER TONE SIX" . 389)
+ ("LATIN CAPITAL LETTER OPEN O" . 390)
+ ("LATIN CAPITAL LETTER C WITH HOOK" . 391)
+ ("LATIN SMALL LETTER C WITH HOOK" . 392)
+ ("LATIN CAPITAL LETTER AFRICAN D" . 393)
+ ("LATIN CAPITAL LETTER D WITH HOOK" . 394)
+ ("LATIN CAPITAL LETTER D WITH TOPBAR" . 395)
+ ("LATIN SMALL LETTER D WITH TOPBAR" . 396)
+ ("LATIN SMALL LETTER TURNED DELTA" . 397)
+ ("LATIN CAPITAL LETTER REVERSED E" . 398)
+ ("LATIN CAPITAL LETTER SCHWA" . 399)
+ ("LATIN CAPITAL LETTER OPEN E" . 400)
+ ("LATIN CAPITAL LETTER F WITH HOOK" . 401)
+ ("LATIN SMALL LETTER F WITH HOOK" . 402)
+ ("LATIN CAPITAL LETTER G WITH HOOK" . 403)
+ ("LATIN CAPITAL LETTER GAMMA" . 404)
+ ("LATIN SMALL LETTER HV" . 405)
+ ("LATIN CAPITAL LETTER IOTA" . 406)
+ ("LATIN CAPITAL LETTER I WITH STROKE" . 407)
+ ("LATIN CAPITAL LETTER K WITH HOOK" . 408)
+ ("LATIN SMALL LETTER K WITH HOOK" . 409)
+ ("LATIN SMALL LETTER L WITH BAR" . 410)
+ ("LATIN SMALL LETTER LAMBDA WITH STROKE" . 411)
+ ("LATIN CAPITAL LETTER TURNED M" . 412)
+ ("LATIN CAPITAL LETTER N WITH LEFT HOOK" . 413)
+ ("LATIN SMALL LETTER N WITH LONG RIGHT LEG" . 414)
+ ("LATIN CAPITAL LETTER O WITH MIDDLE TILDE" . 415)
+ ("LATIN CAPITAL LETTER O WITH HORN" . 416)
+ ("LATIN SMALL LETTER O WITH HORN" . 417)
+ ("LATIN CAPITAL LETTER OI" . 418)
+ ("LATIN SMALL LETTER OI" . 419)
+ ("LATIN CAPITAL LETTER P WITH HOOK" . 420)
+ ("LATIN SMALL LETTER P WITH HOOK" . 421)
+ ("LATIN LETTER YR" . 422)
+ ("LATIN CAPITAL LETTER TONE TWO" . 423)
+ ("LATIN SMALL LETTER TONE TWO" . 424)
+ ("LATIN CAPITAL LETTER ESH" . 425)
+ ("LATIN LETTER REVERSED ESH LOOP" . 426)
+ ("LATIN SMALL LETTER T WITH PALATAL HOOK" . 427)
+ ("LATIN CAPITAL LETTER T WITH HOOK" . 428)
+ ("LATIN SMALL LETTER T WITH HOOK" . 429)
+ ("LATIN CAPITAL LETTER T WITH RETROFLEX HOOK" . 430)
+ ("LATIN CAPITAL LETTER U WITH HORN" . 431)
+ ("LATIN SMALL LETTER U WITH HORN" . 432)
+ ("LATIN CAPITAL LETTER UPSILON" . 433)
+ ("LATIN CAPITAL LETTER V WITH HOOK" . 434)
+ ("LATIN CAPITAL LETTER Y WITH HOOK" . 435)
+ ("LATIN SMALL LETTER Y WITH HOOK" . 436)
+ ("LATIN CAPITAL LETTER Z WITH STROKE" . 437)
+ ("LATIN SMALL LETTER Z WITH STROKE" . 438)
+ ("LATIN CAPITAL LETTER EZH" . 439)
+ ("LATIN CAPITAL LETTER EZH REVERSED" . 440)
+ ("LATIN SMALL LETTER EZH REVERSED" . 441)
+ ("LATIN SMALL LETTER EZH WITH TAIL" . 442)
+ ("LATIN LETTER TWO WITH STROKE" . 443)
+ ("LATIN CAPITAL LETTER TONE FIVE" . 444)
+ ("LATIN SMALL LETTER TONE FIVE" . 445)
+ ("LATIN LETTER INVERTED GLOTTAL STOP WITH STROKE" . 446)
+ ("LATIN LETTER WYNN" . 447)
+ ("LATIN LETTER DENTAL CLICK" . 448)
+ ("LATIN LETTER LATERAL CLICK" . 449)
+ ("LATIN LETTER ALVEOLAR CLICK" . 450)
+ ("LATIN LETTER RETROFLEX CLICK" . 451)
+ ("LATIN CAPITAL LETTER DZ WITH CARON" . 452)
+ ("LATIN CAPITAL LETTER D WITH SMALL LETTER Z WITH CARON" . 453)
+ ("LATIN SMALL LETTER DZ WITH CARON" . 454)
+ ("LATIN CAPITAL LETTER LJ" . 455)
+ ("LATIN CAPITAL LETTER L WITH SMALL LETTER J" . 456)
+ ("LATIN SMALL LETTER LJ" . 457)
+ ("LATIN CAPITAL LETTER NJ" . 458)
+ ("LATIN CAPITAL LETTER N WITH SMALL LETTER J" . 459)
+ ("LATIN SMALL LETTER NJ" . 460)
+ ("LATIN CAPITAL LETTER A WITH CARON" . 461)
+ ("LATIN SMALL LETTER A WITH CARON" . 462)
+ ("LATIN CAPITAL LETTER I WITH CARON" . 463)
+ ("LATIN SMALL LETTER I WITH CARON" . 464)
+ ("LATIN CAPITAL LETTER O WITH CARON" . 465)
+ ("LATIN SMALL LETTER O WITH CARON" . 466)
+ ("LATIN CAPITAL LETTER U WITH CARON" . 467)
+ ("LATIN SMALL LETTER U WITH CARON" . 468)
+ ("LATIN CAPITAL LETTER U WITH DIAERESIS AND MACRON" . 469)
+ ("LATIN SMALL LETTER U WITH DIAERESIS AND MACRON" . 470)
+ ("LATIN CAPITAL LETTER U WITH DIAERESIS AND ACUTE" . 471)
+ ("LATIN SMALL LETTER U WITH DIAERESIS AND ACUTE" . 472)
+ ("LATIN CAPITAL LETTER U WITH DIAERESIS AND CARON" . 473)
+ ("LATIN SMALL LETTER U WITH DIAERESIS AND CARON" . 474)
+ ("LATIN CAPITAL LETTER U WITH DIAERESIS AND GRAVE" . 475)
+ ("LATIN SMALL LETTER U WITH DIAERESIS AND GRAVE" . 476)
+ ("LATIN SMALL LETTER TURNED E" . 477)
+ ("LATIN CAPITAL LETTER A WITH DIAERESIS AND MACRON" . 478)
+ ("LATIN SMALL LETTER A WITH DIAERESIS AND MACRON" . 479)
+ ("LATIN CAPITAL LETTER A WITH DOT ABOVE AND MACRON" . 480)
+ ("LATIN SMALL LETTER A WITH DOT ABOVE AND MACRON" . 481)
+ ("LATIN CAPITAL LETTER AE WITH MACRON" . 482)
+ ("LATIN SMALL LETTER AE WITH MACRON" . 483)
+ ("LATIN CAPITAL LETTER G WITH STROKE" . 484)
+ ("LATIN SMALL LETTER G WITH STROKE" . 485)
+ ("LATIN CAPITAL LETTER G WITH CARON" . 486)
+ ("LATIN SMALL LETTER G WITH CARON" . 487)
+ ("LATIN CAPITAL LETTER K WITH CARON" . 488)
+ ("LATIN SMALL LETTER K WITH CARON" . 489)
+ ("LATIN CAPITAL LETTER O WITH OGONEK" . 490)
+ ("LATIN SMALL LETTER O WITH OGONEK" . 491)
+ ("LATIN CAPITAL LETTER O WITH OGONEK AND MACRON" . 492)
+ ("LATIN SMALL LETTER O WITH OGONEK AND MACRON" . 493)
+ ("LATIN CAPITAL LETTER EZH WITH CARON" . 494)
+ ("LATIN SMALL LETTER EZH WITH CARON" . 495)
+ ("LATIN SMALL LETTER J WITH CARON" . 496)
+ ("LATIN CAPITAL LETTER DZ" . 497)
+ ("LATIN CAPITAL LETTER D WITH SMALL LETTER Z" . 498)
+ ("LATIN SMALL LETTER DZ" . 499)
+ ("LATIN CAPITAL LETTER G WITH ACUTE" . 500)
+ ("LATIN SMALL LETTER G WITH ACUTE" . 501)
+ ("LATIN CAPITAL LETTER HWAIR" . 502)
+ ("LATIN CAPITAL LETTER WYNN" . 503)
+ ("LATIN CAPITAL LETTER N WITH GRAVE" . 504)
+ ("LATIN SMALL LETTER N WITH GRAVE" . 505)
+ ("LATIN CAPITAL LETTER A WITH RING ABOVE AND ACUTE" . 506)
+ ("LATIN SMALL LETTER A WITH RING ABOVE AND ACUTE" . 507)
+ ("LATIN CAPITAL LETTER AE WITH ACUTE" . 508)
+ ("LATIN SMALL LETTER AE WITH ACUTE" . 509)
+ ("LATIN CAPITAL LETTER O WITH STROKE AND ACUTE" . 510)
+ ("LATIN SMALL LETTER O WITH STROKE AND ACUTE" . 511)
+ ("LATIN CAPITAL LETTER A WITH DOUBLE GRAVE" . 512)
+ ("LATIN SMALL LETTER A WITH DOUBLE GRAVE" . 513)
+ ("LATIN CAPITAL LETTER A WITH INVERTED BREVE" . 514)
+ ("LATIN SMALL LETTER A WITH INVERTED BREVE" . 515)
+ ("LATIN CAPITAL LETTER E WITH DOUBLE GRAVE" . 516)
+ ("LATIN SMALL LETTER E WITH DOUBLE GRAVE" . 517)
+ ("LATIN CAPITAL LETTER E WITH INVERTED BREVE" . 518)
+ ("LATIN SMALL LETTER E WITH INVERTED BREVE" . 519)
+ ("LATIN CAPITAL LETTER I WITH DOUBLE GRAVE" . 520)
+ ("LATIN SMALL LETTER I WITH DOUBLE GRAVE" . 521)
+ ("LATIN CAPITAL LETTER I WITH INVERTED BREVE" . 522)
+ ("LATIN SMALL LETTER I WITH INVERTED BREVE" . 523)
+ ("LATIN CAPITAL LETTER O WITH DOUBLE GRAVE" . 524)
+ ("LATIN SMALL LETTER O WITH DOUBLE GRAVE" . 525)
+ ("LATIN CAPITAL LETTER O WITH INVERTED BREVE" . 526)
+ ("LATIN SMALL LETTER O WITH INVERTED BREVE" . 527)
+ ("LATIN CAPITAL LETTER R WITH DOUBLE GRAVE" . 528)
+ ("LATIN SMALL LETTER R WITH DOUBLE GRAVE" . 529)
+ ("LATIN CAPITAL LETTER R WITH INVERTED BREVE" . 530)
+ ("LATIN SMALL LETTER R WITH INVERTED BREVE" . 531)
+ ("LATIN CAPITAL LETTER U WITH DOUBLE GRAVE" . 532)
+ ("LATIN SMALL LETTER U WITH DOUBLE GRAVE" . 533)
+ ("LATIN CAPITAL LETTER U WITH INVERTED BREVE" . 534)
+ ("LATIN SMALL LETTER U WITH INVERTED BREVE" . 535)
+ ("LATIN CAPITAL LETTER S WITH COMMA BELOW" . 536)
+ ("LATIN SMALL LETTER S WITH COMMA BELOW" . 537)
+ ("LATIN CAPITAL LETTER T WITH COMMA BELOW" . 538)
+ ("LATIN SMALL LETTER T WITH COMMA BELOW" . 539)
+ ("LATIN CAPITAL LETTER YOGH" . 540)
+ ("LATIN SMALL LETTER YOGH" . 541)
+ ("LATIN CAPITAL LETTER H WITH CARON" . 542)
+ ("LATIN SMALL LETTER H WITH CARON" . 543)
+ ("LATIN CAPITAL LETTER N WITH LONG RIGHT LEG" . 544)
+ ("LATIN CAPITAL LETTER OU" . 546)
+ ("LATIN SMALL LETTER OU" . 547)
+ ("LATIN CAPITAL LETTER Z WITH HOOK" . 548)
+ ("LATIN SMALL LETTER Z WITH HOOK" . 549)
+ ("LATIN CAPITAL LETTER A WITH DOT ABOVE" . 550)
+ ("LATIN SMALL LETTER A WITH DOT ABOVE" . 551)
+ ("LATIN CAPITAL LETTER E WITH CEDILLA" . 552)
+ ("LATIN SMALL LETTER E WITH CEDILLA" . 553)
+ ("LATIN CAPITAL LETTER O WITH DIAERESIS AND MACRON" . 554)
+ ("LATIN SMALL LETTER O WITH DIAERESIS AND MACRON" . 555)
+ ("LATIN CAPITAL LETTER O WITH TILDE AND MACRON" . 556)
+ ("LATIN SMALL LETTER O WITH TILDE AND MACRON" . 557)
+ ("LATIN CAPITAL LETTER O WITH DOT ABOVE" . 558)
+ ("LATIN SMALL LETTER O WITH DOT ABOVE" . 559)
+ ("LATIN CAPITAL LETTER O WITH DOT ABOVE AND MACRON" . 560)
+ ("LATIN SMALL LETTER O WITH DOT ABOVE AND MACRON" . 561)
+ ("LATIN CAPITAL LETTER Y WITH MACRON" . 562)
+ ("LATIN SMALL LETTER Y WITH MACRON" . 563)
+ ("LATIN SMALL LETTER TURNED A" . 592)
+ ("LATIN SMALL LETTER ALPHA" . 593)
+ ("LATIN SMALL LETTER TURNED ALPHA" . 594)
+ ("LATIN SMALL LETTER B WITH HOOK" . 595)
+ ("LATIN SMALL LETTER OPEN O" . 596)
+ ("LATIN SMALL LETTER C WITH CURL" . 597)
+ ("LATIN SMALL LETTER D WITH TAIL" . 598)
+ ("LATIN SMALL LETTER D WITH HOOK" . 599)
+ ("LATIN SMALL LETTER REVERSED E" . 600)
+ ("LATIN SMALL LETTER SCHWA" . 601)
+ ("LATIN SMALL LETTER SCHWA WITH HOOK" . 602)
+ ("LATIN SMALL LETTER OPEN E" . 603)
+ ("LATIN SMALL LETTER REVERSED OPEN E" . 604)
+ ("LATIN SMALL LETTER REVERSED OPEN E WITH HOOK" . 605)
+ ("LATIN SMALL LETTER CLOSED REVERSED OPEN E" . 606)
+ ("LATIN SMALL LETTER DOTLESS J WITH STROKE" . 607)
+ ("LATIN SMALL LETTER G WITH HOOK" . 608)
+ ("LATIN SMALL LETTER SCRIPT G" . 609)
+ ("LATIN LETTER SMALL CAPITAL G" . 610)
+ ("LATIN SMALL LETTER GAMMA" . 611)
+ ("LATIN SMALL LETTER RAMS HORN" . 612)
+ ("LATIN SMALL LETTER TURNED H" . 613)
+ ("LATIN SMALL LETTER H WITH HOOK" . 614)
+ ("LATIN SMALL LETTER HENG WITH HOOK" . 615)
+ ("LATIN SMALL LETTER I WITH STROKE" . 616)
+ ("LATIN SMALL LETTER IOTA" . 617)
+ ("LATIN LETTER SMALL CAPITAL I" . 618)
+ ("LATIN SMALL LETTER L WITH MIDDLE TILDE" . 619)
+ ("LATIN SMALL LETTER L WITH BELT" . 620)
+ ("LATIN SMALL LETTER L WITH RETROFLEX HOOK" . 621)
+ ("LATIN SMALL LETTER LEZH" . 622)
+ ("LATIN SMALL LETTER TURNED M" . 623)
+ ("LATIN SMALL LETTER TURNED M WITH LONG LEG" . 624)
+ ("LATIN SMALL LETTER M WITH HOOK" . 625)
+ ("LATIN SMALL LETTER N WITH LEFT HOOK" . 626)
+ ("LATIN SMALL LETTER N WITH RETROFLEX HOOK" . 627)
+ ("LATIN LETTER SMALL CAPITAL N" . 628)
+ ("LATIN SMALL LETTER BARRED O" . 629)
+ ("LATIN LETTER SMALL CAPITAL OE" . 630)
+ ("LATIN SMALL LETTER CLOSED OMEGA" . 631)
+ ("LATIN SMALL LETTER PHI" . 632)
+ ("LATIN SMALL LETTER TURNED R" . 633)
+ ("LATIN SMALL LETTER TURNED R WITH LONG LEG" . 634)
+ ("LATIN SMALL LETTER TURNED R WITH HOOK" . 635)
+ ("LATIN SMALL LETTER R WITH LONG LEG" . 636)
+ ("LATIN SMALL LETTER R WITH TAIL" . 637)
+ ("LATIN SMALL LETTER R WITH FISHHOOK" . 638)
+ ("LATIN SMALL LETTER REVERSED R WITH FISHHOOK" . 639)
+ ("LATIN LETTER SMALL CAPITAL R" . 640)
+ ("LATIN LETTER SMALL CAPITAL INVERTED R" . 641)
+ ("LATIN SMALL LETTER S WITH HOOK" . 642)
+ ("LATIN SMALL LETTER ESH" . 643)
+ ("LATIN SMALL LETTER DOTLESS J WITH STROKE AND HOOK" . 644)
+ ("LATIN SMALL LETTER SQUAT REVERSED ESH" . 645)
+ ("LATIN SMALL LETTER ESH WITH CURL" . 646)
+ ("LATIN SMALL LETTER TURNED T" . 647)
+ ("LATIN SMALL LETTER T WITH RETROFLEX HOOK" . 648)
+ ("LATIN SMALL LETTER U BAR" . 649)
+ ("LATIN SMALL LETTER UPSILON" . 650)
+ ("LATIN SMALL LETTER V WITH HOOK" . 651)
+ ("LATIN SMALL LETTER TURNED V" . 652)
+ ("LATIN SMALL LETTER TURNED W" . 653)
+ ("LATIN SMALL LETTER TURNED Y" . 654)
+ ("LATIN LETTER SMALL CAPITAL Y" . 655)
+ ("LATIN SMALL LETTER Z WITH RETROFLEX HOOK" . 656)
+ ("LATIN SMALL LETTER Z WITH CURL" . 657)
+ ("LATIN SMALL LETTER EZH" . 658)
+ ("LATIN SMALL LETTER EZH WITH CURL" . 659)
+ ("LATIN LETTER GLOTTAL STOP" . 660)
+ ("LATIN LETTER PHARYNGEAL VOICED FRICATIVE" . 661)
+ ("LATIN LETTER INVERTED GLOTTAL STOP" . 662)
+ ("LATIN LETTER STRETCHED C" . 663)
+ ("LATIN LETTER BILABIAL CLICK" . 664)
+ ("LATIN LETTER SMALL CAPITAL B" . 665)
+ ("LATIN SMALL LETTER CLOSED OPEN E" . 666)
+ ("LATIN LETTER SMALL CAPITAL G WITH HOOK" . 667)
+ ("LATIN LETTER SMALL CAPITAL H" . 668)
+ ("LATIN SMALL LETTER J WITH CROSSED-TAIL" . 669)
+ ("LATIN SMALL LETTER TURNED K" . 670)
+ ("LATIN LETTER SMALL CAPITAL L" . 671)
+ ("LATIN SMALL LETTER Q WITH HOOK" . 672)
+ ("LATIN LETTER GLOTTAL STOP WITH STROKE" . 673)
+ ("LATIN LETTER REVERSED GLOTTAL STOP WITH STROKE" . 674)
+ ("LATIN SMALL LETTER DZ DIGRAPH" . 675)
+ ("LATIN SMALL LETTER DEZH DIGRAPH" . 676)
+ ("LATIN SMALL LETTER DZ DIGRAPH WITH CURL" . 677)
+ ("LATIN SMALL LETTER TS DIGRAPH" . 678)
+ ("LATIN SMALL LETTER TESH DIGRAPH" . 679)
+ ("LATIN SMALL LETTER TC DIGRAPH WITH CURL" . 680)
+ ("LATIN SMALL LETTER FENG DIGRAPH" . 681)
+ ("LATIN SMALL LETTER LS DIGRAPH" . 682)
+ ("LATIN SMALL LETTER LZ DIGRAPH" . 683)
+ ("LATIN LETTER BILABIAL PERCUSSIVE" . 684)
+ ("LATIN LETTER BIDENTAL PERCUSSIVE" . 685)
+ ("MODIFIER LETTER SMALL H" . 688)
+ ("MODIFIER LETTER SMALL H WITH HOOK" . 689)
+ ("MODIFIER LETTER SMALL J" . 690)
+ ("MODIFIER LETTER SMALL R" . 691)
+ ("MODIFIER LETTER SMALL TURNED R" . 692)
+ ("MODIFIER LETTER SMALL TURNED R WITH HOOK" . 693)
+ ("MODIFIER LETTER SMALL CAPITAL INVERTED R" . 694)
+ ("MODIFIER LETTER SMALL W" . 695)
+ ("MODIFIER LETTER SMALL Y" . 696)
+ ("MODIFIER LETTER PRIME" . 697)
+ ("MODIFIER LETTER DOUBLE PRIME" . 698)
+ ("MODIFIER LETTER TURNED COMMA" . 699)
+ ("MODIFIER LETTER APOSTROPHE" . 700)
+ ("MODIFIER LETTER REVERSED COMMA" . 701)
+ ("MODIFIER LETTER RIGHT HALF RING" . 702)
+ ("MODIFIER LETTER LEFT HALF RING" . 703)
+ ("MODIFIER LETTER GLOTTAL STOP" . 704)
+ ("MODIFIER LETTER REVERSED GLOTTAL STOP" . 705)
+ ("MODIFIER LETTER LEFT ARROWHEAD" . 706)
+ ("MODIFIER LETTER RIGHT ARROWHEAD" . 707)
+ ("MODIFIER LETTER UP ARROWHEAD" . 708)
+ ("MODIFIER LETTER DOWN ARROWHEAD" . 709)
+ ("MODIFIER LETTER CIRCUMFLEX ACCENT" . 710)
+ ("CARON" . 711)
+ ("MODIFIER LETTER VERTICAL LINE" . 712)
+ ("MODIFIER LETTER MACRON" . 713)
+ ("MODIFIER LETTER ACUTE ACCENT" . 714)
+ ("MODIFIER LETTER GRAVE ACCENT" . 715)
+ ("MODIFIER LETTER LOW VERTICAL LINE" . 716)
+ ("MODIFIER LETTER LOW MACRON" . 717)
+ ("MODIFIER LETTER LOW GRAVE ACCENT" . 718)
+ ("MODIFIER LETTER LOW ACUTE ACCENT" . 719)
+ ("MODIFIER LETTER TRIANGULAR COLON" . 720)
+ ("MODIFIER LETTER HALF TRIANGULAR COLON" . 721)
+ ("MODIFIER LETTER CENTRED RIGHT HALF RING" . 722)
+ ("MODIFIER LETTER CENTRED LEFT HALF RING" . 723)
+ ("MODIFIER LETTER UP TACK" . 724)
+ ("MODIFIER LETTER DOWN TACK" . 725)
+ ("MODIFIER LETTER PLUS SIGN" . 726)
+ ("MODIFIER LETTER MINUS SIGN" . 727)
+ ("BREVE" . 728)
+ ("DOT ABOVE" . 729)
+ ("RING ABOVE" . 730)
+ ("OGONEK" . 731)
+ ("SMALL TILDE" . 732)
+ ("DOUBLE ACUTE ACCENT" . 733)
+ ("MODIFIER LETTER RHOTIC HOOK" . 734)
+ ("MODIFIER LETTER CROSS ACCENT" . 735)
+ ("MODIFIER LETTER SMALL GAMMA" . 736)
+ ("MODIFIER LETTER SMALL L" . 737)
+ ("MODIFIER LETTER SMALL S" . 738)
+ ("MODIFIER LETTER SMALL X" . 739)
+ ("MODIFIER LETTER SMALL REVERSED GLOTTAL STOP" . 740)
+ ("MODIFIER LETTER EXTRA-HIGH TONE BAR" . 741)
+ ("MODIFIER LETTER HIGH TONE BAR" . 742)
+ ("MODIFIER LETTER MID TONE BAR" . 743)
+ ("MODIFIER LETTER LOW TONE BAR" . 744)
+ ("MODIFIER LETTER EXTRA-LOW TONE BAR" . 745)
+ ("MODIFIER LETTER YIN DEPARTING TONE MARK" . 746)
+ ("MODIFIER LETTER YANG DEPARTING TONE MARK" . 747)
+ ("MODIFIER LETTER VOICING" . 748)
+ ("MODIFIER LETTER UNASPIRATED" . 749)
+ ("MODIFIER LETTER DOUBLE APOSTROPHE" . 750)
+ ("COMBINING GRAVE ACCENT" . 768)
+ ("COMBINING ACUTE ACCENT" . 769)
+ ("COMBINING CIRCUMFLEX ACCENT" . 770)
+ ("COMBINING TILDE" . 771)
+ ("COMBINING MACRON" . 772)
+ ("COMBINING OVERLINE" . 773)
+ ("COMBINING BREVE" . 774)
+ ("COMBINING DOT ABOVE" . 775)
+ ("COMBINING DIAERESIS" . 776)
+ ("COMBINING HOOK ABOVE" . 777)
+ ("COMBINING RING ABOVE" . 778)
+ ("COMBINING DOUBLE ACUTE ACCENT" . 779)
+ ("COMBINING CARON" . 780)
+ ("COMBINING VERTICAL LINE ABOVE" . 781)
+ ("COMBINING DOUBLE VERTICAL LINE ABOVE" . 782)
+ ("COMBINING DOUBLE GRAVE ACCENT" . 783)
+ ("COMBINING CANDRABINDU" . 784)
+ ("COMBINING INVERTED BREVE" . 785)
+ ("COMBINING TURNED COMMA ABOVE" . 786)
+ ("COMBINING COMMA ABOVE" . 787)
+ ("COMBINING REVERSED COMMA ABOVE" . 788)
+ ("COMBINING COMMA ABOVE RIGHT" . 789)
+ ("COMBINING GRAVE ACCENT BELOW" . 790)
+ ("COMBINING ACUTE ACCENT BELOW" . 791)
+ ("COMBINING LEFT TACK BELOW" . 792)
+ ("COMBINING RIGHT TACK BELOW" . 793)
+ ("COMBINING LEFT ANGLE ABOVE" . 794)
+ ("COMBINING HORN" . 795)
+ ("COMBINING LEFT HALF RING BELOW" . 796)
+ ("COMBINING UP TACK BELOW" . 797)
+ ("COMBINING DOWN TACK BELOW" . 798)
+ ("COMBINING PLUS SIGN BELOW" . 799)
+ ("COMBINING MINUS SIGN BELOW" . 800)
+ ("COMBINING PALATALIZED HOOK BELOW" . 801)
+ ("COMBINING RETROFLEX HOOK BELOW" . 802)
+ ("COMBINING DOT BELOW" . 803)
+ ("COMBINING DIAERESIS BELOW" . 804)
+ ("COMBINING RING BELOW" . 805)
+ ("COMBINING COMMA BELOW" . 806)
+ ("COMBINING CEDILLA" . 807)
+ ("COMBINING OGONEK" . 808)
+ ("COMBINING VERTICAL LINE BELOW" . 809)
+ ("COMBINING BRIDGE BELOW" . 810)
+ ("COMBINING INVERTED DOUBLE ARCH BELOW" . 811)
+ ("COMBINING CARON BELOW" . 812)
+ ("COMBINING CIRCUMFLEX ACCENT BELOW" . 813)
+ ("COMBINING BREVE BELOW" . 814)
+ ("COMBINING INVERTED BREVE BELOW" . 815)
+ ("COMBINING TILDE BELOW" . 816)
+ ("COMBINING MACRON BELOW" . 817)
+ ("COMBINING LOW LINE" . 818)
+ ("COMBINING DOUBLE LOW LINE" . 819)
+ ("COMBINING TILDE OVERLAY" . 820)
+ ("COMBINING SHORT STROKE OVERLAY" . 821)
+ ("COMBINING LONG STROKE OVERLAY" . 822)
+ ("COMBINING SHORT SOLIDUS OVERLAY" . 823)
+ ("COMBINING LONG SOLIDUS OVERLAY" . 824)
+ ("COMBINING RIGHT HALF RING BELOW" . 825)
+ ("COMBINING INVERTED BRIDGE BELOW" . 826)
+ ("COMBINING SQUARE BELOW" . 827)
+ ("COMBINING SEAGULL BELOW" . 828)
+ ("COMBINING X ABOVE" . 829)
+ ("COMBINING VERTICAL TILDE" . 830)
+ ("COMBINING DOUBLE OVERLINE" . 831)
+ ("COMBINING GRAVE TONE MARK" . 832)
+ ("COMBINING ACUTE TONE MARK" . 833)
+ ("COMBINING GREEK PERISPOMENI" . 834)
+ ("COMBINING GREEK KORONIS" . 835)
+ ("COMBINING GREEK DIALYTIKA TONOS" . 836)
+ ("COMBINING GREEK YPOGEGRAMMENI" . 837)
+ ("COMBINING BRIDGE ABOVE" . 838)
+ ("COMBINING EQUALS SIGN BELOW" . 839)
+ ("COMBINING DOUBLE VERTICAL LINE BELOW" . 840)
+ ("COMBINING LEFT ANGLE BELOW" . 841)
+ ("COMBINING NOT TILDE ABOVE" . 842)
+ ("COMBINING HOMOTHETIC ABOVE" . 843)
+ ("COMBINING ALMOST EQUAL TO ABOVE" . 844)
+ ("COMBINING LEFT RIGHT ARROW BELOW" . 845)
+ ("COMBINING UPWARDS ARROW BELOW" . 846)
+ ("COMBINING GRAPHEME JOINER" . 847)
+ ("COMBINING DOUBLE TILDE" . 864)
+ ("COMBINING DOUBLE INVERTED BREVE" . 865)
+ ("COMBINING DOUBLE RIGHTWARDS ARROW BELOW" . 866)
+ ("COMBINING LATIN SMALL LETTER A" . 867)
+ ("COMBINING LATIN SMALL LETTER E" . 868)
+ ("COMBINING LATIN SMALL LETTER I" . 869)
+ ("COMBINING LATIN SMALL LETTER O" . 870)
+ ("COMBINING LATIN SMALL LETTER U" . 871)
+ ("COMBINING LATIN SMALL LETTER C" . 872)
+ ("COMBINING LATIN SMALL LETTER D" . 873)
+ ("COMBINING LATIN SMALL LETTER H" . 874)
+ ("COMBINING LATIN SMALL LETTER M" . 875)
+ ("COMBINING LATIN SMALL LETTER R" . 876)
+ ("COMBINING LATIN SMALL LETTER T" . 877)
+ ("COMBINING LATIN SMALL LETTER V" . 878)
+ ("COMBINING LATIN SMALL LETTER X" . 879)
+ ("GREEK NUMERAL SIGN" . 884)
+ ("GREEK LOWER NUMERAL SIGN" . 885)
+ ("GREEK YPOGEGRAMMENI" . 890)
+ ("GREEK QUESTION MARK" . 894)
+ ("GREEK TONOS" . 900)
+ ("GREEK DIALYTIKA TONOS" . 901)
+ ("GREEK CAPITAL LETTER ALPHA WITH TONOS" . 902)
+ ("GREEK ANO TELEIA" . 903)
+ ("GREEK CAPITAL LETTER EPSILON WITH TONOS" . 904)
+ ("GREEK CAPITAL LETTER ETA WITH TONOS" . 905)
+ ("GREEK CAPITAL LETTER IOTA WITH TONOS" . 906)
+ ("GREEK CAPITAL LETTER OMICRON WITH TONOS" . 908)
+ ("GREEK CAPITAL LETTER UPSILON WITH TONOS" . 910)
+ ("GREEK CAPITAL LETTER OMEGA WITH TONOS" . 911)
+ ("GREEK SMALL LETTER IOTA WITH DIALYTIKA AND TONOS" . 912)
+ ("GREEK CAPITAL LETTER ALPHA" . 913)
+ ("GREEK CAPITAL LETTER BETA" . 914)
+ ("GREEK CAPITAL LETTER GAMMA" . 915)
+ ("GREEK CAPITAL LETTER DELTA" . 916)
+ ("GREEK CAPITAL LETTER EPSILON" . 917)
+ ("GREEK CAPITAL LETTER ZETA" . 918)
+ ("GREEK CAPITAL LETTER ETA" . 919)
+ ("GREEK CAPITAL LETTER THETA" . 920)
+ ("GREEK CAPITAL LETTER IOTA" . 921)
+ ("GREEK CAPITAL LETTER KAPPA" . 922)
+ ("GREEK CAPITAL LETTER LAMDA" . 923)
+ ("GREEK CAPITAL LETTER MU" . 924)
+ ("GREEK CAPITAL LETTER NU" . 925)
+ ("GREEK CAPITAL LETTER XI" . 926)
+ ("GREEK CAPITAL LETTER OMICRON" . 927)
+ ("GREEK CAPITAL LETTER PI" . 928)
+ ("GREEK CAPITAL LETTER RHO" . 929)
+ ("GREEK CAPITAL LETTER SIGMA" . 931)
+ ("GREEK CAPITAL LETTER TAU" . 932)
+ ("GREEK CAPITAL LETTER UPSILON" . 933)
+ ("GREEK CAPITAL LETTER PHI" . 934)
+ ("GREEK CAPITAL LETTER CHI" . 935)
+ ("GREEK CAPITAL LETTER PSI" . 936)
+ ("GREEK CAPITAL LETTER OMEGA" . 937)
+ ("GREEK CAPITAL LETTER IOTA WITH DIALYTIKA" . 938)
+ ("GREEK CAPITAL LETTER UPSILON WITH DIALYTIKA" . 939)
+ ("GREEK SMALL LETTER ALPHA WITH TONOS" . 940)
+ ("GREEK SMALL LETTER EPSILON WITH TONOS" . 941)
+ ("GREEK SMALL LETTER ETA WITH TONOS" . 942)
+ ("GREEK SMALL LETTER IOTA WITH TONOS" . 943)
+ ("GREEK SMALL LETTER UPSILON WITH DIALYTIKA AND TONOS" . 944)
+ ("GREEK SMALL LETTER ALPHA" . 945)
+ ("GREEK SMALL LETTER BETA" . 946)
+ ("GREEK SMALL LETTER GAMMA" . 947)
+ ("GREEK SMALL LETTER DELTA" . 948)
+ ("GREEK SMALL LETTER EPSILON" . 949)
+ ("GREEK SMALL LETTER ZETA" . 950)
+ ("GREEK SMALL LETTER ETA" . 951)
+ ("GREEK SMALL LETTER THETA" . 952)
+ ("GREEK SMALL LETTER IOTA" . 953)
+ ("GREEK SMALL LETTER KAPPA" . 954)
+ ("GREEK SMALL LETTER LAMDA" . 955)
+ ("GREEK SMALL LETTER MU" . 956)
+ ("GREEK SMALL LETTER NU" . 957)
+ ("GREEK SMALL LETTER XI" . 958)
+ ("GREEK SMALL LETTER OMICRON" . 959)
+ ("GREEK SMALL LETTER PI" . 960)
+ ("GREEK SMALL LETTER RHO" . 961)
+ ("GREEK SMALL LETTER FINAL SIGMA" . 962)
+ ("GREEK SMALL LETTER SIGMA" . 963)
+ ("GREEK SMALL LETTER TAU" . 964)
+ ("GREEK SMALL LETTER UPSILON" . 965)
+ ("GREEK SMALL LETTER PHI" . 966)
+ ("GREEK SMALL LETTER CHI" . 967)
+ ("GREEK SMALL LETTER PSI" . 968)
+ ("GREEK SMALL LETTER OMEGA" . 969)
+ ("GREEK SMALL LETTER IOTA WITH DIALYTIKA" . 970)
+ ("GREEK SMALL LETTER UPSILON WITH DIALYTIKA" . 971)
+ ("GREEK SMALL LETTER OMICRON WITH TONOS" . 972)
+ ("GREEK SMALL LETTER UPSILON WITH TONOS" . 973)
+ ("GREEK SMALL LETTER OMEGA WITH TONOS" . 974)
+ ("GREEK BETA SYMBOL" . 976)
+ ("GREEK THETA SYMBOL" . 977)
+ ("GREEK UPSILON WITH HOOK SYMBOL" . 978)
+ ("GREEK UPSILON WITH ACUTE AND HOOK SYMBOL" . 979)
+ ("GREEK UPSILON WITH DIAERESIS AND HOOK SYMBOL" . 980)
+ ("GREEK PHI SYMBOL" . 981)
+ ("GREEK PI SYMBOL" . 982)
+ ("GREEK KAI SYMBOL" . 983)
+ ("GREEK LETTER ARCHAIC KOPPA" . 984)
+ ("GREEK SMALL LETTER ARCHAIC KOPPA" . 985)
+ ("GREEK LETTER STIGMA" . 986)
+ ("GREEK SMALL LETTER STIGMA" . 987)
+ ("GREEK LETTER DIGAMMA" . 988)
+ ("GREEK SMALL LETTER DIGAMMA" . 989)
+ ("GREEK LETTER KOPPA" . 990)
+ ("GREEK SMALL LETTER KOPPA" . 991)
+ ("GREEK LETTER SAMPI" . 992)
+ ("GREEK SMALL LETTER SAMPI" . 993)
+ ("COPTIC CAPITAL LETTER SHEI" . 994)
+ ("COPTIC SMALL LETTER SHEI" . 995)
+ ("COPTIC CAPITAL LETTER FEI" . 996)
+ ("COPTIC SMALL LETTER FEI" . 997)
+ ("COPTIC CAPITAL LETTER KHEI" . 998)
+ ("COPTIC SMALL LETTER KHEI" . 999)
+ ("COPTIC CAPITAL LETTER HORI" . 1000)
+ ("COPTIC SMALL LETTER HORI" . 1001)
+ ("COPTIC CAPITAL LETTER GANGIA" . 1002)
+ ("COPTIC SMALL LETTER GANGIA" . 1003)
+ ("COPTIC CAPITAL LETTER SHIMA" . 1004)
+ ("COPTIC SMALL LETTER SHIMA" . 1005)
+ ("COPTIC CAPITAL LETTER DEI" . 1006)
+ ("COPTIC SMALL LETTER DEI" . 1007)
+ ("GREEK KAPPA SYMBOL" . 1008)
+ ("GREEK RHO SYMBOL" . 1009)
+ ("GREEK LUNATE SIGMA SYMBOL" . 1010)
+ ("GREEK LETTER YOT" . 1011)
+ ("GREEK CAPITAL THETA SYMBOL" . 1012)
+ ("GREEK LUNATE EPSILON SYMBOL" . 1013)
+ ("GREEK REVERSED LUNATE EPSILON SYMBOL" . 1014)
+ ("CYRILLIC CAPITAL LETTER IE WITH GRAVE" . 1024)
+ ("CYRILLIC CAPITAL LETTER IO" . 1025)
+ ("CYRILLIC CAPITAL LETTER DJE" . 1026)
+ ("CYRILLIC CAPITAL LETTER GJE" . 1027)
+ ("CYRILLIC CAPITAL LETTER UKRAINIAN IE" . 1028)
+ ("CYRILLIC CAPITAL LETTER DZE" . 1029)
+ ("CYRILLIC CAPITAL LETTER BYELORUSSIAN-UKRAINIAN I" . 1030)
+ ("CYRILLIC CAPITAL LETTER YI" . 1031)
+ ("CYRILLIC CAPITAL LETTER JE" . 1032)
+ ("CYRILLIC CAPITAL LETTER LJE" . 1033)
+ ("CYRILLIC CAPITAL LETTER NJE" . 1034)
+ ("CYRILLIC CAPITAL LETTER TSHE" . 1035)
+ ("CYRILLIC CAPITAL LETTER KJE" . 1036)
+ ("CYRILLIC CAPITAL LETTER I WITH GRAVE" . 1037)
+ ("CYRILLIC CAPITAL LETTER SHORT U" . 1038)
+ ("CYRILLIC CAPITAL LETTER DZHE" . 1039)
+ ("CYRILLIC CAPITAL LETTER A" . 1040)
+ ("CYRILLIC CAPITAL LETTER BE" . 1041)
+ ("CYRILLIC CAPITAL LETTER VE" . 1042)
+ ("CYRILLIC CAPITAL LETTER GHE" . 1043)
+ ("CYRILLIC CAPITAL LETTER DE" . 1044)
+ ("CYRILLIC CAPITAL LETTER IE" . 1045)
+ ("CYRILLIC CAPITAL LETTER ZHE" . 1046)
+ ("CYRILLIC CAPITAL LETTER ZE" . 1047)
+ ("CYRILLIC CAPITAL LETTER I" . 1048)
+ ("CYRILLIC CAPITAL LETTER SHORT I" . 1049)
+ ("CYRILLIC CAPITAL LETTER KA" . 1050)
+ ("CYRILLIC CAPITAL LETTER EL" . 1051)
+ ("CYRILLIC CAPITAL LETTER EM" . 1052)
+ ("CYRILLIC CAPITAL LETTER EN" . 1053)
+ ("CYRILLIC CAPITAL LETTER O" . 1054)
+ ("CYRILLIC CAPITAL LETTER PE" . 1055)
+ ("CYRILLIC CAPITAL LETTER ER" . 1056)
+ ("CYRILLIC CAPITAL LETTER ES" . 1057)
+ ("CYRILLIC CAPITAL LETTER TE" . 1058)
+ ("CYRILLIC CAPITAL LETTER U" . 1059)
+ ("CYRILLIC CAPITAL LETTER EF" . 1060)
+ ("CYRILLIC CAPITAL LETTER HA" . 1061)
+ ("CYRILLIC CAPITAL LETTER TSE" . 1062)
+ ("CYRILLIC CAPITAL LETTER CHE" . 1063)
+ ("CYRILLIC CAPITAL LETTER SHA" . 1064)
+ ("CYRILLIC CAPITAL LETTER SHCHA" . 1065)
+ ("CYRILLIC CAPITAL LETTER HARD SIGN" . 1066)
+ ("CYRILLIC CAPITAL LETTER YERU" . 1067)
+ ("CYRILLIC CAPITAL LETTER SOFT SIGN" . 1068)
+ ("CYRILLIC CAPITAL LETTER E" . 1069)
+ ("CYRILLIC CAPITAL LETTER YU" . 1070)
+ ("CYRILLIC CAPITAL LETTER YA" . 1071)
+ ("CYRILLIC SMALL LETTER A" . 1072)
+ ("CYRILLIC SMALL LETTER BE" . 1073)
+ ("CYRILLIC SMALL LETTER VE" . 1074)
+ ("CYRILLIC SMALL LETTER GHE" . 1075)
+ ("CYRILLIC SMALL LETTER DE" . 1076)
+ ("CYRILLIC SMALL LETTER IE" . 1077)
+ ("CYRILLIC SMALL LETTER ZHE" . 1078)
+ ("CYRILLIC SMALL LETTER ZE" . 1079)
+ ("CYRILLIC SMALL LETTER I" . 1080)
+ ("CYRILLIC SMALL LETTER SHORT I" . 1081)
+ ("CYRILLIC SMALL LETTER KA" . 1082)
+ ("CYRILLIC SMALL LETTER EL" . 1083)
+ ("CYRILLIC SMALL LETTER EM" . 1084)
+ ("CYRILLIC SMALL LETTER EN" . 1085)
+ ("CYRILLIC SMALL LETTER O" . 1086)
+ ("CYRILLIC SMALL LETTER PE" . 1087)
+ ("CYRILLIC SMALL LETTER ER" . 1088)
+ ("CYRILLIC SMALL LETTER ES" . 1089)
+ ("CYRILLIC SMALL LETTER TE" . 1090)
+ ("CYRILLIC SMALL LETTER U" . 1091)
+ ("CYRILLIC SMALL LETTER EF" . 1092)
+ ("CYRILLIC SMALL LETTER HA" . 1093)
+ ("CYRILLIC SMALL LETTER TSE" . 1094)
+ ("CYRILLIC SMALL LETTER CHE" . 1095)
+ ("CYRILLIC SMALL LETTER SHA" . 1096)
+ ("CYRILLIC SMALL LETTER SHCHA" . 1097)
+ ("CYRILLIC SMALL LETTER HARD SIGN" . 1098)
+ ("CYRILLIC SMALL LETTER YERU" . 1099)
+ ("CYRILLIC SMALL LETTER SOFT SIGN" . 1100)
+ ("CYRILLIC SMALL LETTER E" . 1101)
+ ("CYRILLIC SMALL LETTER YU" . 1102)
+ ("CYRILLIC SMALL LETTER YA" . 1103)
+ ("CYRILLIC SMALL LETTER IE WITH GRAVE" . 1104)
+ ("CYRILLIC SMALL LETTER IO" . 1105)
+ ("CYRILLIC SMALL LETTER DJE" . 1106)
+ ("CYRILLIC SMALL LETTER GJE" . 1107)
+ ("CYRILLIC SMALL LETTER UKRAINIAN IE" . 1108)
+ ("CYRILLIC SMALL LETTER DZE" . 1109)
+ ("CYRILLIC SMALL LETTER BYELORUSSIAN-UKRAINIAN I" . 1110)
+ ("CYRILLIC SMALL LETTER YI" . 1111)
+ ("CYRILLIC SMALL LETTER JE" . 1112)
+ ("CYRILLIC SMALL LETTER LJE" . 1113)
+ ("CYRILLIC SMALL LETTER NJE" . 1114)
+ ("CYRILLIC SMALL LETTER TSHE" . 1115)
+ ("CYRILLIC SMALL LETTER KJE" . 1116)
+ ("CYRILLIC SMALL LETTER I WITH GRAVE" . 1117)
+ ("CYRILLIC SMALL LETTER SHORT U" . 1118)
+ ("CYRILLIC SMALL LETTER DZHE" . 1119)
+ ("CYRILLIC CAPITAL LETTER OMEGA" . 1120)
+ ("CYRILLIC SMALL LETTER OMEGA" . 1121)
+ ("CYRILLIC CAPITAL LETTER YAT" . 1122)
+ ("CYRILLIC SMALL LETTER YAT" . 1123)
+ ("CYRILLIC CAPITAL LETTER IOTIFIED E" . 1124)
+ ("CYRILLIC SMALL LETTER IOTIFIED E" . 1125)
+ ("CYRILLIC CAPITAL LETTER LITTLE YUS" . 1126)
+ ("CYRILLIC SMALL LETTER LITTLE YUS" . 1127)
+ ("CYRILLIC CAPITAL LETTER IOTIFIED LITTLE YUS" . 1128)
+ ("CYRILLIC SMALL LETTER IOTIFIED LITTLE YUS" . 1129)
+ ("CYRILLIC CAPITAL LETTER BIG YUS" . 1130)
+ ("CYRILLIC SMALL LETTER BIG YUS" . 1131)
+ ("CYRILLIC CAPITAL LETTER IOTIFIED BIG YUS" . 1132)
+ ("CYRILLIC SMALL LETTER IOTIFIED BIG YUS" . 1133)
+ ("CYRILLIC CAPITAL LETTER KSI" . 1134)
+ ("CYRILLIC SMALL LETTER KSI" . 1135)
+ ("CYRILLIC CAPITAL LETTER PSI" . 1136)
+ ("CYRILLIC SMALL LETTER PSI" . 1137)
+ ("CYRILLIC CAPITAL LETTER FITA" . 1138)
+ ("CYRILLIC SMALL LETTER FITA" . 1139)
+ ("CYRILLIC CAPITAL LETTER IZHITSA" . 1140)
+ ("CYRILLIC SMALL LETTER IZHITSA" . 1141)
+ ("CYRILLIC CAPITAL LETTER IZHITSA WITH DOUBLE GRAVE ACCENT" . 1142)
+ ("CYRILLIC SMALL LETTER IZHITSA WITH DOUBLE GRAVE ACCENT" . 1143)
+ ("CYRILLIC CAPITAL LETTER UK" . 1144)
+ ("CYRILLIC SMALL LETTER UK" . 1145)
+ ("CYRILLIC CAPITAL LETTER ROUND OMEGA" . 1146)
+ ("CYRILLIC SMALL LETTER ROUND OMEGA" . 1147)
+ ("CYRILLIC CAPITAL LETTER OMEGA WITH TITLO" . 1148)
+ ("CYRILLIC SMALL LETTER OMEGA WITH TITLO" . 1149)
+ ("CYRILLIC CAPITAL LETTER OT" . 1150)
+ ("CYRILLIC SMALL LETTER OT" . 1151)
+ ("CYRILLIC CAPITAL LETTER KOPPA" . 1152)
+ ("CYRILLIC SMALL LETTER KOPPA" . 1153)
+ ("CYRILLIC THOUSANDS SIGN" . 1154)
+ ("COMBINING CYRILLIC TITLO" . 1155)
+ ("COMBINING CYRILLIC PALATALIZATION" . 1156)
+ ("COMBINING CYRILLIC DASIA PNEUMATA" . 1157)
+ ("COMBINING CYRILLIC PSILI PNEUMATA" . 1158)
+ ("COMBINING CYRILLIC HUNDRED THOUSANDS SIGN" . 1160)
+ ("COMBINING CYRILLIC MILLIONS SIGN" . 1161)
+ ("CYRILLIC CAPITAL LETTER SHORT I WITH TAIL" . 1162)
+ ("CYRILLIC SMALL LETTER SHORT I WITH TAIL" . 1163)
+ ("CYRILLIC CAPITAL LETTER SEMISOFT SIGN" . 1164)
+ ("CYRILLIC SMALL LETTER SEMISOFT SIGN" . 1165)
+ ("CYRILLIC CAPITAL LETTER ER WITH TICK" . 1166)
+ ("CYRILLIC SMALL LETTER ER WITH TICK" . 1167)
+ ("CYRILLIC CAPITAL LETTER GHE WITH UPTURN" . 1168)
+ ("CYRILLIC SMALL LETTER GHE WITH UPTURN" . 1169)
+ ("CYRILLIC CAPITAL LETTER GHE WITH STROKE" . 1170)
+ ("CYRILLIC SMALL LETTER GHE WITH STROKE" . 1171)
+ ("CYRILLIC CAPITAL LETTER GHE WITH MIDDLE HOOK" . 1172)
+ ("CYRILLIC SMALL LETTER GHE WITH MIDDLE HOOK" . 1173)
+ ("CYRILLIC CAPITAL LETTER ZHE WITH DESCENDER" . 1174)
+ ("CYRILLIC SMALL LETTER ZHE WITH DESCENDER" . 1175)
+ ("CYRILLIC CAPITAL LETTER ZE WITH DESCENDER" . 1176)
+ ("CYRILLIC SMALL LETTER ZE WITH DESCENDER" . 1177)
+ ("CYRILLIC CAPITAL LETTER KA WITH DESCENDER" . 1178)
+ ("CYRILLIC SMALL LETTER KA WITH DESCENDER" . 1179)
+ ("CYRILLIC CAPITAL LETTER KA WITH VERTICAL STROKE" . 1180)
+ ("CYRILLIC SMALL LETTER KA WITH VERTICAL STROKE" . 1181)
+ ("CYRILLIC CAPITAL LETTER KA WITH STROKE" . 1182)
+ ("CYRILLIC SMALL LETTER KA WITH STROKE" . 1183)
+ ("CYRILLIC CAPITAL LETTER BASHKIR KA" . 1184)
+ ("CYRILLIC SMALL LETTER BASHKIR KA" . 1185)
+ ("CYRILLIC CAPITAL LETTER EN WITH DESCENDER" . 1186)
+ ("CYRILLIC SMALL LETTER EN WITH DESCENDER" . 1187)
+ ("CYRILLIC CAPITAL LIGATURE EN GHE" . 1188)
+ ("CYRILLIC SMALL LIGATURE EN GHE" . 1189)
+ ("CYRILLIC CAPITAL LETTER PE WITH MIDDLE HOOK" . 1190)
+ ("CYRILLIC SMALL LETTER PE WITH MIDDLE HOOK" . 1191)
+ ("CYRILLIC CAPITAL LETTER ABKHASIAN HA" . 1192)
+ ("CYRILLIC SMALL LETTER ABKHASIAN HA" . 1193)
+ ("CYRILLIC CAPITAL LETTER ES WITH DESCENDER" . 1194)
+ ("CYRILLIC SMALL LETTER ES WITH DESCENDER" . 1195)
+ ("CYRILLIC CAPITAL LETTER TE WITH DESCENDER" . 1196)
+ ("CYRILLIC SMALL LETTER TE WITH DESCENDER" . 1197)
+ ("CYRILLIC CAPITAL LETTER STRAIGHT U" . 1198)
+ ("CYRILLIC SMALL LETTER STRAIGHT U" . 1199)
+ ("CYRILLIC CAPITAL LETTER STRAIGHT U WITH STROKE" . 1200)
+ ("CYRILLIC SMALL LETTER STRAIGHT U WITH STROKE" . 1201)
+ ("CYRILLIC CAPITAL LETTER HA WITH DESCENDER" . 1202)
+ ("CYRILLIC SMALL LETTER HA WITH DESCENDER" . 1203)
+ ("CYRILLIC CAPITAL LIGATURE TE TSE" . 1204)
+ ("CYRILLIC SMALL LIGATURE TE TSE" . 1205)
+ ("CYRILLIC CAPITAL LETTER CHE WITH DESCENDER" . 1206)
+ ("CYRILLIC SMALL LETTER CHE WITH DESCENDER" . 1207)
+ ("CYRILLIC CAPITAL LETTER CHE WITH VERTICAL STROKE" . 1208)
+ ("CYRILLIC SMALL LETTER CHE WITH VERTICAL STROKE" . 1209)
+ ("CYRILLIC CAPITAL LETTER SHHA" . 1210)
+ ("CYRILLIC SMALL LETTER SHHA" . 1211)
+ ("CYRILLIC CAPITAL LETTER ABKHASIAN CHE" . 1212)
+ ("CYRILLIC SMALL LETTER ABKHASIAN CHE" . 1213)
+ ("CYRILLIC CAPITAL LETTER ABKHASIAN CHE WITH DESCENDER" . 1214)
+ ("CYRILLIC SMALL LETTER ABKHASIAN CHE WITH DESCENDER" . 1215)
+ ("CYRILLIC LETTER PALOCHKA" . 1216)
+ ("CYRILLIC CAPITAL LETTER ZHE WITH BREVE" . 1217)
+ ("CYRILLIC SMALL LETTER ZHE WITH BREVE" . 1218)
+ ("CYRILLIC CAPITAL LETTER KA WITH HOOK" . 1219)
+ ("CYRILLIC SMALL LETTER KA WITH HOOK" . 1220)
+ ("CYRILLIC CAPITAL LETTER EL WITH TAIL" . 1221)
+ ("CYRILLIC SMALL LETTER EL WITH TAIL" . 1222)
+ ("CYRILLIC CAPITAL LETTER EN WITH HOOK" . 1223)
+ ("CYRILLIC SMALL LETTER EN WITH HOOK" . 1224)
+ ("CYRILLIC CAPITAL LETTER EN WITH TAIL" . 1225)
+ ("CYRILLIC SMALL LETTER EN WITH TAIL" . 1226)
+ ("CYRILLIC CAPITAL LETTER KHAKASSIAN CHE" . 1227)
+ ("CYRILLIC SMALL LETTER KHAKASSIAN CHE" . 1228)
+ ("CYRILLIC CAPITAL LETTER EM WITH TAIL" . 1229)
+ ("CYRILLIC SMALL LETTER EM WITH TAIL" . 1230)
+ ("CYRILLIC CAPITAL LETTER A WITH BREVE" . 1232)
+ ("CYRILLIC SMALL LETTER A WITH BREVE" . 1233)
+ ("CYRILLIC CAPITAL LETTER A WITH DIAERESIS" . 1234)
+ ("CYRILLIC SMALL LETTER A WITH DIAERESIS" . 1235)
+ ("CYRILLIC CAPITAL LIGATURE A IE" . 1236)
+ ("CYRILLIC SMALL LIGATURE A IE" . 1237)
+ ("CYRILLIC CAPITAL LETTER IE WITH BREVE" . 1238)
+ ("CYRILLIC SMALL LETTER IE WITH BREVE" . 1239)
+ ("CYRILLIC CAPITAL LETTER SCHWA" . 1240)
+ ("CYRILLIC SMALL LETTER SCHWA" . 1241)
+ ("CYRILLIC CAPITAL LETTER SCHWA WITH DIAERESIS" . 1242)
+ ("CYRILLIC SMALL LETTER SCHWA WITH DIAERESIS" . 1243)
+ ("CYRILLIC CAPITAL LETTER ZHE WITH DIAERESIS" . 1244)
+ ("CYRILLIC SMALL LETTER ZHE WITH DIAERESIS" . 1245)
+ ("CYRILLIC CAPITAL LETTER ZE WITH DIAERESIS" . 1246)
+ ("CYRILLIC SMALL LETTER ZE WITH DIAERESIS" . 1247)
+ ("CYRILLIC CAPITAL LETTER ABKHASIAN DZE" . 1248)
+ ("CYRILLIC SMALL LETTER ABKHASIAN DZE" . 1249)
+ ("CYRILLIC CAPITAL LETTER I WITH MACRON" . 1250)
+ ("CYRILLIC SMALL LETTER I WITH MACRON" . 1251)
+ ("CYRILLIC CAPITAL LETTER I WITH DIAERESIS" . 1252)
+ ("CYRILLIC SMALL LETTER I WITH DIAERESIS" . 1253)
+ ("CYRILLIC CAPITAL LETTER O WITH DIAERESIS" . 1254)
+ ("CYRILLIC SMALL LETTER O WITH DIAERESIS" . 1255)
+ ("CYRILLIC CAPITAL LETTER BARRED O" . 1256)
+ ("CYRILLIC SMALL LETTER BARRED O" . 1257)
+ ("CYRILLIC CAPITAL LETTER BARRED O WITH DIAERESIS" . 1258)
+ ("CYRILLIC SMALL LETTER BARRED O WITH DIAERESIS" . 1259)
+ ("CYRILLIC CAPITAL LETTER E WITH DIAERESIS" . 1260)
+ ("CYRILLIC SMALL LETTER E WITH DIAERESIS" . 1261)
+ ("CYRILLIC CAPITAL LETTER U WITH MACRON" . 1262)
+ ("CYRILLIC SMALL LETTER U WITH MACRON" . 1263)
+ ("CYRILLIC CAPITAL LETTER U WITH DIAERESIS" . 1264)
+ ("CYRILLIC SMALL LETTER U WITH DIAERESIS" . 1265)
+ ("CYRILLIC CAPITAL LETTER U WITH DOUBLE ACUTE" . 1266)
+ ("CYRILLIC SMALL LETTER U WITH DOUBLE ACUTE" . 1267)
+ ("CYRILLIC CAPITAL LETTER CHE WITH DIAERESIS" . 1268)
+ ("CYRILLIC SMALL LETTER CHE WITH DIAERESIS" . 1269)
+ ("CYRILLIC CAPITAL LETTER YERU WITH DIAERESIS" . 1272)
+ ("CYRILLIC SMALL LETTER YERU WITH DIAERESIS" . 1273)
+ ("CYRILLIC CAPITAL LETTER KOMI DE" . 1280)
+ ("CYRILLIC SMALL LETTER KOMI DE" . 1281)
+ ("CYRILLIC CAPITAL LETTER KOMI DJE" . 1282)
+ ("CYRILLIC SMALL LETTER KOMI DJE" . 1283)
+ ("CYRILLIC CAPITAL LETTER KOMI ZJE" . 1284)
+ ("CYRILLIC SMALL LETTER KOMI ZJE" . 1285)
+ ("CYRILLIC CAPITAL LETTER KOMI DZJE" . 1286)
+ ("CYRILLIC SMALL LETTER KOMI DZJE" . 1287)
+ ("CYRILLIC CAPITAL LETTER KOMI LJE" . 1288)
+ ("CYRILLIC SMALL LETTER KOMI LJE" . 1289)
+ ("CYRILLIC CAPITAL LETTER KOMI NJE" . 1290)
+ ("CYRILLIC SMALL LETTER KOMI NJE" . 1291)
+ ("CYRILLIC CAPITAL LETTER KOMI SJE" . 1292)
+ ("CYRILLIC SMALL LETTER KOMI SJE" . 1293)
+ ("CYRILLIC CAPITAL LETTER KOMI TJE" . 1294)
+ ("CYRILLIC SMALL LETTER KOMI TJE" . 1295)
+ ("ARMENIAN CAPITAL LETTER AYB" . 1329)
+ ("ARMENIAN CAPITAL LETTER BEN" . 1330)
+ ("ARMENIAN CAPITAL LETTER GIM" . 1331)
+ ("ARMENIAN CAPITAL LETTER DA" . 1332)
+ ("ARMENIAN CAPITAL LETTER ECH" . 1333)
+ ("ARMENIAN CAPITAL LETTER ZA" . 1334)
+ ("ARMENIAN CAPITAL LETTER EH" . 1335)
+ ("ARMENIAN CAPITAL LETTER ET" . 1336)
+ ("ARMENIAN CAPITAL LETTER TO" . 1337)
+ ("ARMENIAN CAPITAL LETTER ZHE" . 1338)
+ ("ARMENIAN CAPITAL LETTER INI" . 1339)
+ ("ARMENIAN CAPITAL LETTER LIWN" . 1340)
+ ("ARMENIAN CAPITAL LETTER XEH" . 1341)
+ ("ARMENIAN CAPITAL LETTER CA" . 1342)
+ ("ARMENIAN CAPITAL LETTER KEN" . 1343)
+ ("ARMENIAN CAPITAL LETTER HO" . 1344)
+ ("ARMENIAN CAPITAL LETTER JA" . 1345)
+ ("ARMENIAN CAPITAL LETTER GHAD" . 1346)
+ ("ARMENIAN CAPITAL LETTER CHEH" . 1347)
+ ("ARMENIAN CAPITAL LETTER MEN" . 1348)
+ ("ARMENIAN CAPITAL LETTER YI" . 1349)
+ ("ARMENIAN CAPITAL LETTER NOW" . 1350)
+ ("ARMENIAN CAPITAL LETTER SHA" . 1351)
+ ("ARMENIAN CAPITAL LETTER VO" . 1352)
+ ("ARMENIAN CAPITAL LETTER CHA" . 1353)
+ ("ARMENIAN CAPITAL LETTER PEH" . 1354)
+ ("ARMENIAN CAPITAL LETTER JHEH" . 1355)
+ ("ARMENIAN CAPITAL LETTER RA" . 1356)
+ ("ARMENIAN CAPITAL LETTER SEH" . 1357)
+ ("ARMENIAN CAPITAL LETTER VEW" . 1358)
+ ("ARMENIAN CAPITAL LETTER TIWN" . 1359)
+ ("ARMENIAN CAPITAL LETTER REH" . 1360)
+ ("ARMENIAN CAPITAL LETTER CO" . 1361)
+ ("ARMENIAN CAPITAL LETTER YIWN" . 1362)
+ ("ARMENIAN CAPITAL LETTER PIWR" . 1363)
+ ("ARMENIAN CAPITAL LETTER KEH" . 1364)
+ ("ARMENIAN CAPITAL LETTER OH" . 1365)
+ ("ARMENIAN CAPITAL LETTER FEH" . 1366)
+ ("ARMENIAN MODIFIER LETTER LEFT HALF RING" . 1369)
+ ("ARMENIAN APOSTROPHE" . 1370)
+ ("ARMENIAN EMPHASIS MARK" . 1371)
+ ("ARMENIAN EXCLAMATION MARK" . 1372)
+ ("ARMENIAN COMMA" . 1373)
+ ("ARMENIAN QUESTION MARK" . 1374)
+ ("ARMENIAN ABBREVIATION MARK" . 1375)
+ ("ARMENIAN SMALL LETTER AYB" . 1377)
+ ("ARMENIAN SMALL LETTER BEN" . 1378)
+ ("ARMENIAN SMALL LETTER GIM" . 1379)
+ ("ARMENIAN SMALL LETTER DA" . 1380)
+ ("ARMENIAN SMALL LETTER ECH" . 1381)
+ ("ARMENIAN SMALL LETTER ZA" . 1382)
+ ("ARMENIAN SMALL LETTER EH" . 1383)
+ ("ARMENIAN SMALL LETTER ET" . 1384)
+ ("ARMENIAN SMALL LETTER TO" . 1385)
+ ("ARMENIAN SMALL LETTER ZHE" . 1386)
+ ("ARMENIAN SMALL LETTER INI" . 1387)
+ ("ARMENIAN SMALL LETTER LIWN" . 1388)
+ ("ARMENIAN SMALL LETTER XEH" . 1389)
+ ("ARMENIAN SMALL LETTER CA" . 1390)
+ ("ARMENIAN SMALL LETTER KEN" . 1391)
+ ("ARMENIAN SMALL LETTER HO" . 1392)
+ ("ARMENIAN SMALL LETTER JA" . 1393)
+ ("ARMENIAN SMALL LETTER GHAD" . 1394)
+ ("ARMENIAN SMALL LETTER CHEH" . 1395)
+ ("ARMENIAN SMALL LETTER MEN" . 1396)
+ ("ARMENIAN SMALL LETTER YI" . 1397)
+ ("ARMENIAN SMALL LETTER NOW" . 1398)
+ ("ARMENIAN SMALL LETTER SHA" . 1399)
+ ("ARMENIAN SMALL LETTER VO" . 1400)
+ ("ARMENIAN SMALL LETTER CHA" . 1401)
+ ("ARMENIAN SMALL LETTER PEH" . 1402)
+ ("ARMENIAN SMALL LETTER JHEH" . 1403)
+ ("ARMENIAN SMALL LETTER RA" . 1404)
+ ("ARMENIAN SMALL LETTER SEH" . 1405)
+ ("ARMENIAN SMALL LETTER VEW" . 1406)
+ ("ARMENIAN SMALL LETTER TIWN" . 1407)
+ ("ARMENIAN SMALL LETTER REH" . 1408)
+ ("ARMENIAN SMALL LETTER CO" . 1409)
+ ("ARMENIAN SMALL LETTER YIWN" . 1410)
+ ("ARMENIAN SMALL LETTER PIWR" . 1411)
+ ("ARMENIAN SMALL LETTER KEH" . 1412)
+ ("ARMENIAN SMALL LETTER OH" . 1413)
+ ("ARMENIAN SMALL LETTER FEH" . 1414)
+ ("ARMENIAN SMALL LIGATURE ECH YIWN" . 1415)
+ ("ARMENIAN FULL STOP" . 1417)
+ ("ARMENIAN HYPHEN" . 1418)
+ ("HEBREW ACCENT ETNAHTA" . 1425)
+ ("HEBREW ACCENT SEGOL" . 1426)
+ ("HEBREW ACCENT SHALSHELET" . 1427)
+ ("HEBREW ACCENT ZAQEF QATAN" . 1428)
+ ("HEBREW ACCENT ZAQEF GADOL" . 1429)
+ ("HEBREW ACCENT TIPEHA" . 1430)
+ ("HEBREW ACCENT REVIA" . 1431)
+ ("HEBREW ACCENT ZARQA" . 1432)
+ ("HEBREW ACCENT PASHTA" . 1433)
+ ("HEBREW ACCENT YETIV" . 1434)
+ ("HEBREW ACCENT TEVIR" . 1435)
+ ("HEBREW ACCENT GERESH" . 1436)
+ ("HEBREW ACCENT GERESH MUQDAM" . 1437)
+ ("HEBREW ACCENT GERSHAYIM" . 1438)
+ ("HEBREW ACCENT QARNEY PARA" . 1439)
+ ("HEBREW ACCENT TELISHA GEDOLA" . 1440)
+ ("HEBREW ACCENT PAZER" . 1441)
+ ("HEBREW ACCENT MUNAH" . 1443)
+ ("HEBREW ACCENT MAHAPAKH" . 1444)
+ ("HEBREW ACCENT MERKHA" . 1445)
+ ("HEBREW ACCENT MERKHA KEFULA" . 1446)
+ ("HEBREW ACCENT DARGA" . 1447)
+ ("HEBREW ACCENT QADMA" . 1448)
+ ("HEBREW ACCENT TELISHA QETANA" . 1449)
+ ("HEBREW ACCENT YERAH BEN YOMO" . 1450)
+ ("HEBREW ACCENT OLE" . 1451)
+ ("HEBREW ACCENT ILUY" . 1452)
+ ("HEBREW ACCENT DEHI" . 1453)
+ ("HEBREW ACCENT ZINOR" . 1454)
+ ("HEBREW MARK MASORA CIRCLE" . 1455)
+ ("HEBREW POINT SHEVA" . 1456)
+ ("HEBREW POINT HATAF SEGOL" . 1457)
+ ("HEBREW POINT HATAF PATAH" . 1458)
+ ("HEBREW POINT HATAF QAMATS" . 1459)
+ ("HEBREW POINT HIRIQ" . 1460)
+ ("HEBREW POINT TSERE" . 1461)
+ ("HEBREW POINT SEGOL" . 1462)
+ ("HEBREW POINT PATAH" . 1463)
+ ("HEBREW POINT QAMATS" . 1464)
+ ("HEBREW POINT HOLAM" . 1465)
+ ("HEBREW POINT QUBUTS" . 1467)
+ ("HEBREW POINT DAGESH OR MAPIQ" . 1468)
+ ("HEBREW POINT METEG" . 1469)
+ ("HEBREW PUNCTUATION MAQAF" . 1470)
+ ("HEBREW POINT RAFE" . 1471)
+ ("HEBREW PUNCTUATION PASEQ" . 1472)
+ ("HEBREW POINT SHIN DOT" . 1473)
+ ("HEBREW POINT SIN DOT" . 1474)
+ ("HEBREW PUNCTUATION SOF PASUQ" . 1475)
+ ("HEBREW MARK UPPER DOT" . 1476)
+ ("HEBREW LETTER ALEF" . 1488)
+ ("HEBREW LETTER BET" . 1489)
+ ("HEBREW LETTER GIMEL" . 1490)
+ ("HEBREW LETTER DALET" . 1491)
+ ("HEBREW LETTER HE" . 1492)
+ ("HEBREW LETTER VAV" . 1493)
+ ("HEBREW LETTER ZAYIN" . 1494)
+ ("HEBREW LETTER HET" . 1495)
+ ("HEBREW LETTER TET" . 1496)
+ ("HEBREW LETTER YOD" . 1497)
+ ("HEBREW LETTER FINAL KAF" . 1498)
+ ("HEBREW LETTER KAF" . 1499)
+ ("HEBREW LETTER LAMED" . 1500)
+ ("HEBREW LETTER FINAL MEM" . 1501)
+ ("HEBREW LETTER MEM" . 1502)
+ ("HEBREW LETTER FINAL NUN" . 1503)
+ ("HEBREW LETTER NUN" . 1504)
+ ("HEBREW LETTER SAMEKH" . 1505)
+ ("HEBREW LETTER AYIN" . 1506)
+ ("HEBREW LETTER FINAL PE" . 1507)
+ ("HEBREW LETTER PE" . 1508)
+ ("HEBREW LETTER FINAL TSADI" . 1509)
+ ("HEBREW LETTER TSADI" . 1510)
+ ("HEBREW LETTER QOF" . 1511)
+ ("HEBREW LETTER RESH" . 1512)
+ ("HEBREW LETTER SHIN" . 1513)
+ ("HEBREW LETTER TAV" . 1514)
+ ("HEBREW LIGATURE YIDDISH DOUBLE VAV" . 1520)
+ ("HEBREW LIGATURE YIDDISH VAV YOD" . 1521)
+ ("HEBREW LIGATURE YIDDISH DOUBLE YOD" . 1522)
+ ("HEBREW PUNCTUATION GERESH" . 1523)
+ ("HEBREW PUNCTUATION GERSHAYIM" . 1524)
+ ("ARABIC COMMA" . 1548)
+ ("ARABIC SEMICOLON" . 1563)
+ ("ARABIC QUESTION MARK" . 1567)
+ ("ARABIC LETTER HAMZA" . 1569)
+ ("ARABIC LETTER ALEF WITH MADDA ABOVE" . 1570)
+ ("ARABIC LETTER ALEF WITH HAMZA ABOVE" . 1571)
+ ("ARABIC LETTER WAW WITH HAMZA ABOVE" . 1572)
+ ("ARABIC LETTER ALEF WITH HAMZA BELOW" . 1573)
+ ("ARABIC LETTER YEH WITH HAMZA ABOVE" . 1574)
+ ("ARABIC LETTER ALEF" . 1575)
+ ("ARABIC LETTER BEH" . 1576)
+ ("ARABIC LETTER TEH MARBUTA" . 1577)
+ ("ARABIC LETTER TEH" . 1578)
+ ("ARABIC LETTER THEH" . 1579)
+ ("ARABIC LETTER JEEM" . 1580)
+ ("ARABIC LETTER HAH" . 1581)
+ ("ARABIC LETTER KHAH" . 1582)
+ ("ARABIC LETTER DAL" . 1583)
+ ("ARABIC LETTER THAL" . 1584)
+ ("ARABIC LETTER REH" . 1585)
+ ("ARABIC LETTER ZAIN" . 1586)
+ ("ARABIC LETTER SEEN" . 1587)
+ ("ARABIC LETTER SHEEN" . 1588)
+ ("ARABIC LETTER SAD" . 1589)
+ ("ARABIC LETTER DAD" . 1590)
+ ("ARABIC LETTER TAH" . 1591)
+ ("ARABIC LETTER ZAH" . 1592)
+ ("ARABIC LETTER AIN" . 1593)
+ ("ARABIC LETTER GHAIN" . 1594)
+ ("ARABIC TATWEEL" . 1600)
+ ("ARABIC LETTER FEH" . 1601)
+ ("ARABIC LETTER QAF" . 1602)
+ ("ARABIC LETTER KAF" . 1603)
+ ("ARABIC LETTER LAM" . 1604)
+ ("ARABIC LETTER MEEM" . 1605)
+ ("ARABIC LETTER NOON" . 1606)
+ ("ARABIC LETTER HEH" . 1607)
+ ("ARABIC LETTER WAW" . 1608)
+ ("ARABIC LETTER ALEF MAKSURA" . 1609)
+ ("ARABIC LETTER YEH" . 1610)
+ ("ARABIC FATHATAN" . 1611)
+ ("ARABIC DAMMATAN" . 1612)
+ ("ARABIC KASRATAN" . 1613)
+ ("ARABIC FATHA" . 1614)
+ ("ARABIC DAMMA" . 1615)
+ ("ARABIC KASRA" . 1616)
+ ("ARABIC SHADDA" . 1617)
+ ("ARABIC SUKUN" . 1618)
+ ("ARABIC MADDAH ABOVE" . 1619)
+ ("ARABIC HAMZA ABOVE" . 1620)
+ ("ARABIC HAMZA BELOW" . 1621)
+ ("ARABIC-INDIC DIGIT ZERO" . 1632)
+ ("ARABIC-INDIC DIGIT ONE" . 1633)
+ ("ARABIC-INDIC DIGIT TWO" . 1634)
+ ("ARABIC-INDIC DIGIT THREE" . 1635)
+ ("ARABIC-INDIC DIGIT FOUR" . 1636)
+ ("ARABIC-INDIC DIGIT FIVE" . 1637)
+ ("ARABIC-INDIC DIGIT SIX" . 1638)
+ ("ARABIC-INDIC DIGIT SEVEN" . 1639)
+ ("ARABIC-INDIC DIGIT EIGHT" . 1640)
+ ("ARABIC-INDIC DIGIT NINE" . 1641)
+ ("ARABIC PERCENT SIGN" . 1642)
+ ("ARABIC DECIMAL SEPARATOR" . 1643)
+ ("ARABIC THOUSANDS SEPARATOR" . 1644)
+ ("ARABIC FIVE POINTED STAR" . 1645)
+ ("ARABIC LETTER DOTLESS BEH" . 1646)
+ ("ARABIC LETTER DOTLESS QAF" . 1647)
+ ("ARABIC LETTER SUPERSCRIPT ALEF" . 1648)
+ ("ARABIC LETTER ALEF WASLA" . 1649)
+ ("ARABIC LETTER ALEF WITH WAVY HAMZA ABOVE" . 1650)
+ ("ARABIC LETTER ALEF WITH WAVY HAMZA BELOW" . 1651)
+ ("ARABIC LETTER HIGH HAMZA" . 1652)
+ ("ARABIC LETTER HIGH HAMZA ALEF" . 1653)
+ ("ARABIC LETTER HIGH HAMZA WAW" . 1654)
+ ("ARABIC LETTER U WITH HAMZA ABOVE" . 1655)
+ ("ARABIC LETTER HIGH HAMZA YEH" . 1656)
+ ("ARABIC LETTER TTEH" . 1657)
+ ("ARABIC LETTER TTEHEH" . 1658)
+ ("ARABIC LETTER BEEH" . 1659)
+ ("ARABIC LETTER TEH WITH RING" . 1660)
+ ("ARABIC LETTER TEH WITH THREE DOTS ABOVE DOWNWARDS" . 1661)
+ ("ARABIC LETTER PEH" . 1662)
+ ("ARABIC LETTER TEHEH" . 1663)
+ ("ARABIC LETTER BEHEH" . 1664)
+ ("ARABIC LETTER HAH WITH HAMZA ABOVE" . 1665)
+ ("ARABIC LETTER HAH WITH TWO DOTS VERTICAL ABOVE" . 1666)
+ ("ARABIC LETTER NYEH" . 1667)
+ ("ARABIC LETTER DYEH" . 1668)
+ ("ARABIC LETTER HAH WITH THREE DOTS ABOVE" . 1669)
+ ("ARABIC LETTER TCHEH" . 1670)
+ ("ARABIC LETTER TCHEHEH" . 1671)
+ ("ARABIC LETTER DDAL" . 1672)
+ ("ARABIC LETTER DAL WITH RING" . 1673)
+ ("ARABIC LETTER DAL WITH DOT BELOW" . 1674)
+ ("ARABIC LETTER DAL WITH DOT BELOW AND SMALL TAH" . 1675)
+ ("ARABIC LETTER DAHAL" . 1676)
+ ("ARABIC LETTER DDAHAL" . 1677)
+ ("ARABIC LETTER DUL" . 1678)
+ ("ARABIC LETTER DAL WITH THREE DOTS ABOVE DOWNWARDS" . 1679)
+ ("ARABIC LETTER DAL WITH FOUR DOTS ABOVE" . 1680)
+ ("ARABIC LETTER RREH" . 1681)
+ ("ARABIC LETTER REH WITH SMALL V" . 1682)
+ ("ARABIC LETTER REH WITH RING" . 1683)
+ ("ARABIC LETTER REH WITH DOT BELOW" . 1684)
+ ("ARABIC LETTER REH WITH SMALL V BELOW" . 1685)
+ ("ARABIC LETTER REH WITH DOT BELOW AND DOT ABOVE" . 1686)
+ ("ARABIC LETTER REH WITH TWO DOTS ABOVE" . 1687)
+ ("ARABIC LETTER JEH" . 1688)
+ ("ARABIC LETTER REH WITH FOUR DOTS ABOVE" . 1689)
+ ("ARABIC LETTER SEEN WITH DOT BELOW AND DOT ABOVE" . 1690)
+ ("ARABIC LETTER SEEN WITH THREE DOTS BELOW" . 1691)
+ ("ARABIC LETTER SEEN WITH THREE DOTS BELOW AND THREE DOTS ABOVE" . 1692)
+ ("ARABIC LETTER SAD WITH TWO DOTS BELOW" . 1693)
+ ("ARABIC LETTER SAD WITH THREE DOTS ABOVE" . 1694)
+ ("ARABIC LETTER TAH WITH THREE DOTS ABOVE" . 1695)
+ ("ARABIC LETTER AIN WITH THREE DOTS ABOVE" . 1696)
+ ("ARABIC LETTER DOTLESS FEH" . 1697)
+ ("ARABIC LETTER FEH WITH DOT MOVED BELOW" . 1698)
+ ("ARABIC LETTER FEH WITH DOT BELOW" . 1699)
+ ("ARABIC LETTER VEH" . 1700)
+ ("ARABIC LETTER FEH WITH THREE DOTS BELOW" . 1701)
+ ("ARABIC LETTER PEHEH" . 1702)
+ ("ARABIC LETTER QAF WITH DOT ABOVE" . 1703)
+ ("ARABIC LETTER QAF WITH THREE DOTS ABOVE" . 1704)
+ ("ARABIC LETTER KEHEH" . 1705)
+ ("ARABIC LETTER SWASH KAF" . 1706)
+ ("ARABIC LETTER KAF WITH RING" . 1707)
+ ("ARABIC LETTER KAF WITH DOT ABOVE" . 1708)
+ ("ARABIC LETTER NG" . 1709)
+ ("ARABIC LETTER KAF WITH THREE DOTS BELOW" . 1710)
+ ("ARABIC LETTER GAF" . 1711)
+ ("ARABIC LETTER GAF WITH RING" . 1712)
+ ("ARABIC LETTER NGOEH" . 1713)
+ ("ARABIC LETTER GAF WITH TWO DOTS BELOW" . 1714)
+ ("ARABIC LETTER GUEH" . 1715)
+ ("ARABIC LETTER GAF WITH THREE DOTS ABOVE" . 1716)
+ ("ARABIC LETTER LAM WITH SMALL V" . 1717)
+ ("ARABIC LETTER LAM WITH DOT ABOVE" . 1718)
+ ("ARABIC LETTER LAM WITH THREE DOTS ABOVE" . 1719)
+ ("ARABIC LETTER LAM WITH THREE DOTS BELOW" . 1720)
+ ("ARABIC LETTER NOON WITH DOT BELOW" . 1721)
+ ("ARABIC LETTER NOON GHUNNA" . 1722)
+ ("ARABIC LETTER RNOON" . 1723)
+ ("ARABIC LETTER NOON WITH RING" . 1724)
+ ("ARABIC LETTER NOON WITH THREE DOTS ABOVE" . 1725)
+ ("ARABIC LETTER HEH DOACHASHMEE" . 1726)
+ ("ARABIC LETTER TCHEH WITH DOT ABOVE" . 1727)
+ ("ARABIC LETTER HEH WITH YEH ABOVE" . 1728)
+ ("ARABIC LETTER HEH GOAL" . 1729)
+ ("ARABIC LETTER HEH GOAL WITH HAMZA ABOVE" . 1730)
+ ("ARABIC LETTER TEH MARBUTA GOAL" . 1731)
+ ("ARABIC LETTER WAW WITH RING" . 1732)
+ ("ARABIC LETTER KIRGHIZ OE" . 1733)
+ ("ARABIC LETTER OE" . 1734)
+ ("ARABIC LETTER U" . 1735)
+ ("ARABIC LETTER YU" . 1736)
+ ("ARABIC LETTER KIRGHIZ YU" . 1737)
+ ("ARABIC LETTER WAW WITH TWO DOTS ABOVE" . 1738)
+ ("ARABIC LETTER VE" . 1739)
+ ("ARABIC LETTER FARSI YEH" . 1740)
+ ("ARABIC LETTER YEH WITH TAIL" . 1741)
+ ("ARABIC LETTER YEH WITH SMALL V" . 1742)
+ ("ARABIC LETTER WAW WITH DOT ABOVE" . 1743)
+ ("ARABIC LETTER E" . 1744)
+ ("ARABIC LETTER YEH WITH THREE DOTS BELOW" . 1745)
+ ("ARABIC LETTER YEH BARREE" . 1746)
+ ("ARABIC LETTER YEH BARREE WITH HAMZA ABOVE" . 1747)
+ ("ARABIC FULL STOP" . 1748)
+ ("ARABIC LETTER AE" . 1749)
+ ("ARABIC SMALL HIGH LIGATURE SAD WITH LAM WITH ALEF MAKSURA" . 1750)
+ ("ARABIC SMALL HIGH LIGATURE QAF WITH LAM WITH ALEF MAKSURA" . 1751)
+ ("ARABIC SMALL HIGH MEEM INITIAL FORM" . 1752)
+ ("ARABIC SMALL HIGH LAM ALEF" . 1753)
+ ("ARABIC SMALL HIGH JEEM" . 1754)
+ ("ARABIC SMALL HIGH THREE DOTS" . 1755)
+ ("ARABIC SMALL HIGH SEEN" . 1756)
+ ("ARABIC END OF AYAH" . 1757)
+ ("ARABIC START OF RUB EL HIZB" . 1758)
+ ("ARABIC SMALL HIGH ROUNDED ZERO" . 1759)
+ ("ARABIC SMALL HIGH UPRIGHT RECTANGULAR ZERO" . 1760)
+ ("ARABIC SMALL HIGH DOTLESS HEAD OF KHAH" . 1761)
+ ("ARABIC SMALL HIGH MEEM ISOLATED FORM" . 1762)
+ ("ARABIC SMALL LOW SEEN" . 1763)
+ ("ARABIC SMALL HIGH MADDA" . 1764)
+ ("ARABIC SMALL WAW" . 1765)
+ ("ARABIC SMALL YEH" . 1766)
+ ("ARABIC SMALL HIGH YEH" . 1767)
+ ("ARABIC SMALL HIGH NOON" . 1768)
+ ("ARABIC PLACE OF SAJDAH" . 1769)
+ ("ARABIC EMPTY CENTRE LOW STOP" . 1770)
+ ("ARABIC EMPTY CENTRE HIGH STOP" . 1771)
+ ("ARABIC ROUNDED HIGH STOP WITH FILLED CENTRE" . 1772)
+ ("ARABIC SMALL LOW MEEM" . 1773)
+ ("EXTENDED ARABIC-INDIC DIGIT ZERO" . 1776)
+ ("EXTENDED ARABIC-INDIC DIGIT ONE" . 1777)
+ ("EXTENDED ARABIC-INDIC DIGIT TWO" . 1778)
+ ("EXTENDED ARABIC-INDIC DIGIT THREE" . 1779)
+ ("EXTENDED ARABIC-INDIC DIGIT FOUR" . 1780)
+ ("EXTENDED ARABIC-INDIC DIGIT FIVE" . 1781)
+ ("EXTENDED ARABIC-INDIC DIGIT SIX" . 1782)
+ ("EXTENDED ARABIC-INDIC DIGIT SEVEN" . 1783)
+ ("EXTENDED ARABIC-INDIC DIGIT EIGHT" . 1784)
+ ("EXTENDED ARABIC-INDIC DIGIT NINE" . 1785)
+ ("ARABIC LETTER SHEEN WITH DOT BELOW" . 1786)
+ ("ARABIC LETTER DAD WITH DOT BELOW" . 1787)
+ ("ARABIC LETTER GHAIN WITH DOT BELOW" . 1788)
+ ("ARABIC SIGN SINDHI AMPERSAND" . 1789)
+ ("ARABIC SIGN SINDHI POSTPOSITION MEN" . 1790)
+ ("SYRIAC END OF PARAGRAPH" . 1792)
+ ("SYRIAC SUPRALINEAR FULL STOP" . 1793)
+ ("SYRIAC SUBLINEAR FULL STOP" . 1794)
+ ("SYRIAC SUPRALINEAR COLON" . 1795)
+ ("SYRIAC SUBLINEAR COLON" . 1796)
+ ("SYRIAC HORIZONTAL COLON" . 1797)
+ ("SYRIAC COLON SKEWED LEFT" . 1798)
+ ("SYRIAC COLON SKEWED RIGHT" . 1799)
+ ("SYRIAC SUPRALINEAR COLON SKEWED LEFT" . 1800)
+ ("SYRIAC SUBLINEAR COLON SKEWED RIGHT" . 1801)
+ ("SYRIAC CONTRACTION" . 1802)
+ ("SYRIAC HARKLEAN OBELUS" . 1803)
+ ("SYRIAC HARKLEAN METOBELUS" . 1804)
+ ("SYRIAC HARKLEAN ASTERISCUS" . 1805)
+ ("SYRIAC ABBREVIATION MARK" . 1807)
+ ("SYRIAC LETTER ALAPH" . 1808)
+ ("SYRIAC LETTER SUPERSCRIPT ALAPH" . 1809)
+ ("SYRIAC LETTER BETH" . 1810)
+ ("SYRIAC LETTER GAMAL" . 1811)
+ ("SYRIAC LETTER GAMAL GARSHUNI" . 1812)
+ ("SYRIAC LETTER DALATH" . 1813)
+ ("SYRIAC LETTER DOTLESS DALATH RISH" . 1814)
+ ("SYRIAC LETTER HE" . 1815)
+ ("SYRIAC LETTER WAW" . 1816)
+ ("SYRIAC LETTER ZAIN" . 1817)
+ ("SYRIAC LETTER HETH" . 1818)
+ ("SYRIAC LETTER TETH" . 1819)
+ ("SYRIAC LETTER TETH GARSHUNI" . 1820)
+ ("SYRIAC LETTER YUDH" . 1821)
+ ("SYRIAC LETTER YUDH HE" . 1822)
+ ("SYRIAC LETTER KAPH" . 1823)
+ ("SYRIAC LETTER LAMADH" . 1824)
+ ("SYRIAC LETTER MIM" . 1825)
+ ("SYRIAC LETTER NUN" . 1826)
+ ("SYRIAC LETTER SEMKATH" . 1827)
+ ("SYRIAC LETTER FINAL SEMKATH" . 1828)
+ ("SYRIAC LETTER E" . 1829)
+ ("SYRIAC LETTER PE" . 1830)
+ ("SYRIAC LETTER REVERSED PE" . 1831)
+ ("SYRIAC LETTER SADHE" . 1832)
+ ("SYRIAC LETTER QAPH" . 1833)
+ ("SYRIAC LETTER RISH" . 1834)
+ ("SYRIAC LETTER SHIN" . 1835)
+ ("SYRIAC LETTER TAW" . 1836)
+ ("SYRIAC PTHAHA ABOVE" . 1840)
+ ("SYRIAC PTHAHA BELOW" . 1841)
+ ("SYRIAC PTHAHA DOTTED" . 1842)
+ ("SYRIAC ZQAPHA ABOVE" . 1843)
+ ("SYRIAC ZQAPHA BELOW" . 1844)
+ ("SYRIAC ZQAPHA DOTTED" . 1845)
+ ("SYRIAC RBASA ABOVE" . 1846)
+ ("SYRIAC RBASA BELOW" . 1847)
+ ("SYRIAC DOTTED ZLAMA HORIZONTAL" . 1848)
+ ("SYRIAC DOTTED ZLAMA ANGULAR" . 1849)
+ ("SYRIAC HBASA ABOVE" . 1850)
+ ("SYRIAC HBASA BELOW" . 1851)
+ ("SYRIAC HBASA-ESASA DOTTED" . 1852)
+ ("SYRIAC ESASA ABOVE" . 1853)
+ ("SYRIAC ESASA BELOW" . 1854)
+ ("SYRIAC RWAHA" . 1855)
+ ("SYRIAC FEMININE DOT" . 1856)
+ ("SYRIAC QUSHSHAYA" . 1857)
+ ("SYRIAC RUKKAKHA" . 1858)
+ ("SYRIAC TWO VERTICAL DOTS ABOVE" . 1859)
+ ("SYRIAC TWO VERTICAL DOTS BELOW" . 1860)
+ ("SYRIAC THREE DOTS ABOVE" . 1861)
+ ("SYRIAC THREE DOTS BELOW" . 1862)
+ ("SYRIAC OBLIQUE LINE ABOVE" . 1863)
+ ("SYRIAC OBLIQUE LINE BELOW" . 1864)
+ ("SYRIAC MUSIC" . 1865)
+ ("SYRIAC BARREKH" . 1866)
+ ("THAANA LETTER HAA" . 1920)
+ ("THAANA LETTER SHAVIYANI" . 1921)
+ ("THAANA LETTER NOONU" . 1922)
+ ("THAANA LETTER RAA" . 1923)
+ ("THAANA LETTER BAA" . 1924)
+ ("THAANA LETTER LHAVIYANI" . 1925)
+ ("THAANA LETTER KAAFU" . 1926)
+ ("THAANA LETTER ALIFU" . 1927)
+ ("THAANA LETTER VAAVU" . 1928)
+ ("THAANA LETTER MEEMU" . 1929)
+ ("THAANA LETTER FAAFU" . 1930)
+ ("THAANA LETTER DHAALU" . 1931)
+ ("THAANA LETTER THAA" . 1932)
+ ("THAANA LETTER LAAMU" . 1933)
+ ("THAANA LETTER GAAFU" . 1934)
+ ("THAANA LETTER GNAVIYANI" . 1935)
+ ("THAANA LETTER SEENU" . 1936)
+ ("THAANA LETTER DAVIYANI" . 1937)
+ ("THAANA LETTER ZAVIYANI" . 1938)
+ ("THAANA LETTER TAVIYANI" . 1939)
+ ("THAANA LETTER YAA" . 1940)
+ ("THAANA LETTER PAVIYANI" . 1941)
+ ("THAANA LETTER JAVIYANI" . 1942)
+ ("THAANA LETTER CHAVIYANI" . 1943)
+ ("THAANA LETTER TTAA" . 1944)
+ ("THAANA LETTER HHAA" . 1945)
+ ("THAANA LETTER KHAA" . 1946)
+ ("THAANA LETTER THAALU" . 1947)
+ ("THAANA LETTER ZAA" . 1948)
+ ("THAANA LETTER SHEENU" . 1949)
+ ("THAANA LETTER SAADHU" . 1950)
+ ("THAANA LETTER DAADHU" . 1951)
+ ("THAANA LETTER TO" . 1952)
+ ("THAANA LETTER ZO" . 1953)
+ ("THAANA LETTER AINU" . 1954)
+ ("THAANA LETTER GHAINU" . 1955)
+ ("THAANA LETTER QAAFU" . 1956)
+ ("THAANA LETTER WAAVU" . 1957)
+ ("THAANA ABAFILI" . 1958)
+ ("THAANA AABAAFILI" . 1959)
+ ("THAANA IBIFILI" . 1960)
+ ("THAANA EEBEEFILI" . 1961)
+ ("THAANA UBUFILI" . 1962)
+ ("THAANA OOBOOFILI" . 1963)
+ ("THAANA EBEFILI" . 1964)
+ ("THAANA EYBEYFILI" . 1965)
+ ("THAANA OBOFILI" . 1966)
+ ("THAANA OABOAFILI" . 1967)
+ ("THAANA SUKUN" . 1968)
+ ("THAANA LETTER NAA" . 1969)
+ ("DEVANAGARI SIGN CANDRABINDU" . 2305)
+ ("DEVANAGARI SIGN ANUSVARA" . 2306)
+ ("DEVANAGARI SIGN VISARGA" . 2307)
+ ("DEVANAGARI LETTER A" . 2309)
+ ("DEVANAGARI LETTER AA" . 2310)
+ ("DEVANAGARI LETTER I" . 2311)
+ ("DEVANAGARI LETTER II" . 2312)
+ ("DEVANAGARI LETTER U" . 2313)
+ ("DEVANAGARI LETTER UU" . 2314)
+ ("DEVANAGARI LETTER VOCALIC R" . 2315)
+ ("DEVANAGARI LETTER VOCALIC L" . 2316)
+ ("DEVANAGARI LETTER CANDRA E" . 2317)
+ ("DEVANAGARI LETTER SHORT E" . 2318)
+ ("DEVANAGARI LETTER E" . 2319)
+ ("DEVANAGARI LETTER AI" . 2320)
+ ("DEVANAGARI LETTER CANDRA O" . 2321)
+ ("DEVANAGARI LETTER SHORT O" . 2322)
+ ("DEVANAGARI LETTER O" . 2323)
+ ("DEVANAGARI LETTER AU" . 2324)
+ ("DEVANAGARI LETTER KA" . 2325)
+ ("DEVANAGARI LETTER KHA" . 2326)
+ ("DEVANAGARI LETTER GA" . 2327)
+ ("DEVANAGARI LETTER GHA" . 2328)
+ ("DEVANAGARI LETTER NGA" . 2329)
+ ("DEVANAGARI LETTER CA" . 2330)
+ ("DEVANAGARI LETTER CHA" . 2331)
+ ("DEVANAGARI LETTER JA" . 2332)
+ ("DEVANAGARI LETTER JHA" . 2333)
+ ("DEVANAGARI LETTER NYA" . 2334)
+ ("DEVANAGARI LETTER TTA" . 2335)
+ ("DEVANAGARI LETTER TTHA" . 2336)
+ ("DEVANAGARI LETTER DDA" . 2337)
+ ("DEVANAGARI LETTER DDHA" . 2338)
+ ("DEVANAGARI LETTER NNA" . 2339)
+ ("DEVANAGARI LETTER TA" . 2340)
+ ("DEVANAGARI LETTER THA" . 2341)
+ ("DEVANAGARI LETTER DA" . 2342)
+ ("DEVANAGARI LETTER DHA" . 2343)
+ ("DEVANAGARI LETTER NA" . 2344)
+ ("DEVANAGARI LETTER NNNA" . 2345)
+ ("DEVANAGARI LETTER PA" . 2346)
+ ("DEVANAGARI LETTER PHA" . 2347)
+ ("DEVANAGARI LETTER BA" . 2348)
+ ("DEVANAGARI LETTER BHA" . 2349)
+ ("DEVANAGARI LETTER MA" . 2350)
+ ("DEVANAGARI LETTER YA" . 2351)
+ ("DEVANAGARI LETTER RA" . 2352)
+ ("DEVANAGARI LETTER RRA" . 2353)
+ ("DEVANAGARI LETTER LA" . 2354)
+ ("DEVANAGARI LETTER LLA" . 2355)
+ ("DEVANAGARI LETTER LLLA" . 2356)
+ ("DEVANAGARI LETTER VA" . 2357)
+ ("DEVANAGARI LETTER SHA" . 2358)
+ ("DEVANAGARI LETTER SSA" . 2359)
+ ("DEVANAGARI LETTER SA" . 2360)
+ ("DEVANAGARI LETTER HA" . 2361)
+ ("DEVANAGARI SIGN NUKTA" . 2364)
+ ("DEVANAGARI SIGN AVAGRAHA" . 2365)
+ ("DEVANAGARI VOWEL SIGN AA" . 2366)
+ ("DEVANAGARI VOWEL SIGN I" . 2367)
+ ("DEVANAGARI VOWEL SIGN II" . 2368)
+ ("DEVANAGARI VOWEL SIGN U" . 2369)
+ ("DEVANAGARI VOWEL SIGN UU" . 2370)
+ ("DEVANAGARI VOWEL SIGN VOCALIC R" . 2371)
+ ("DEVANAGARI VOWEL SIGN VOCALIC RR" . 2372)
+ ("DEVANAGARI VOWEL SIGN CANDRA E" . 2373)
+ ("DEVANAGARI VOWEL SIGN SHORT E" . 2374)
+ ("DEVANAGARI VOWEL SIGN E" . 2375)
+ ("DEVANAGARI VOWEL SIGN AI" . 2376)
+ ("DEVANAGARI VOWEL SIGN CANDRA O" . 2377)
+ ("DEVANAGARI VOWEL SIGN SHORT O" . 2378)
+ ("DEVANAGARI VOWEL SIGN O" . 2379)
+ ("DEVANAGARI VOWEL SIGN AU" . 2380)
+ ("DEVANAGARI SIGN VIRAMA" . 2381)
+ ("DEVANAGARI OM" . 2384)
+ ("DEVANAGARI STRESS SIGN UDATTA" . 2385)
+ ("DEVANAGARI STRESS SIGN ANUDATTA" . 2386)
+ ("DEVANAGARI GRAVE ACCENT" . 2387)
+ ("DEVANAGARI ACUTE ACCENT" . 2388)
+ ("DEVANAGARI LETTER QA" . 2392)
+ ("DEVANAGARI LETTER KHHA" . 2393)
+ ("DEVANAGARI LETTER GHHA" . 2394)
+ ("DEVANAGARI LETTER ZA" . 2395)
+ ("DEVANAGARI LETTER DDDHA" . 2396)
+ ("DEVANAGARI LETTER RHA" . 2397)
+ ("DEVANAGARI LETTER FA" . 2398)
+ ("DEVANAGARI LETTER YYA" . 2399)
+ ("DEVANAGARI LETTER VOCALIC RR" . 2400)
+ ("DEVANAGARI LETTER VOCALIC LL" . 2401)
+ ("DEVANAGARI VOWEL SIGN VOCALIC L" . 2402)
+ ("DEVANAGARI VOWEL SIGN VOCALIC LL" . 2403)
+ ("DEVANAGARI DANDA" . 2404)
+ ("DEVANAGARI DOUBLE DANDA" . 2405)
+ ("DEVANAGARI DIGIT ZERO" . 2406)
+ ("DEVANAGARI DIGIT ONE" . 2407)
+ ("DEVANAGARI DIGIT TWO" . 2408)
+ ("DEVANAGARI DIGIT THREE" . 2409)
+ ("DEVANAGARI DIGIT FOUR" . 2410)
+ ("DEVANAGARI DIGIT FIVE" . 2411)
+ ("DEVANAGARI DIGIT SIX" . 2412)
+ ("DEVANAGARI DIGIT SEVEN" . 2413)
+ ("DEVANAGARI DIGIT EIGHT" . 2414)
+ ("DEVANAGARI DIGIT NINE" . 2415)
+ ("DEVANAGARI ABBREVIATION SIGN" . 2416)
+ ("BENGALI SIGN CANDRABINDU" . 2433)
+ ("BENGALI SIGN ANUSVARA" . 2434)
+ ("BENGALI SIGN VISARGA" . 2435)
+ ("BENGALI LETTER A" . 2437)
+ ("BENGALI LETTER AA" . 2438)
+ ("BENGALI LETTER I" . 2439)
+ ("BENGALI LETTER II" . 2440)
+ ("BENGALI LETTER U" . 2441)
+ ("BENGALI LETTER UU" . 2442)
+ ("BENGALI LETTER VOCALIC R" . 2443)
+ ("BENGALI LETTER VOCALIC L" . 2444)
+ ("BENGALI LETTER E" . 2447)
+ ("BENGALI LETTER AI" . 2448)
+ ("BENGALI LETTER O" . 2451)
+ ("BENGALI LETTER AU" . 2452)
+ ("BENGALI LETTER KA" . 2453)
+ ("BENGALI LETTER KHA" . 2454)
+ ("BENGALI LETTER GA" . 2455)
+ ("BENGALI LETTER GHA" . 2456)
+ ("BENGALI LETTER NGA" . 2457)
+ ("BENGALI LETTER CA" . 2458)
+ ("BENGALI LETTER CHA" . 2459)
+ ("BENGALI LETTER JA" . 2460)
+ ("BENGALI LETTER JHA" . 2461)
+ ("BENGALI LETTER NYA" . 2462)
+ ("BENGALI LETTER TTA" . 2463)
+ ("BENGALI LETTER TTHA" . 2464)
+ ("BENGALI LETTER DDA" . 2465)
+ ("BENGALI LETTER DDHA" . 2466)
+ ("BENGALI LETTER NNA" . 2467)
+ ("BENGALI LETTER TA" . 2468)
+ ("BENGALI LETTER THA" . 2469)
+ ("BENGALI LETTER DA" . 2470)
+ ("BENGALI LETTER DHA" . 2471)
+ ("BENGALI LETTER NA" . 2472)
+ ("BENGALI LETTER PA" . 2474)
+ ("BENGALI LETTER PHA" . 2475)
+ ("BENGALI LETTER BA" . 2476)
+ ("BENGALI LETTER BHA" . 2477)
+ ("BENGALI LETTER MA" . 2478)
+ ("BENGALI LETTER YA" . 2479)
+ ("BENGALI LETTER RA" . 2480)
+ ("BENGALI LETTER LA" . 2482)
+ ("BENGALI LETTER SHA" . 2486)
+ ("BENGALI LETTER SSA" . 2487)
+ ("BENGALI LETTER SA" . 2488)
+ ("BENGALI LETTER HA" . 2489)
+ ("BENGALI SIGN NUKTA" . 2492)
+ ("BENGALI VOWEL SIGN AA" . 2494)
+ ("BENGALI VOWEL SIGN I" . 2495)
+ ("BENGALI VOWEL SIGN II" . 2496)
+ ("BENGALI VOWEL SIGN U" . 2497)
+ ("BENGALI VOWEL SIGN UU" . 2498)
+ ("BENGALI VOWEL SIGN VOCALIC R" . 2499)
+ ("BENGALI VOWEL SIGN VOCALIC RR" . 2500)
+ ("BENGALI VOWEL SIGN E" . 2503)
+ ("BENGALI VOWEL SIGN AI" . 2504)
+ ("BENGALI VOWEL SIGN O" . 2507)
+ ("BENGALI VOWEL SIGN AU" . 2508)
+ ("BENGALI SIGN VIRAMA" . 2509)
+ ("BENGALI AU LENGTH MARK" . 2519)
+ ("BENGALI LETTER RRA" . 2524)
+ ("BENGALI LETTER RHA" . 2525)
+ ("BENGALI LETTER YYA" . 2527)
+ ("BENGALI LETTER VOCALIC RR" . 2528)
+ ("BENGALI LETTER VOCALIC LL" . 2529)
+ ("BENGALI VOWEL SIGN VOCALIC L" . 2530)
+ ("BENGALI VOWEL SIGN VOCALIC LL" . 2531)
+ ("BENGALI DIGIT ZERO" . 2534)
+ ("BENGALI DIGIT ONE" . 2535)
+ ("BENGALI DIGIT TWO" . 2536)
+ ("BENGALI DIGIT THREE" . 2537)
+ ("BENGALI DIGIT FOUR" . 2538)
+ ("BENGALI DIGIT FIVE" . 2539)
+ ("BENGALI DIGIT SIX" . 2540)
+ ("BENGALI DIGIT SEVEN" . 2541)
+ ("BENGALI DIGIT EIGHT" . 2542)
+ ("BENGALI DIGIT NINE" . 2543)
+ ("BENGALI LETTER RA WITH MIDDLE DIAGONAL" . 2544)
+ ("BENGALI LETTER RA WITH LOWER DIAGONAL" . 2545)
+ ("BENGALI RUPEE MARK" . 2546)
+ ("BENGALI RUPEE SIGN" . 2547)
+ ("BENGALI CURRENCY NUMERATOR ONE" . 2548)
+ ("BENGALI CURRENCY NUMERATOR TWO" . 2549)
+ ("BENGALI CURRENCY NUMERATOR THREE" . 2550)
+ ("BENGALI CURRENCY NUMERATOR FOUR" . 2551)
+ ("BENGALI CURRENCY NUMERATOR ONE LESS THAN THE DENOMINATOR" . 2552)
+ ("BENGALI CURRENCY DENOMINATOR SIXTEEN" . 2553)
+ ("BENGALI ISSHAR" . 2554)
+ ("GURMUKHI SIGN BINDI" . 2562)
+ ("GURMUKHI LETTER A" . 2565)
+ ("GURMUKHI LETTER AA" . 2566)
+ ("GURMUKHI LETTER I" . 2567)
+ ("GURMUKHI LETTER II" . 2568)
+ ("GURMUKHI LETTER U" . 2569)
+ ("GURMUKHI LETTER UU" . 2570)
+ ("GURMUKHI LETTER EE" . 2575)
+ ("GURMUKHI LETTER AI" . 2576)
+ ("GURMUKHI LETTER OO" . 2579)
+ ("GURMUKHI LETTER AU" . 2580)
+ ("GURMUKHI LETTER KA" . 2581)
+ ("GURMUKHI LETTER KHA" . 2582)
+ ("GURMUKHI LETTER GA" . 2583)
+ ("GURMUKHI LETTER GHA" . 2584)
+ ("GURMUKHI LETTER NGA" . 2585)
+ ("GURMUKHI LETTER CA" . 2586)
+ ("GURMUKHI LETTER CHA" . 2587)
+ ("GURMUKHI LETTER JA" . 2588)
+ ("GURMUKHI LETTER JHA" . 2589)
+ ("GURMUKHI LETTER NYA" . 2590)
+ ("GURMUKHI LETTER TTA" . 2591)
+ ("GURMUKHI LETTER TTHA" . 2592)
+ ("GURMUKHI LETTER DDA" . 2593)
+ ("GURMUKHI LETTER DDHA" . 2594)
+ ("GURMUKHI LETTER NNA" . 2595)
+ ("GURMUKHI LETTER TA" . 2596)
+ ("GURMUKHI LETTER THA" . 2597)
+ ("GURMUKHI LETTER DA" . 2598)
+ ("GURMUKHI LETTER DHA" . 2599)
+ ("GURMUKHI LETTER NA" . 2600)
+ ("GURMUKHI LETTER PA" . 2602)
+ ("GURMUKHI LETTER PHA" . 2603)
+ ("GURMUKHI LETTER BA" . 2604)
+ ("GURMUKHI LETTER BHA" . 2605)
+ ("GURMUKHI LETTER MA" . 2606)
+ ("GURMUKHI LETTER YA" . 2607)
+ ("GURMUKHI LETTER RA" . 2608)
+ ("GURMUKHI LETTER LA" . 2610)
+ ("GURMUKHI LETTER LLA" . 2611)
+ ("GURMUKHI LETTER VA" . 2613)
+ ("GURMUKHI LETTER SHA" . 2614)
+ ("GURMUKHI LETTER SA" . 2616)
+ ("GURMUKHI LETTER HA" . 2617)
+ ("GURMUKHI SIGN NUKTA" . 2620)
+ ("GURMUKHI VOWEL SIGN AA" . 2622)
+ ("GURMUKHI VOWEL SIGN I" . 2623)
+ ("GURMUKHI VOWEL SIGN II" . 2624)
+ ("GURMUKHI VOWEL SIGN U" . 2625)
+ ("GURMUKHI VOWEL SIGN UU" . 2626)
+ ("GURMUKHI VOWEL SIGN EE" . 2631)
+ ("GURMUKHI VOWEL SIGN AI" . 2632)
+ ("GURMUKHI VOWEL SIGN OO" . 2635)
+ ("GURMUKHI VOWEL SIGN AU" . 2636)
+ ("GURMUKHI SIGN VIRAMA" . 2637)
+ ("GURMUKHI LETTER KHHA" . 2649)
+ ("GURMUKHI LETTER GHHA" . 2650)
+ ("GURMUKHI LETTER ZA" . 2651)
+ ("GURMUKHI LETTER RRA" . 2652)
+ ("GURMUKHI LETTER FA" . 2654)
+ ("GURMUKHI DIGIT ZERO" . 2662)
+ ("GURMUKHI DIGIT ONE" . 2663)
+ ("GURMUKHI DIGIT TWO" . 2664)
+ ("GURMUKHI DIGIT THREE" . 2665)
+ ("GURMUKHI DIGIT FOUR" . 2666)
+ ("GURMUKHI DIGIT FIVE" . 2667)
+ ("GURMUKHI DIGIT SIX" . 2668)
+ ("GURMUKHI DIGIT SEVEN" . 2669)
+ ("GURMUKHI DIGIT EIGHT" . 2670)
+ ("GURMUKHI DIGIT NINE" . 2671)
+ ("GURMUKHI TIPPI" . 2672)
+ ("GURMUKHI ADDAK" . 2673)
+ ("GURMUKHI IRI" . 2674)
+ ("GURMUKHI URA" . 2675)
+ ("GURMUKHI EK ONKAR" . 2676)
+ ("GUJARATI SIGN CANDRABINDU" . 2689)
+ ("GUJARATI SIGN ANUSVARA" . 2690)
+ ("GUJARATI SIGN VISARGA" . 2691)
+ ("GUJARATI LETTER A" . 2693)
+ ("GUJARATI LETTER AA" . 2694)
+ ("GUJARATI LETTER I" . 2695)
+ ("GUJARATI LETTER II" . 2696)
+ ("GUJARATI LETTER U" . 2697)
+ ("GUJARATI LETTER UU" . 2698)
+ ("GUJARATI LETTER VOCALIC R" . 2699)
+ ("GUJARATI VOWEL CANDRA E" . 2701)
+ ("GUJARATI LETTER E" . 2703)
+ ("GUJARATI LETTER AI" . 2704)
+ ("GUJARATI VOWEL CANDRA O" . 2705)
+ ("GUJARATI LETTER O" . 2707)
+ ("GUJARATI LETTER AU" . 2708)
+ ("GUJARATI LETTER KA" . 2709)
+ ("GUJARATI LETTER KHA" . 2710)
+ ("GUJARATI LETTER GA" . 2711)
+ ("GUJARATI LETTER GHA" . 2712)
+ ("GUJARATI LETTER NGA" . 2713)
+ ("GUJARATI LETTER CA" . 2714)
+ ("GUJARATI LETTER CHA" . 2715)
+ ("GUJARATI LETTER JA" . 2716)
+ ("GUJARATI LETTER JHA" . 2717)
+ ("GUJARATI LETTER NYA" . 2718)
+ ("GUJARATI LETTER TTA" . 2719)
+ ("GUJARATI LETTER TTHA" . 2720)
+ ("GUJARATI LETTER DDA" . 2721)
+ ("GUJARATI LETTER DDHA" . 2722)
+ ("GUJARATI LETTER NNA" . 2723)
+ ("GUJARATI LETTER TA" . 2724)
+ ("GUJARATI LETTER THA" . 2725)
+ ("GUJARATI LETTER DA" . 2726)
+ ("GUJARATI LETTER DHA" . 2727)
+ ("GUJARATI LETTER NA" . 2728)
+ ("GUJARATI LETTER PA" . 2730)
+ ("GUJARATI LETTER PHA" . 2731)
+ ("GUJARATI LETTER BA" . 2732)
+ ("GUJARATI LETTER BHA" . 2733)
+ ("GUJARATI LETTER MA" . 2734)
+ ("GUJARATI LETTER YA" . 2735)
+ ("GUJARATI LETTER RA" . 2736)
+ ("GUJARATI LETTER LA" . 2738)
+ ("GUJARATI LETTER LLA" . 2739)
+ ("GUJARATI LETTER VA" . 2741)
+ ("GUJARATI LETTER SHA" . 2742)
+ ("GUJARATI LETTER SSA" . 2743)
+ ("GUJARATI LETTER SA" . 2744)
+ ("GUJARATI LETTER HA" . 2745)
+ ("GUJARATI SIGN NUKTA" . 2748)
+ ("GUJARATI SIGN AVAGRAHA" . 2749)
+ ("GUJARATI VOWEL SIGN AA" . 2750)
+ ("GUJARATI VOWEL SIGN I" . 2751)
+ ("GUJARATI VOWEL SIGN II" . 2752)
+ ("GUJARATI VOWEL SIGN U" . 2753)
+ ("GUJARATI VOWEL SIGN UU" . 2754)
+ ("GUJARATI VOWEL SIGN VOCALIC R" . 2755)
+ ("GUJARATI VOWEL SIGN VOCALIC RR" . 2756)
+ ("GUJARATI VOWEL SIGN CANDRA E" . 2757)
+ ("GUJARATI VOWEL SIGN E" . 2759)
+ ("GUJARATI VOWEL SIGN AI" . 2760)
+ ("GUJARATI VOWEL SIGN CANDRA O" . 2761)
+ ("GUJARATI VOWEL SIGN O" . 2763)
+ ("GUJARATI VOWEL SIGN AU" . 2764)
+ ("GUJARATI SIGN VIRAMA" . 2765)
+ ("GUJARATI OM" . 2768)
+ ("GUJARATI LETTER VOCALIC RR" . 2784)
+ ("GUJARATI DIGIT ZERO" . 2790)
+ ("GUJARATI DIGIT ONE" . 2791)
+ ("GUJARATI DIGIT TWO" . 2792)
+ ("GUJARATI DIGIT THREE" . 2793)
+ ("GUJARATI DIGIT FOUR" . 2794)
+ ("GUJARATI DIGIT FIVE" . 2795)
+ ("GUJARATI DIGIT SIX" . 2796)
+ ("GUJARATI DIGIT SEVEN" . 2797)
+ ("GUJARATI DIGIT EIGHT" . 2798)
+ ("GUJARATI DIGIT NINE" . 2799)
+ ("ORIYA SIGN CANDRABINDU" . 2817)
+ ("ORIYA SIGN ANUSVARA" . 2818)
+ ("ORIYA SIGN VISARGA" . 2819)
+ ("ORIYA LETTER A" . 2821)
+ ("ORIYA LETTER AA" . 2822)
+ ("ORIYA LETTER I" . 2823)
+ ("ORIYA LETTER II" . 2824)
+ ("ORIYA LETTER U" . 2825)
+ ("ORIYA LETTER UU" . 2826)
+ ("ORIYA LETTER VOCALIC R" . 2827)
+ ("ORIYA LETTER VOCALIC L" . 2828)
+ ("ORIYA LETTER E" . 2831)
+ ("ORIYA LETTER AI" . 2832)
+ ("ORIYA LETTER O" . 2835)
+ ("ORIYA LETTER AU" . 2836)
+ ("ORIYA LETTER KA" . 2837)
+ ("ORIYA LETTER KHA" . 2838)
+ ("ORIYA LETTER GA" . 2839)
+ ("ORIYA LETTER GHA" . 2840)
+ ("ORIYA LETTER NGA" . 2841)
+ ("ORIYA LETTER CA" . 2842)
+ ("ORIYA LETTER CHA" . 2843)
+ ("ORIYA LETTER JA" . 2844)
+ ("ORIYA LETTER JHA" . 2845)
+ ("ORIYA LETTER NYA" . 2846)
+ ("ORIYA LETTER TTA" . 2847)
+ ("ORIYA LETTER TTHA" . 2848)
+ ("ORIYA LETTER DDA" . 2849)
+ ("ORIYA LETTER DDHA" . 2850)
+ ("ORIYA LETTER NNA" . 2851)
+ ("ORIYA LETTER TA" . 2852)
+ ("ORIYA LETTER THA" . 2853)
+ ("ORIYA LETTER DA" . 2854)
+ ("ORIYA LETTER DHA" . 2855)
+ ("ORIYA LETTER NA" . 2856)
+ ("ORIYA LETTER PA" . 2858)
+ ("ORIYA LETTER PHA" . 2859)
+ ("ORIYA LETTER BA" . 2860)
+ ("ORIYA LETTER BHA" . 2861)
+ ("ORIYA LETTER MA" . 2862)
+ ("ORIYA LETTER YA" . 2863)
+ ("ORIYA LETTER RA" . 2864)
+ ("ORIYA LETTER LA" . 2866)
+ ("ORIYA LETTER LLA" . 2867)
+ ("ORIYA LETTER SHA" . 2870)
+ ("ORIYA LETTER SSA" . 2871)
+ ("ORIYA LETTER SA" . 2872)
+ ("ORIYA LETTER HA" . 2873)
+ ("ORIYA SIGN NUKTA" . 2876)
+ ("ORIYA SIGN AVAGRAHA" . 2877)
+ ("ORIYA VOWEL SIGN AA" . 2878)
+ ("ORIYA VOWEL SIGN I" . 2879)
+ ("ORIYA VOWEL SIGN II" . 2880)
+ ("ORIYA VOWEL SIGN U" . 2881)
+ ("ORIYA VOWEL SIGN UU" . 2882)
+ ("ORIYA VOWEL SIGN VOCALIC R" . 2883)
+ ("ORIYA VOWEL SIGN E" . 2887)
+ ("ORIYA VOWEL SIGN AI" . 2888)
+ ("ORIYA VOWEL SIGN O" . 2891)
+ ("ORIYA VOWEL SIGN AU" . 2892)
+ ("ORIYA SIGN VIRAMA" . 2893)
+ ("ORIYA AI LENGTH MARK" . 2902)
+ ("ORIYA AU LENGTH MARK" . 2903)
+ ("ORIYA LETTER RRA" . 2908)
+ ("ORIYA LETTER RHA" . 2909)
+ ("ORIYA LETTER YYA" . 2911)
+ ("ORIYA LETTER VOCALIC RR" . 2912)
+ ("ORIYA LETTER VOCALIC LL" . 2913)
+ ("ORIYA DIGIT ZERO" . 2918)
+ ("ORIYA DIGIT ONE" . 2919)
+ ("ORIYA DIGIT TWO" . 2920)
+ ("ORIYA DIGIT THREE" . 2921)
+ ("ORIYA DIGIT FOUR" . 2922)
+ ("ORIYA DIGIT FIVE" . 2923)
+ ("ORIYA DIGIT SIX" . 2924)
+ ("ORIYA DIGIT SEVEN" . 2925)
+ ("ORIYA DIGIT EIGHT" . 2926)
+ ("ORIYA DIGIT NINE" . 2927)
+ ("ORIYA ISSHAR" . 2928)
+ ("TAMIL SIGN ANUSVARA" . 2946)
+ ("TAMIL SIGN VISARGA" . 2947)
+ ("TAMIL LETTER A" . 2949)
+ ("TAMIL LETTER AA" . 2950)
+ ("TAMIL LETTER I" . 2951)
+ ("TAMIL LETTER II" . 2952)
+ ("TAMIL LETTER U" . 2953)
+ ("TAMIL LETTER UU" . 2954)
+ ("TAMIL LETTER E" . 2958)
+ ("TAMIL LETTER EE" . 2959)
+ ("TAMIL LETTER AI" . 2960)
+ ("TAMIL LETTER O" . 2962)
+ ("TAMIL LETTER OO" . 2963)
+ ("TAMIL LETTER AU" . 2964)
+ ("TAMIL LETTER KA" . 2965)
+ ("TAMIL LETTER NGA" . 2969)
+ ("TAMIL LETTER CA" . 2970)
+ ("TAMIL LETTER JA" . 2972)
+ ("TAMIL LETTER NYA" . 2974)
+ ("TAMIL LETTER TTA" . 2975)
+ ("TAMIL LETTER NNA" . 2979)
+ ("TAMIL LETTER TA" . 2980)
+ ("TAMIL LETTER NA" . 2984)
+ ("TAMIL LETTER NNNA" . 2985)
+ ("TAMIL LETTER PA" . 2986)
+ ("TAMIL LETTER MA" . 2990)
+ ("TAMIL LETTER YA" . 2991)
+ ("TAMIL LETTER RA" . 2992)
+ ("TAMIL LETTER RRA" . 2993)
+ ("TAMIL LETTER LA" . 2994)
+ ("TAMIL LETTER LLA" . 2995)
+ ("TAMIL LETTER LLLA" . 2996)
+ ("TAMIL LETTER VA" . 2997)
+ ("TAMIL LETTER SSA" . 2999)
+ ("TAMIL LETTER SA" . 3000)
+ ("TAMIL LETTER HA" . 3001)
+ ("TAMIL VOWEL SIGN AA" . 3006)
+ ("TAMIL VOWEL SIGN I" . 3007)
+ ("TAMIL VOWEL SIGN II" . 3008)
+ ("TAMIL VOWEL SIGN U" . 3009)
+ ("TAMIL VOWEL SIGN UU" . 3010)
+ ("TAMIL VOWEL SIGN E" . 3014)
+ ("TAMIL VOWEL SIGN EE" . 3015)
+ ("TAMIL VOWEL SIGN AI" . 3016)
+ ("TAMIL VOWEL SIGN O" . 3018)
+ ("TAMIL VOWEL SIGN OO" . 3019)
+ ("TAMIL VOWEL SIGN AU" . 3020)
+ ("TAMIL SIGN VIRAMA" . 3021)
+ ("TAMIL AU LENGTH MARK" . 3031)
+ ("TAMIL DIGIT ONE" . 3047)
+ ("TAMIL DIGIT TWO" . 3048)
+ ("TAMIL DIGIT THREE" . 3049)
+ ("TAMIL DIGIT FOUR" . 3050)
+ ("TAMIL DIGIT FIVE" . 3051)
+ ("TAMIL DIGIT SIX" . 3052)
+ ("TAMIL DIGIT SEVEN" . 3053)
+ ("TAMIL DIGIT EIGHT" . 3054)
+ ("TAMIL DIGIT NINE" . 3055)
+ ("TAMIL NUMBER TEN" . 3056)
+ ("TAMIL NUMBER ONE HUNDRED" . 3057)
+ ("TAMIL NUMBER ONE THOUSAND" . 3058)
+ ("TELUGU SIGN CANDRABINDU" . 3073)
+ ("TELUGU SIGN ANUSVARA" . 3074)
+ ("TELUGU SIGN VISARGA" . 3075)
+ ("TELUGU LETTER A" . 3077)
+ ("TELUGU LETTER AA" . 3078)
+ ("TELUGU LETTER I" . 3079)
+ ("TELUGU LETTER II" . 3080)
+ ("TELUGU LETTER U" . 3081)
+ ("TELUGU LETTER UU" . 3082)
+ ("TELUGU LETTER VOCALIC R" . 3083)
+ ("TELUGU LETTER VOCALIC L" . 3084)
+ ("TELUGU LETTER E" . 3086)
+ ("TELUGU LETTER EE" . 3087)
+ ("TELUGU LETTER AI" . 3088)
+ ("TELUGU LETTER O" . 3090)
+ ("TELUGU LETTER OO" . 3091)
+ ("TELUGU LETTER AU" . 3092)
+ ("TELUGU LETTER KA" . 3093)
+ ("TELUGU LETTER KHA" . 3094)
+ ("TELUGU LETTER GA" . 3095)
+ ("TELUGU LETTER GHA" . 3096)
+ ("TELUGU LETTER NGA" . 3097)
+ ("TELUGU LETTER CA" . 3098)
+ ("TELUGU LETTER CHA" . 3099)
+ ("TELUGU LETTER JA" . 3100)
+ ("TELUGU LETTER JHA" . 3101)
+ ("TELUGU LETTER NYA" . 3102)
+ ("TELUGU LETTER TTA" . 3103)
+ ("TELUGU LETTER TTHA" . 3104)
+ ("TELUGU LETTER DDA" . 3105)
+ ("TELUGU LETTER DDHA" . 3106)
+ ("TELUGU LETTER NNA" . 3107)
+ ("TELUGU LETTER TA" . 3108)
+ ("TELUGU LETTER THA" . 3109)
+ ("TELUGU LETTER DA" . 3110)
+ ("TELUGU LETTER DHA" . 3111)
+ ("TELUGU LETTER NA" . 3112)
+ ("TELUGU LETTER PA" . 3114)
+ ("TELUGU LETTER PHA" . 3115)
+ ("TELUGU LETTER BA" . 3116)
+ ("TELUGU LETTER BHA" . 3117)
+ ("TELUGU LETTER MA" . 3118)
+ ("TELUGU LETTER YA" . 3119)
+ ("TELUGU LETTER RA" . 3120)
+ ("TELUGU LETTER RRA" . 3121)
+ ("TELUGU LETTER LA" . 3122)
+ ("TELUGU LETTER LLA" . 3123)
+ ("TELUGU LETTER VA" . 3125)
+ ("TELUGU LETTER SHA" . 3126)
+ ("TELUGU LETTER SSA" . 3127)
+ ("TELUGU LETTER SA" . 3128)
+ ("TELUGU LETTER HA" . 3129)
+ ("TELUGU VOWEL SIGN AA" . 3134)
+ ("TELUGU VOWEL SIGN I" . 3135)
+ ("TELUGU VOWEL SIGN II" . 3136)
+ ("TELUGU VOWEL SIGN U" . 3137)
+ ("TELUGU VOWEL SIGN UU" . 3138)
+ ("TELUGU VOWEL SIGN VOCALIC R" . 3139)
+ ("TELUGU VOWEL SIGN VOCALIC RR" . 3140)
+ ("TELUGU VOWEL SIGN E" . 3142)
+ ("TELUGU VOWEL SIGN EE" . 3143)
+ ("TELUGU VOWEL SIGN AI" . 3144)
+ ("TELUGU VOWEL SIGN O" . 3146)
+ ("TELUGU VOWEL SIGN OO" . 3147)
+ ("TELUGU VOWEL SIGN AU" . 3148)
+ ("TELUGU SIGN VIRAMA" . 3149)
+ ("TELUGU LENGTH MARK" . 3157)
+ ("TELUGU AI LENGTH MARK" . 3158)
+ ("TELUGU LETTER VOCALIC RR" . 3168)
+ ("TELUGU LETTER VOCALIC LL" . 3169)
+ ("TELUGU DIGIT ZERO" . 3174)
+ ("TELUGU DIGIT ONE" . 3175)
+ ("TELUGU DIGIT TWO" . 3176)
+ ("TELUGU DIGIT THREE" . 3177)
+ ("TELUGU DIGIT FOUR" . 3178)
+ ("TELUGU DIGIT FIVE" . 3179)
+ ("TELUGU DIGIT SIX" . 3180)
+ ("TELUGU DIGIT SEVEN" . 3181)
+ ("TELUGU DIGIT EIGHT" . 3182)
+ ("TELUGU DIGIT NINE" . 3183)
+ ("KANNADA SIGN ANUSVARA" . 3202)
+ ("KANNADA SIGN VISARGA" . 3203)
+ ("KANNADA LETTER A" . 3205)
+ ("KANNADA LETTER AA" . 3206)
+ ("KANNADA LETTER I" . 3207)
+ ("KANNADA LETTER II" . 3208)
+ ("KANNADA LETTER U" . 3209)
+ ("KANNADA LETTER UU" . 3210)
+ ("KANNADA LETTER VOCALIC R" . 3211)
+ ("KANNADA LETTER VOCALIC L" . 3212)
+ ("KANNADA LETTER E" . 3214)
+ ("KANNADA LETTER EE" . 3215)
+ ("KANNADA LETTER AI" . 3216)
+ ("KANNADA LETTER O" . 3218)
+ ("KANNADA LETTER OO" . 3219)
+ ("KANNADA LETTER AU" . 3220)
+ ("KANNADA LETTER KA" . 3221)
+ ("KANNADA LETTER KHA" . 3222)
+ ("KANNADA LETTER GA" . 3223)
+ ("KANNADA LETTER GHA" . 3224)
+ ("KANNADA LETTER NGA" . 3225)
+ ("KANNADA LETTER CA" . 3226)
+ ("KANNADA LETTER CHA" . 3227)
+ ("KANNADA LETTER JA" . 3228)
+ ("KANNADA LETTER JHA" . 3229)
+ ("KANNADA LETTER NYA" . 3230)
+ ("KANNADA LETTER TTA" . 3231)
+ ("KANNADA LETTER TTHA" . 3232)
+ ("KANNADA LETTER DDA" . 3233)
+ ("KANNADA LETTER DDHA" . 3234)
+ ("KANNADA LETTER NNA" . 3235)
+ ("KANNADA LETTER TA" . 3236)
+ ("KANNADA LETTER THA" . 3237)
+ ("KANNADA LETTER DA" . 3238)
+ ("KANNADA LETTER DHA" . 3239)
+ ("KANNADA LETTER NA" . 3240)
+ ("KANNADA LETTER PA" . 3242)
+ ("KANNADA LETTER PHA" . 3243)
+ ("KANNADA LETTER BA" . 3244)
+ ("KANNADA LETTER BHA" . 3245)
+ ("KANNADA LETTER MA" . 3246)
+ ("KANNADA LETTER YA" . 3247)
+ ("KANNADA LETTER RA" . 3248)
+ ("KANNADA LETTER RRA" . 3249)
+ ("KANNADA LETTER LA" . 3250)
+ ("KANNADA LETTER LLA" . 3251)
+ ("KANNADA LETTER VA" . 3253)
+ ("KANNADA LETTER SHA" . 3254)
+ ("KANNADA LETTER SSA" . 3255)
+ ("KANNADA LETTER SA" . 3256)
+ ("KANNADA LETTER HA" . 3257)
+ ("KANNADA VOWEL SIGN AA" . 3262)
+ ("KANNADA VOWEL SIGN I" . 3263)
+ ("KANNADA VOWEL SIGN II" . 3264)
+ ("KANNADA VOWEL SIGN U" . 3265)
+ ("KANNADA VOWEL SIGN UU" . 3266)
+ ("KANNADA VOWEL SIGN VOCALIC R" . 3267)
+ ("KANNADA VOWEL SIGN VOCALIC RR" . 3268)
+ ("KANNADA VOWEL SIGN E" . 3270)
+ ("KANNADA VOWEL SIGN EE" . 3271)
+ ("KANNADA VOWEL SIGN AI" . 3272)
+ ("KANNADA VOWEL SIGN O" . 3274)
+ ("KANNADA VOWEL SIGN OO" . 3275)
+ ("KANNADA VOWEL SIGN AU" . 3276)
+ ("KANNADA SIGN VIRAMA" . 3277)
+ ("KANNADA LENGTH MARK" . 3285)
+ ("KANNADA AI LENGTH MARK" . 3286)
+ ("KANNADA LETTER FA" . 3294)
+ ("KANNADA LETTER VOCALIC RR" . 3296)
+ ("KANNADA LETTER VOCALIC LL" . 3297)
+ ("KANNADA DIGIT ZERO" . 3302)
+ ("KANNADA DIGIT ONE" . 3303)
+ ("KANNADA DIGIT TWO" . 3304)
+ ("KANNADA DIGIT THREE" . 3305)
+ ("KANNADA DIGIT FOUR" . 3306)
+ ("KANNADA DIGIT FIVE" . 3307)
+ ("KANNADA DIGIT SIX" . 3308)
+ ("KANNADA DIGIT SEVEN" . 3309)
+ ("KANNADA DIGIT EIGHT" . 3310)
+ ("KANNADA DIGIT NINE" . 3311)
+ ("MALAYALAM SIGN ANUSVARA" . 3330)
+ ("MALAYALAM SIGN VISARGA" . 3331)
+ ("MALAYALAM LETTER A" . 3333)
+ ("MALAYALAM LETTER AA" . 3334)
+ ("MALAYALAM LETTER I" . 3335)
+ ("MALAYALAM LETTER II" . 3336)
+ ("MALAYALAM LETTER U" . 3337)
+ ("MALAYALAM LETTER UU" . 3338)
+ ("MALAYALAM LETTER VOCALIC R" . 3339)
+ ("MALAYALAM LETTER VOCALIC L" . 3340)
+ ("MALAYALAM LETTER E" . 3342)
+ ("MALAYALAM LETTER EE" . 3343)
+ ("MALAYALAM LETTER AI" . 3344)
+ ("MALAYALAM LETTER O" . 3346)
+ ("MALAYALAM LETTER OO" . 3347)
+ ("MALAYALAM LETTER AU" . 3348)
+ ("MALAYALAM LETTER KA" . 3349)
+ ("MALAYALAM LETTER KHA" . 3350)
+ ("MALAYALAM LETTER GA" . 3351)
+ ("MALAYALAM LETTER GHA" . 3352)
+ ("MALAYALAM LETTER NGA" . 3353)
+ ("MALAYALAM LETTER CA" . 3354)
+ ("MALAYALAM LETTER CHA" . 3355)
+ ("MALAYALAM LETTER JA" . 3356)
+ ("MALAYALAM LETTER JHA" . 3357)
+ ("MALAYALAM LETTER NYA" . 3358)
+ ("MALAYALAM LETTER TTA" . 3359)
+ ("MALAYALAM LETTER TTHA" . 3360)
+ ("MALAYALAM LETTER DDA" . 3361)
+ ("MALAYALAM LETTER DDHA" . 3362)
+ ("MALAYALAM LETTER NNA" . 3363)
+ ("MALAYALAM LETTER TA" . 3364)
+ ("MALAYALAM LETTER THA" . 3365)
+ ("MALAYALAM LETTER DA" . 3366)
+ ("MALAYALAM LETTER DHA" . 3367)
+ ("MALAYALAM LETTER NA" . 3368)
+ ("MALAYALAM LETTER PA" . 3370)
+ ("MALAYALAM LETTER PHA" . 3371)
+ ("MALAYALAM LETTER BA" . 3372)
+ ("MALAYALAM LETTER BHA" . 3373)
+ ("MALAYALAM LETTER MA" . 3374)
+ ("MALAYALAM LETTER YA" . 3375)
+ ("MALAYALAM LETTER RA" . 3376)
+ ("MALAYALAM LETTER RRA" . 3377)
+ ("MALAYALAM LETTER LA" . 3378)
+ ("MALAYALAM LETTER LLA" . 3379)
+ ("MALAYALAM LETTER LLLA" . 3380)
+ ("MALAYALAM LETTER VA" . 3381)
+ ("MALAYALAM LETTER SHA" . 3382)
+ ("MALAYALAM LETTER SSA" . 3383)
+ ("MALAYALAM LETTER SA" . 3384)
+ ("MALAYALAM LETTER HA" . 3385)
+ ("MALAYALAM VOWEL SIGN AA" . 3390)
+ ("MALAYALAM VOWEL SIGN I" . 3391)
+ ("MALAYALAM VOWEL SIGN II" . 3392)
+ ("MALAYALAM VOWEL SIGN U" . 3393)
+ ("MALAYALAM VOWEL SIGN UU" . 3394)
+ ("MALAYALAM VOWEL SIGN VOCALIC R" . 3395)
+ ("MALAYALAM VOWEL SIGN E" . 3398)
+ ("MALAYALAM VOWEL SIGN EE" . 3399)
+ ("MALAYALAM VOWEL SIGN AI" . 3400)
+ ("MALAYALAM VOWEL SIGN O" . 3402)
+ ("MALAYALAM VOWEL SIGN OO" . 3403)
+ ("MALAYALAM VOWEL SIGN AU" . 3404)
+ ("MALAYALAM SIGN VIRAMA" . 3405)
+ ("MALAYALAM AU LENGTH MARK" . 3415)
+ ("MALAYALAM LETTER VOCALIC RR" . 3424)
+ ("MALAYALAM LETTER VOCALIC LL" . 3425)
+ ("MALAYALAM DIGIT ZERO" . 3430)
+ ("MALAYALAM DIGIT ONE" . 3431)
+ ("MALAYALAM DIGIT TWO" . 3432)
+ ("MALAYALAM DIGIT THREE" . 3433)
+ ("MALAYALAM DIGIT FOUR" . 3434)
+ ("MALAYALAM DIGIT FIVE" . 3435)
+ ("MALAYALAM DIGIT SIX" . 3436)
+ ("MALAYALAM DIGIT SEVEN" . 3437)
+ ("MALAYALAM DIGIT EIGHT" . 3438)
+ ("MALAYALAM DIGIT NINE" . 3439)
+ ("SINHALA SIGN ANUSVARAYA" . 3458)
+ ("SINHALA SIGN VISARGAYA" . 3459)
+ ("SINHALA LETTER AYANNA" . 3461)
+ ("SINHALA LETTER AAYANNA" . 3462)
+ ("SINHALA LETTER AEYANNA" . 3463)
+ ("SINHALA LETTER AEEYANNA" . 3464)
+ ("SINHALA LETTER IYANNA" . 3465)
+ ("SINHALA LETTER IIYANNA" . 3466)
+ ("SINHALA LETTER UYANNA" . 3467)
+ ("SINHALA LETTER UUYANNA" . 3468)
+ ("SINHALA LETTER IRUYANNA" . 3469)
+ ("SINHALA LETTER IRUUYANNA" . 3470)
+ ("SINHALA LETTER ILUYANNA" . 3471)
+ ("SINHALA LETTER ILUUYANNA" . 3472)
+ ("SINHALA LETTER EYANNA" . 3473)
+ ("SINHALA LETTER EEYANNA" . 3474)
+ ("SINHALA LETTER AIYANNA" . 3475)
+ ("SINHALA LETTER OYANNA" . 3476)
+ ("SINHALA LETTER OOYANNA" . 3477)
+ ("SINHALA LETTER AUYANNA" . 3478)
+ ("SINHALA LETTER ALPAPRAANA KAYANNA" . 3482)
+ ("SINHALA LETTER MAHAAPRAANA KAYANNA" . 3483)
+ ("SINHALA LETTER ALPAPRAANA GAYANNA" . 3484)
+ ("SINHALA LETTER MAHAAPRAANA GAYANNA" . 3485)
+ ("SINHALA LETTER KANTAJA NAASIKYAYA" . 3486)
+ ("SINHALA LETTER SANYAKA GAYANNA" . 3487)
+ ("SINHALA LETTER ALPAPRAANA CAYANNA" . 3488)
+ ("SINHALA LETTER MAHAAPRAANA CAYANNA" . 3489)
+ ("SINHALA LETTER ALPAPRAANA JAYANNA" . 3490)
+ ("SINHALA LETTER MAHAAPRAANA JAYANNA" . 3491)
+ ("SINHALA LETTER TAALUJA NAASIKYAYA" . 3492)
+ ("SINHALA LETTER TAALUJA SANYOOGA NAAKSIKYAYA" . 3493)
+ ("SINHALA LETTER SANYAKA JAYANNA" . 3494)
+ ("SINHALA LETTER ALPAPRAANA TTAYANNA" . 3495)
+ ("SINHALA LETTER MAHAAPRAANA TTAYANNA" . 3496)
+ ("SINHALA LETTER ALPAPRAANA DDAYANNA" . 3497)
+ ("SINHALA LETTER MAHAAPRAANA DDAYANNA" . 3498)
+ ("SINHALA LETTER MUURDHAJA NAYANNA" . 3499)
+ ("SINHALA LETTER SANYAKA DDAYANNA" . 3500)
+ ("SINHALA LETTER ALPAPRAANA TAYANNA" . 3501)
+ ("SINHALA LETTER MAHAAPRAANA TAYANNA" . 3502)
+ ("SINHALA LETTER ALPAPRAANA DAYANNA" . 3503)
+ ("SINHALA LETTER MAHAAPRAANA DAYANNA" . 3504)
+ ("SINHALA LETTER DANTAJA NAYANNA" . 3505)
+ ("SINHALA LETTER SANYAKA DAYANNA" . 3507)
+ ("SINHALA LETTER ALPAPRAANA PAYANNA" . 3508)
+ ("SINHALA LETTER MAHAAPRAANA PAYANNA" . 3509)
+ ("SINHALA LETTER ALPAPRAANA BAYANNA" . 3510)
+ ("SINHALA LETTER MAHAAPRAANA BAYANNA" . 3511)
+ ("SINHALA LETTER MAYANNA" . 3512)
+ ("SINHALA LETTER AMBA BAYANNA" . 3513)
+ ("SINHALA LETTER YAYANNA" . 3514)
+ ("SINHALA LETTER RAYANNA" . 3515)
+ ("SINHALA LETTER DANTAJA LAYANNA" . 3517)
+ ("SINHALA LETTER VAYANNA" . 3520)
+ ("SINHALA LETTER TAALUJA SAYANNA" . 3521)
+ ("SINHALA LETTER MUURDHAJA SAYANNA" . 3522)
+ ("SINHALA LETTER DANTAJA SAYANNA" . 3523)
+ ("SINHALA LETTER HAYANNA" . 3524)
+ ("SINHALA LETTER MUURDHAJA LAYANNA" . 3525)
+ ("SINHALA LETTER FAYANNA" . 3526)
+ ("SINHALA SIGN AL-LAKUNA" . 3530)
+ ("SINHALA VOWEL SIGN AELA-PILLA" . 3535)
+ ("SINHALA VOWEL SIGN KETTI AEDA-PILLA" . 3536)
+ ("SINHALA VOWEL SIGN DIGA AEDA-PILLA" . 3537)
+ ("SINHALA VOWEL SIGN KETTI IS-PILLA" . 3538)
+ ("SINHALA VOWEL SIGN DIGA IS-PILLA" . 3539)
+ ("SINHALA VOWEL SIGN KETTI PAA-PILLA" . 3540)
+ ("SINHALA VOWEL SIGN DIGA PAA-PILLA" . 3542)
+ ("SINHALA VOWEL SIGN GAETTA-PILLA" . 3544)
+ ("SINHALA VOWEL SIGN KOMBUVA" . 3545)
+ ("SINHALA VOWEL SIGN DIGA KOMBUVA" . 3546)
+ ("SINHALA VOWEL SIGN KOMBU DEKA" . 3547)
+ ("SINHALA VOWEL SIGN KOMBUVA HAA AELA-PILLA" . 3548)
+ ("SINHALA VOWEL SIGN KOMBUVA HAA DIGA AELA-PILLA" . 3549)
+ ("SINHALA VOWEL SIGN KOMBUVA HAA GAYANUKITTA" . 3550)
+ ("SINHALA VOWEL SIGN GAYANUKITTA" . 3551)
+ ("SINHALA VOWEL SIGN DIGA GAETTA-PILLA" . 3570)
+ ("SINHALA VOWEL SIGN DIGA GAYANUKITTA" . 3571)
+ ("SINHALA PUNCTUATION KUNDDALIYA" . 3572)
+ ("THAI CHARACTER KO KAI" . 3585)
+ ("THAI CHARACTER KHO KHAI" . 3586)
+ ("THAI CHARACTER KHO KHUAT" . 3587)
+ ("THAI CHARACTER KHO KHWAI" . 3588)
+ ("THAI CHARACTER KHO KHON" . 3589)
+ ("THAI CHARACTER KHO RAKHANG" . 3590)
+ ("THAI CHARACTER NGO NGU" . 3591)
+ ("THAI CHARACTER CHO CHAN" . 3592)
+ ("THAI CHARACTER CHO CHING" . 3593)
+ ("THAI CHARACTER CHO CHANG" . 3594)
+ ("THAI CHARACTER SO SO" . 3595)
+ ("THAI CHARACTER CHO CHOE" . 3596)
+ ("THAI CHARACTER YO YING" . 3597)
+ ("THAI CHARACTER DO CHADA" . 3598)
+ ("THAI CHARACTER TO PATAK" . 3599)
+ ("THAI CHARACTER THO THAN" . 3600)
+ ("THAI CHARACTER THO NANGMONTHO" . 3601)
+ ("THAI CHARACTER THO PHUTHAO" . 3602)
+ ("THAI CHARACTER NO NEN" . 3603)
+ ("THAI CHARACTER DO DEK" . 3604)
+ ("THAI CHARACTER TO TAO" . 3605)
+ ("THAI CHARACTER THO THUNG" . 3606)
+ ("THAI CHARACTER THO THAHAN" . 3607)
+ ("THAI CHARACTER THO THONG" . 3608)
+ ("THAI CHARACTER NO NU" . 3609)
+ ("THAI CHARACTER BO BAIMAI" . 3610)
+ ("THAI CHARACTER PO PLA" . 3611)
+ ("THAI CHARACTER PHO PHUNG" . 3612)
+ ("THAI CHARACTER FO FA" . 3613)
+ ("THAI CHARACTER PHO PHAN" . 3614)
+ ("THAI CHARACTER FO FAN" . 3615)
+ ("THAI CHARACTER PHO SAMPHAO" . 3616)
+ ("THAI CHARACTER MO MA" . 3617)
+ ("THAI CHARACTER YO YAK" . 3618)
+ ("THAI CHARACTER RO RUA" . 3619)
+ ("THAI CHARACTER RU" . 3620)
+ ("THAI CHARACTER LO LING" . 3621)
+ ("THAI CHARACTER LU" . 3622)
+ ("THAI CHARACTER WO WAEN" . 3623)
+ ("THAI CHARACTER SO SALA" . 3624)
+ ("THAI CHARACTER SO RUSI" . 3625)
+ ("THAI CHARACTER SO SUA" . 3626)
+ ("THAI CHARACTER HO HIP" . 3627)
+ ("THAI CHARACTER LO CHULA" . 3628)
+ ("THAI CHARACTER O ANG" . 3629)
+ ("THAI CHARACTER HO NOKHUK" . 3630)
+ ("THAI CHARACTER PAIYANNOI" . 3631)
+ ("THAI CHARACTER SARA A" . 3632)
+ ("THAI CHARACTER MAI HAN-AKAT" . 3633)
+ ("THAI CHARACTER SARA AA" . 3634)
+ ("THAI CHARACTER SARA AM" . 3635)
+ ("THAI CHARACTER SARA I" . 3636)
+ ("THAI CHARACTER SARA II" . 3637)
+ ("THAI CHARACTER SARA UE" . 3638)
+ ("THAI CHARACTER SARA UEE" . 3639)
+ ("THAI CHARACTER SARA U" . 3640)
+ ("THAI CHARACTER SARA UU" . 3641)
+ ("THAI CHARACTER PHINTHU" . 3642)
+ ("THAI CURRENCY SYMBOL BAHT" . 3647)
+ ("THAI CHARACTER SARA E" . 3648)
+ ("THAI CHARACTER SARA AE" . 3649)
+ ("THAI CHARACTER SARA O" . 3650)
+ ("THAI CHARACTER SARA AI MAIMUAN" . 3651)
+ ("THAI CHARACTER SARA AI MAIMALAI" . 3652)
+ ("THAI CHARACTER LAKKHANGYAO" . 3653)
+ ("THAI CHARACTER MAIYAMOK" . 3654)
+ ("THAI CHARACTER MAITAIKHU" . 3655)
+ ("THAI CHARACTER MAI EK" . 3656)
+ ("THAI CHARACTER MAI THO" . 3657)
+ ("THAI CHARACTER MAI TRI" . 3658)
+ ("THAI CHARACTER MAI CHATTAWA" . 3659)
+ ("THAI CHARACTER THANTHAKHAT" . 3660)
+ ("THAI CHARACTER NIKHAHIT" . 3661)
+ ("THAI CHARACTER YAMAKKAN" . 3662)
+ ("THAI CHARACTER FONGMAN" . 3663)
+ ("THAI DIGIT ZERO" . 3664)
+ ("THAI DIGIT ONE" . 3665)
+ ("THAI DIGIT TWO" . 3666)
+ ("THAI DIGIT THREE" . 3667)
+ ("THAI DIGIT FOUR" . 3668)
+ ("THAI DIGIT FIVE" . 3669)
+ ("THAI DIGIT SIX" . 3670)
+ ("THAI DIGIT SEVEN" . 3671)
+ ("THAI DIGIT EIGHT" . 3672)
+ ("THAI DIGIT NINE" . 3673)
+ ("THAI CHARACTER ANGKHANKHU" . 3674)
+ ("THAI CHARACTER KHOMUT" . 3675)
+ ("LAO LETTER KO" . 3713)
+ ("LAO LETTER KHO SUNG" . 3714)
+ ("LAO LETTER KHO TAM" . 3716)
+ ("LAO LETTER NGO" . 3719)
+ ("LAO LETTER CO" . 3720)
+ ("LAO LETTER SO TAM" . 3722)
+ ("LAO LETTER NYO" . 3725)
+ ("LAO LETTER DO" . 3732)
+ ("LAO LETTER TO" . 3733)
+ ("LAO LETTER THO SUNG" . 3734)
+ ("LAO LETTER THO TAM" . 3735)
+ ("LAO LETTER NO" . 3737)
+ ("LAO LETTER BO" . 3738)
+ ("LAO LETTER PO" . 3739)
+ ("LAO LETTER PHO SUNG" . 3740)
+ ("LAO LETTER FO TAM" . 3741)
+ ("LAO LETTER PHO TAM" . 3742)
+ ("LAO LETTER FO SUNG" . 3743)
+ ("LAO LETTER MO" . 3745)
+ ("LAO LETTER YO" . 3746)
+ ("LAO LETTER LO LING" . 3747)
+ ("LAO LETTER LO LOOT" . 3749)
+ ("LAO LETTER WO" . 3751)
+ ("LAO LETTER SO SUNG" . 3754)
+ ("LAO LETTER HO SUNG" . 3755)
+ ("LAO LETTER O" . 3757)
+ ("LAO LETTER HO TAM" . 3758)
+ ("LAO ELLIPSIS" . 3759)
+ ("LAO VOWEL SIGN A" . 3760)
+ ("LAO VOWEL SIGN MAI KAN" . 3761)
+ ("LAO VOWEL SIGN AA" . 3762)
+ ("LAO VOWEL SIGN AM" . 3763)
+ ("LAO VOWEL SIGN I" . 3764)
+ ("LAO VOWEL SIGN II" . 3765)
+ ("LAO VOWEL SIGN Y" . 3766)
+ ("LAO VOWEL SIGN YY" . 3767)
+ ("LAO VOWEL SIGN U" . 3768)
+ ("LAO VOWEL SIGN UU" . 3769)
+ ("LAO VOWEL SIGN MAI KON" . 3771)
+ ("LAO SEMIVOWEL SIGN LO" . 3772)
+ ("LAO SEMIVOWEL SIGN NYO" . 3773)
+ ("LAO VOWEL SIGN E" . 3776)
+ ("LAO VOWEL SIGN EI" . 3777)
+ ("LAO VOWEL SIGN O" . 3778)
+ ("LAO VOWEL SIGN AY" . 3779)
+ ("LAO VOWEL SIGN AI" . 3780)
+ ("LAO KO LA" . 3782)
+ ("LAO TONE MAI EK" . 3784)
+ ("LAO TONE MAI THO" . 3785)
+ ("LAO TONE MAI TI" . 3786)
+ ("LAO TONE MAI CATAWA" . 3787)
+ ("LAO CANCELLATION MARK" . 3788)
+ ("LAO NIGGAHITA" . 3789)
+ ("LAO DIGIT ZERO" . 3792)
+ ("LAO DIGIT ONE" . 3793)
+ ("LAO DIGIT TWO" . 3794)
+ ("LAO DIGIT THREE" . 3795)
+ ("LAO DIGIT FOUR" . 3796)
+ ("LAO DIGIT FIVE" . 3797)
+ ("LAO DIGIT SIX" . 3798)
+ ("LAO DIGIT SEVEN" . 3799)
+ ("LAO DIGIT EIGHT" . 3800)
+ ("LAO DIGIT NINE" . 3801)
+ ("LAO HO NO" . 3804)
+ ("LAO HO MO" . 3805)
+ ("TIBETAN SYLLABLE OM" . 3840)
+ ("TIBETAN MARK GTER YIG MGO TRUNCATED A" . 3841)
+ ("TIBETAN MARK GTER YIG MGO -UM RNAM BCAD MA" . 3842)
+ ("TIBETAN MARK GTER YIG MGO -UM GTER TSHEG MA" . 3843)
+ ("TIBETAN MARK INITIAL YIG MGO MDUN MA" . 3844)
+ ("TIBETAN MARK CLOSING YIG MGO SGAB MA" . 3845)
+ ("TIBETAN MARK CARET YIG MGO PHUR SHAD MA" . 3846)
+ ("TIBETAN MARK YIG MGO TSHEG SHAD MA" . 3847)
+ ("TIBETAN MARK SBRUL SHAD" . 3848)
+ ("TIBETAN MARK BSKUR YIG MGO" . 3849)
+ ("TIBETAN MARK BKA- SHOG YIG MGO" . 3850)
+ ("TIBETAN MARK INTERSYLLABIC TSHEG" . 3851)
+ ("TIBETAN MARK DELIMITER TSHEG BSTAR" . 3852)
+ ("TIBETAN MARK SHAD" . 3853)
+ ("TIBETAN MARK NYIS SHAD" . 3854)
+ ("TIBETAN MARK TSHEG SHAD" . 3855)
+ ("TIBETAN MARK NYIS TSHEG SHAD" . 3856)
+ ("TIBETAN MARK RIN CHEN SPUNGS SHAD" . 3857)
+ ("TIBETAN MARK RGYA GRAM SHAD" . 3858)
+ ("TIBETAN MARK CARET -DZUD RTAGS ME LONG CAN" . 3859)
+ ("TIBETAN MARK GTER TSHEG" . 3860)
+ ("TIBETAN LOGOTYPE SIGN CHAD RTAGS" . 3861)
+ ("TIBETAN LOGOTYPE SIGN LHAG RTAGS" . 3862)
+ ("TIBETAN ASTROLOGICAL SIGN SGRA GCAN -CHAR RTAGS" . 3863)
+ ("TIBETAN ASTROLOGICAL SIGN -KHYUD PA" . 3864)
+ ("TIBETAN ASTROLOGICAL SIGN SDONG TSHUGS" . 3865)
+ ("TIBETAN SIGN RDEL DKAR GCIG" . 3866)
+ ("TIBETAN SIGN RDEL DKAR GNYIS" . 3867)
+ ("TIBETAN SIGN RDEL DKAR GSUM" . 3868)
+ ("TIBETAN SIGN RDEL NAG GCIG" . 3869)
+ ("TIBETAN SIGN RDEL NAG GNYIS" . 3870)
+ ("TIBETAN SIGN RDEL DKAR RDEL NAG" . 3871)
+ ("TIBETAN DIGIT ZERO" . 3872)
+ ("TIBETAN DIGIT ONE" . 3873)
+ ("TIBETAN DIGIT TWO" . 3874)
+ ("TIBETAN DIGIT THREE" . 3875)
+ ("TIBETAN DIGIT FOUR" . 3876)
+ ("TIBETAN DIGIT FIVE" . 3877)
+ ("TIBETAN DIGIT SIX" . 3878)
+ ("TIBETAN DIGIT SEVEN" . 3879)
+ ("TIBETAN DIGIT EIGHT" . 3880)
+ ("TIBETAN DIGIT NINE" . 3881)
+ ("TIBETAN DIGIT HALF ONE" . 3882)
+ ("TIBETAN DIGIT HALF TWO" . 3883)
+ ("TIBETAN DIGIT HALF THREE" . 3884)
+ ("TIBETAN DIGIT HALF FOUR" . 3885)
+ ("TIBETAN DIGIT HALF FIVE" . 3886)
+ ("TIBETAN DIGIT HALF SIX" . 3887)
+ ("TIBETAN DIGIT HALF SEVEN" . 3888)
+ ("TIBETAN DIGIT HALF EIGHT" . 3889)
+ ("TIBETAN DIGIT HALF NINE" . 3890)
+ ("TIBETAN DIGIT HALF ZERO" . 3891)
+ ("TIBETAN MARK BSDUS RTAGS" . 3892)
+ ("TIBETAN MARK NGAS BZUNG NYI ZLA" . 3893)
+ ("TIBETAN MARK CARET -DZUD RTAGS BZHI MIG CAN" . 3894)
+ ("TIBETAN MARK NGAS BZUNG SGOR RTAGS" . 3895)
+ ("TIBETAN MARK CHE MGO" . 3896)
+ ("TIBETAN MARK TSA -PHRU" . 3897)
+ ("TIBETAN MARK GUG RTAGS GYON" . 3898)
+ ("TIBETAN MARK GUG RTAGS GYAS" . 3899)
+ ("TIBETAN MARK ANG KHANG GYON" . 3900)
+ ("TIBETAN MARK ANG KHANG GYAS" . 3901)
+ ("TIBETAN SIGN YAR TSHES" . 3902)
+ ("TIBETAN SIGN MAR TSHES" . 3903)
+ ("TIBETAN LETTER KA" . 3904)
+ ("TIBETAN LETTER KHA" . 3905)
+ ("TIBETAN LETTER GA" . 3906)
+ ("TIBETAN LETTER GHA" . 3907)
+ ("TIBETAN LETTER NGA" . 3908)
+ ("TIBETAN LETTER CA" . 3909)
+ ("TIBETAN LETTER CHA" . 3910)
+ ("TIBETAN LETTER JA" . 3911)
+ ("TIBETAN LETTER NYA" . 3913)
+ ("TIBETAN LETTER TTA" . 3914)
+ ("TIBETAN LETTER TTHA" . 3915)
+ ("TIBETAN LETTER DDA" . 3916)
+ ("TIBETAN LETTER DDHA" . 3917)
+ ("TIBETAN LETTER NNA" . 3918)
+ ("TIBETAN LETTER TA" . 3919)
+ ("TIBETAN LETTER THA" . 3920)
+ ("TIBETAN LETTER DA" . 3921)
+ ("TIBETAN LETTER DHA" . 3922)
+ ("TIBETAN LETTER NA" . 3923)
+ ("TIBETAN LETTER PA" . 3924)
+ ("TIBETAN LETTER PHA" . 3925)
+ ("TIBETAN LETTER BA" . 3926)
+ ("TIBETAN LETTER BHA" . 3927)
+ ("TIBETAN LETTER MA" . 3928)
+ ("TIBETAN LETTER TSA" . 3929)
+ ("TIBETAN LETTER TSHA" . 3930)
+ ("TIBETAN LETTER DZA" . 3931)
+ ("TIBETAN LETTER DZHA" . 3932)
+ ("TIBETAN LETTER WA" . 3933)
+ ("TIBETAN LETTER ZHA" . 3934)
+ ("TIBETAN LETTER ZA" . 3935)
+ ("TIBETAN LETTER -A" . 3936)
+ ("TIBETAN LETTER YA" . 3937)
+ ("TIBETAN LETTER RA" . 3938)
+ ("TIBETAN LETTER LA" . 3939)
+ ("TIBETAN LETTER SHA" . 3940)
+ ("TIBETAN LETTER SSA" . 3941)
+ ("TIBETAN LETTER SA" . 3942)
+ ("TIBETAN LETTER HA" . 3943)
+ ("TIBETAN LETTER A" . 3944)
+ ("TIBETAN LETTER KSSA" . 3945)
+ ("TIBETAN LETTER FIXED-FORM RA" . 3946)
+ ("TIBETAN VOWEL SIGN AA" . 3953)
+ ("TIBETAN VOWEL SIGN I" . 3954)
+ ("TIBETAN VOWEL SIGN II" . 3955)
+ ("TIBETAN VOWEL SIGN U" . 3956)
+ ("TIBETAN VOWEL SIGN UU" . 3957)
+ ("TIBETAN VOWEL SIGN VOCALIC R" . 3958)
+ ("TIBETAN VOWEL SIGN VOCALIC RR" . 3959)
+ ("TIBETAN VOWEL SIGN VOCALIC L" . 3960)
+ ("TIBETAN VOWEL SIGN VOCALIC LL" . 3961)
+ ("TIBETAN VOWEL SIGN E" . 3962)
+ ("TIBETAN VOWEL SIGN EE" . 3963)
+ ("TIBETAN VOWEL SIGN O" . 3964)
+ ("TIBETAN VOWEL SIGN OO" . 3965)
+ ("TIBETAN SIGN RJES SU NGA RO" . 3966)
+ ("TIBETAN SIGN RNAM BCAD" . 3967)
+ ("TIBETAN VOWEL SIGN REVERSED I" . 3968)
+ ("TIBETAN VOWEL SIGN REVERSED II" . 3969)
+ ("TIBETAN SIGN NYI ZLA NAA DA" . 3970)
+ ("TIBETAN SIGN SNA LDAN" . 3971)
+ ("TIBETAN MARK HALANTA" . 3972)
+ ("TIBETAN MARK PALUTA" . 3973)
+ ("TIBETAN SIGN LCI RTAGS" . 3974)
+ ("TIBETAN SIGN YANG RTAGS" . 3975)
+ ("TIBETAN SIGN LCE TSA CAN" . 3976)
+ ("TIBETAN SIGN MCHU CAN" . 3977)
+ ("TIBETAN SIGN GRU CAN RGYINGS" . 3978)
+ ("TIBETAN SIGN GRU MED RGYINGS" . 3979)
+ ("TIBETAN SUBJOINED LETTER KA" . 3984)
+ ("TIBETAN SUBJOINED LETTER KHA" . 3985)
+ ("TIBETAN SUBJOINED LETTER GA" . 3986)
+ ("TIBETAN SUBJOINED LETTER GHA" . 3987)
+ ("TIBETAN SUBJOINED LETTER NGA" . 3988)
+ ("TIBETAN SUBJOINED LETTER CA" . 3989)
+ ("TIBETAN SUBJOINED LETTER CHA" . 3990)
+ ("TIBETAN SUBJOINED LETTER JA" . 3991)
+ ("TIBETAN SUBJOINED LETTER NYA" . 3993)
+ ("TIBETAN SUBJOINED LETTER TTA" . 3994)
+ ("TIBETAN SUBJOINED LETTER TTHA" . 3995)
+ ("TIBETAN SUBJOINED LETTER DDA" . 3996)
+ ("TIBETAN SUBJOINED LETTER DDHA" . 3997)
+ ("TIBETAN SUBJOINED LETTER NNA" . 3998)
+ ("TIBETAN SUBJOINED LETTER TA" . 3999)
+ ("TIBETAN SUBJOINED LETTER THA" . 4000)
+ ("TIBETAN SUBJOINED LETTER DA" . 4001)
+ ("TIBETAN SUBJOINED LETTER DHA" . 4002)
+ ("TIBETAN SUBJOINED LETTER NA" . 4003)
+ ("TIBETAN SUBJOINED LETTER PA" . 4004)
+ ("TIBETAN SUBJOINED LETTER PHA" . 4005)
+ ("TIBETAN SUBJOINED LETTER BA" . 4006)
+ ("TIBETAN SUBJOINED LETTER BHA" . 4007)
+ ("TIBETAN SUBJOINED LETTER MA" . 4008)
+ ("TIBETAN SUBJOINED LETTER TSA" . 4009)
+ ("TIBETAN SUBJOINED LETTER TSHA" . 4010)
+ ("TIBETAN SUBJOINED LETTER DZA" . 4011)
+ ("TIBETAN SUBJOINED LETTER DZHA" . 4012)
+ ("TIBETAN SUBJOINED LETTER WA" . 4013)
+ ("TIBETAN SUBJOINED LETTER ZHA" . 4014)
+ ("TIBETAN SUBJOINED LETTER ZA" . 4015)
+ ("TIBETAN SUBJOINED LETTER -A" . 4016)
+ ("TIBETAN SUBJOINED LETTER YA" . 4017)
+ ("TIBETAN SUBJOINED LETTER RA" . 4018)
+ ("TIBETAN SUBJOINED LETTER LA" . 4019)
+ ("TIBETAN SUBJOINED LETTER SHA" . 4020)
+ ("TIBETAN SUBJOINED LETTER SSA" . 4021)
+ ("TIBETAN SUBJOINED LETTER SA" . 4022)
+ ("TIBETAN SUBJOINED LETTER HA" . 4023)
+ ("TIBETAN SUBJOINED LETTER A" . 4024)
+ ("TIBETAN SUBJOINED LETTER KSSA" . 4025)
+ ("TIBETAN SUBJOINED LETTER FIXED-FORM WA" . 4026)
+ ("TIBETAN SUBJOINED LETTER FIXED-FORM YA" . 4027)
+ ("TIBETAN SUBJOINED LETTER FIXED-FORM RA" . 4028)
+ ("TIBETAN KU RU KHA" . 4030)
+ ("TIBETAN KU RU KHA BZHI MIG CAN" . 4031)
+ ("TIBETAN CANTILLATION SIGN HEAVY BEAT" . 4032)
+ ("TIBETAN CANTILLATION SIGN LIGHT BEAT" . 4033)
+ ("TIBETAN CANTILLATION SIGN CANG TE-U" . 4034)
+ ("TIBETAN CANTILLATION SIGN SBUB -CHAL" . 4035)
+ ("TIBETAN SYMBOL DRIL BU" . 4036)
+ ("TIBETAN SYMBOL RDO RJE" . 4037)
+ ("TIBETAN SYMBOL PADMA GDAN" . 4038)
+ ("TIBETAN SYMBOL RDO RJE RGYA GRAM" . 4039)
+ ("TIBETAN SYMBOL PHUR PA" . 4040)
+ ("TIBETAN SYMBOL NOR BU" . 4041)
+ ("TIBETAN SYMBOL NOR BU NYIS -KHYIL" . 4042)
+ ("TIBETAN SYMBOL NOR BU GSUM -KHYIL" . 4043)
+ ("TIBETAN SYMBOL NOR BU BZHI -KHYIL" . 4044)
+ ("TIBETAN SIGN RDEL NAG GSUM" . 4047)
+ ("MYANMAR LETTER KA" . 4096)
+ ("MYANMAR LETTER KHA" . 4097)
+ ("MYANMAR LETTER GA" . 4098)
+ ("MYANMAR LETTER GHA" . 4099)
+ ("MYANMAR LETTER NGA" . 4100)
+ ("MYANMAR LETTER CA" . 4101)
+ ("MYANMAR LETTER CHA" . 4102)
+ ("MYANMAR LETTER JA" . 4103)
+ ("MYANMAR LETTER JHA" . 4104)
+ ("MYANMAR LETTER NYA" . 4105)
+ ("MYANMAR LETTER NNYA" . 4106)
+ ("MYANMAR LETTER TTA" . 4107)
+ ("MYANMAR LETTER TTHA" . 4108)
+ ("MYANMAR LETTER DDA" . 4109)
+ ("MYANMAR LETTER DDHA" . 4110)
+ ("MYANMAR LETTER NNA" . 4111)
+ ("MYANMAR LETTER TA" . 4112)
+ ("MYANMAR LETTER THA" . 4113)
+ ("MYANMAR LETTER DA" . 4114)
+ ("MYANMAR LETTER DHA" . 4115)
+ ("MYANMAR LETTER NA" . 4116)
+ ("MYANMAR LETTER PA" . 4117)
+ ("MYANMAR LETTER PHA" . 4118)
+ ("MYANMAR LETTER BA" . 4119)
+ ("MYANMAR LETTER BHA" . 4120)
+ ("MYANMAR LETTER MA" . 4121)
+ ("MYANMAR LETTER YA" . 4122)
+ ("MYANMAR LETTER RA" . 4123)
+ ("MYANMAR LETTER LA" . 4124)
+ ("MYANMAR LETTER WA" . 4125)
+ ("MYANMAR LETTER SA" . 4126)
+ ("MYANMAR LETTER HA" . 4127)
+ ("MYANMAR LETTER LLA" . 4128)
+ ("MYANMAR LETTER A" . 4129)
+ ("MYANMAR LETTER I" . 4131)
+ ("MYANMAR LETTER II" . 4132)
+ ("MYANMAR LETTER U" . 4133)
+ ("MYANMAR LETTER UU" . 4134)
+ ("MYANMAR LETTER E" . 4135)
+ ("MYANMAR LETTER O" . 4137)
+ ("MYANMAR LETTER AU" . 4138)
+ ("MYANMAR VOWEL SIGN AA" . 4140)
+ ("MYANMAR VOWEL SIGN I" . 4141)
+ ("MYANMAR VOWEL SIGN II" . 4142)
+ ("MYANMAR VOWEL SIGN U" . 4143)
+ ("MYANMAR VOWEL SIGN UU" . 4144)
+ ("MYANMAR VOWEL SIGN E" . 4145)
+ ("MYANMAR VOWEL SIGN AI" . 4146)
+ ("MYANMAR SIGN ANUSVARA" . 4150)
+ ("MYANMAR SIGN DOT BELOW" . 4151)
+ ("MYANMAR SIGN VISARGA" . 4152)
+ ("MYANMAR SIGN VIRAMA" . 4153)
+ ("MYANMAR DIGIT ZERO" . 4160)
+ ("MYANMAR DIGIT ONE" . 4161)
+ ("MYANMAR DIGIT TWO" . 4162)
+ ("MYANMAR DIGIT THREE" . 4163)
+ ("MYANMAR DIGIT FOUR" . 4164)
+ ("MYANMAR DIGIT FIVE" . 4165)
+ ("MYANMAR DIGIT SIX" . 4166)
+ ("MYANMAR DIGIT SEVEN" . 4167)
+ ("MYANMAR DIGIT EIGHT" . 4168)
+ ("MYANMAR DIGIT NINE" . 4169)
+ ("MYANMAR SIGN LITTLE SECTION" . 4170)
+ ("MYANMAR SIGN SECTION" . 4171)
+ ("MYANMAR SYMBOL LOCATIVE" . 4172)
+ ("MYANMAR SYMBOL COMPLETED" . 4173)
+ ("MYANMAR SYMBOL AFOREMENTIONED" . 4174)
+ ("MYANMAR SYMBOL GENITIVE" . 4175)
+ ("MYANMAR LETTER SHA" . 4176)
+ ("MYANMAR LETTER SSA" . 4177)
+ ("MYANMAR LETTER VOCALIC R" . 4178)
+ ("MYANMAR LETTER VOCALIC RR" . 4179)
+ ("MYANMAR LETTER VOCALIC L" . 4180)
+ ("MYANMAR LETTER VOCALIC LL" . 4181)
+ ("MYANMAR VOWEL SIGN VOCALIC R" . 4182)
+ ("MYANMAR VOWEL SIGN VOCALIC RR" . 4183)
+ ("MYANMAR VOWEL SIGN VOCALIC L" . 4184)
+ ("MYANMAR VOWEL SIGN VOCALIC LL" . 4185)
+ ("GEORGIAN CAPITAL LETTER AN" . 4256)
+ ("GEORGIAN CAPITAL LETTER BAN" . 4257)
+ ("GEORGIAN CAPITAL LETTER GAN" . 4258)
+ ("GEORGIAN CAPITAL LETTER DON" . 4259)
+ ("GEORGIAN CAPITAL LETTER EN" . 4260)
+ ("GEORGIAN CAPITAL LETTER VIN" . 4261)
+ ("GEORGIAN CAPITAL LETTER ZEN" . 4262)
+ ("GEORGIAN CAPITAL LETTER TAN" . 4263)
+ ("GEORGIAN CAPITAL LETTER IN" . 4264)
+ ("GEORGIAN CAPITAL LETTER KAN" . 4265)
+ ("GEORGIAN CAPITAL LETTER LAS" . 4266)
+ ("GEORGIAN CAPITAL LETTER MAN" . 4267)
+ ("GEORGIAN CAPITAL LETTER NAR" . 4268)
+ ("GEORGIAN CAPITAL LETTER ON" . 4269)
+ ("GEORGIAN CAPITAL LETTER PAR" . 4270)
+ ("GEORGIAN CAPITAL LETTER ZHAR" . 4271)
+ ("GEORGIAN CAPITAL LETTER RAE" . 4272)
+ ("GEORGIAN CAPITAL LETTER SAN" . 4273)
+ ("GEORGIAN CAPITAL LETTER TAR" . 4274)
+ ("GEORGIAN CAPITAL LETTER UN" . 4275)
+ ("GEORGIAN CAPITAL LETTER PHAR" . 4276)
+ ("GEORGIAN CAPITAL LETTER KHAR" . 4277)
+ ("GEORGIAN CAPITAL LETTER GHAN" . 4278)
+ ("GEORGIAN CAPITAL LETTER QAR" . 4279)
+ ("GEORGIAN CAPITAL LETTER SHIN" . 4280)
+ ("GEORGIAN CAPITAL LETTER CHIN" . 4281)
+ ("GEORGIAN CAPITAL LETTER CAN" . 4282)
+ ("GEORGIAN CAPITAL LETTER JIL" . 4283)
+ ("GEORGIAN CAPITAL LETTER CIL" . 4284)
+ ("GEORGIAN CAPITAL LETTER CHAR" . 4285)
+ ("GEORGIAN CAPITAL LETTER XAN" . 4286)
+ ("GEORGIAN CAPITAL LETTER JHAN" . 4287)
+ ("GEORGIAN CAPITAL LETTER HAE" . 4288)
+ ("GEORGIAN CAPITAL LETTER HE" . 4289)
+ ("GEORGIAN CAPITAL LETTER HIE" . 4290)
+ ("GEORGIAN CAPITAL LETTER WE" . 4291)
+ ("GEORGIAN CAPITAL LETTER HAR" . 4292)
+ ("GEORGIAN CAPITAL LETTER HOE" . 4293)
+ ("GEORGIAN LETTER AN" . 4304)
+ ("GEORGIAN LETTER BAN" . 4305)
+ ("GEORGIAN LETTER GAN" . 4306)
+ ("GEORGIAN LETTER DON" . 4307)
+ ("GEORGIAN LETTER EN" . 4308)
+ ("GEORGIAN LETTER VIN" . 4309)
+ ("GEORGIAN LETTER ZEN" . 4310)
+ ("GEORGIAN LETTER TAN" . 4311)
+ ("GEORGIAN LETTER IN" . 4312)
+ ("GEORGIAN LETTER KAN" . 4313)
+ ("GEORGIAN LETTER LAS" . 4314)
+ ("GEORGIAN LETTER MAN" . 4315)
+ ("GEORGIAN LETTER NAR" . 4316)
+ ("GEORGIAN LETTER ON" . 4317)
+ ("GEORGIAN LETTER PAR" . 4318)
+ ("GEORGIAN LETTER ZHAR" . 4319)
+ ("GEORGIAN LETTER RAE" . 4320)
+ ("GEORGIAN LETTER SAN" . 4321)
+ ("GEORGIAN LETTER TAR" . 4322)
+ ("GEORGIAN LETTER UN" . 4323)
+ ("GEORGIAN LETTER PHAR" . 4324)
+ ("GEORGIAN LETTER KHAR" . 4325)
+ ("GEORGIAN LETTER GHAN" . 4326)
+ ("GEORGIAN LETTER QAR" . 4327)
+ ("GEORGIAN LETTER SHIN" . 4328)
+ ("GEORGIAN LETTER CHIN" . 4329)
+ ("GEORGIAN LETTER CAN" . 4330)
+ ("GEORGIAN LETTER JIL" . 4331)
+ ("GEORGIAN LETTER CIL" . 4332)
+ ("GEORGIAN LETTER CHAR" . 4333)
+ ("GEORGIAN LETTER XAN" . 4334)
+ ("GEORGIAN LETTER JHAN" . 4335)
+ ("GEORGIAN LETTER HAE" . 4336)
+ ("GEORGIAN LETTER HE" . 4337)
+ ("GEORGIAN LETTER HIE" . 4338)
+ ("GEORGIAN LETTER WE" . 4339)
+ ("GEORGIAN LETTER HAR" . 4340)
+ ("GEORGIAN LETTER HOE" . 4341)
+ ("GEORGIAN LETTER FI" . 4342)
+ ("GEORGIAN LETTER YN" . 4343)
+ ("GEORGIAN LETTER ELIFI" . 4344)
+ ("GEORGIAN PARAGRAPH SEPARATOR" . 4347)
+ ("HANGUL CHOSEONG KIYEOK" . 4352)
+ ("HANGUL CHOSEONG SSANGKIYEOK" . 4353)
+ ("HANGUL CHOSEONG NIEUN" . 4354)
+ ("HANGUL CHOSEONG TIKEUT" . 4355)
+ ("HANGUL CHOSEONG SSANGTIKEUT" . 4356)
+ ("HANGUL CHOSEONG RIEUL" . 4357)
+ ("HANGUL CHOSEONG MIEUM" . 4358)
+ ("HANGUL CHOSEONG PIEUP" . 4359)
+ ("HANGUL CHOSEONG SSANGPIEUP" . 4360)
+ ("HANGUL CHOSEONG SIOS" . 4361)
+ ("HANGUL CHOSEONG SSANGSIOS" . 4362)
+ ("HANGUL CHOSEONG IEUNG" . 4363)
+ ("HANGUL CHOSEONG CIEUC" . 4364)
+ ("HANGUL CHOSEONG SSANGCIEUC" . 4365)
+ ("HANGUL CHOSEONG CHIEUCH" . 4366)
+ ("HANGUL CHOSEONG KHIEUKH" . 4367)
+ ("HANGUL CHOSEONG THIEUTH" . 4368)
+ ("HANGUL CHOSEONG PHIEUPH" . 4369)
+ ("HANGUL CHOSEONG HIEUH" . 4370)
+ ("HANGUL CHOSEONG NIEUN-KIYEOK" . 4371)
+ ("HANGUL CHOSEONG SSANGNIEUN" . 4372)
+ ("HANGUL CHOSEONG NIEUN-TIKEUT" . 4373)
+ ("HANGUL CHOSEONG NIEUN-PIEUP" . 4374)
+ ("HANGUL CHOSEONG TIKEUT-KIYEOK" . 4375)
+ ("HANGUL CHOSEONG RIEUL-NIEUN" . 4376)
+ ("HANGUL CHOSEONG SSANGRIEUL" . 4377)
+ ("HANGUL CHOSEONG RIEUL-HIEUH" . 4378)
+ ("HANGUL CHOSEONG KAPYEOUNRIEUL" . 4379)
+ ("HANGUL CHOSEONG MIEUM-PIEUP" . 4380)
+ ("HANGUL CHOSEONG KAPYEOUNMIEUM" . 4381)
+ ("HANGUL CHOSEONG PIEUP-KIYEOK" . 4382)
+ ("HANGUL CHOSEONG PIEUP-NIEUN" . 4383)
+ ("HANGUL CHOSEONG PIEUP-TIKEUT" . 4384)
+ ("HANGUL CHOSEONG PIEUP-SIOS" . 4385)
+ ("HANGUL CHOSEONG PIEUP-SIOS-KIYEOK" . 4386)
+ ("HANGUL CHOSEONG PIEUP-SIOS-TIKEUT" . 4387)
+ ("HANGUL CHOSEONG PIEUP-SIOS-PIEUP" . 4388)
+ ("HANGUL CHOSEONG PIEUP-SSANGSIOS" . 4389)
+ ("HANGUL CHOSEONG PIEUP-SIOS-CIEUC" . 4390)
+ ("HANGUL CHOSEONG PIEUP-CIEUC" . 4391)
+ ("HANGUL CHOSEONG PIEUP-CHIEUCH" . 4392)
+ ("HANGUL CHOSEONG PIEUP-THIEUTH" . 4393)
+ ("HANGUL CHOSEONG PIEUP-PHIEUPH" . 4394)
+ ("HANGUL CHOSEONG KAPYEOUNPIEUP" . 4395)
+ ("HANGUL CHOSEONG KAPYEOUNSSANGPIEUP" . 4396)
+ ("HANGUL CHOSEONG SIOS-KIYEOK" . 4397)
+ ("HANGUL CHOSEONG SIOS-NIEUN" . 4398)
+ ("HANGUL CHOSEONG SIOS-TIKEUT" . 4399)
+ ("HANGUL CHOSEONG SIOS-RIEUL" . 4400)
+ ("HANGUL CHOSEONG SIOS-MIEUM" . 4401)
+ ("HANGUL CHOSEONG SIOS-PIEUP" . 4402)
+ ("HANGUL CHOSEONG SIOS-PIEUP-KIYEOK" . 4403)
+ ("HANGUL CHOSEONG SIOS-SSANGSIOS" . 4404)
+ ("HANGUL CHOSEONG SIOS-IEUNG" . 4405)
+ ("HANGUL CHOSEONG SIOS-CIEUC" . 4406)
+ ("HANGUL CHOSEONG SIOS-CHIEUCH" . 4407)
+ ("HANGUL CHOSEONG SIOS-KHIEUKH" . 4408)
+ ("HANGUL CHOSEONG SIOS-THIEUTH" . 4409)
+ ("HANGUL CHOSEONG SIOS-PHIEUPH" . 4410)
+ ("HANGUL CHOSEONG SIOS-HIEUH" . 4411)
+ ("HANGUL CHOSEONG CHITUEUMSIOS" . 4412)
+ ("HANGUL CHOSEONG CHITUEUMSSANGSIOS" . 4413)
+ ("HANGUL CHOSEONG CEONGCHIEUMSIOS" . 4414)
+ ("HANGUL CHOSEONG CEONGCHIEUMSSANGSIOS" . 4415)
+ ("HANGUL CHOSEONG PANSIOS" . 4416)
+ ("HANGUL CHOSEONG IEUNG-KIYEOK" . 4417)
+ ("HANGUL CHOSEONG IEUNG-TIKEUT" . 4418)
+ ("HANGUL CHOSEONG IEUNG-MIEUM" . 4419)
+ ("HANGUL CHOSEONG IEUNG-PIEUP" . 4420)
+ ("HANGUL CHOSEONG IEUNG-SIOS" . 4421)
+ ("HANGUL CHOSEONG IEUNG-PANSIOS" . 4422)
+ ("HANGUL CHOSEONG SSANGIEUNG" . 4423)
+ ("HANGUL CHOSEONG IEUNG-CIEUC" . 4424)
+ ("HANGUL CHOSEONG IEUNG-CHIEUCH" . 4425)
+ ("HANGUL CHOSEONG IEUNG-THIEUTH" . 4426)
+ ("HANGUL CHOSEONG IEUNG-PHIEUPH" . 4427)
+ ("HANGUL CHOSEONG YESIEUNG" . 4428)
+ ("HANGUL CHOSEONG CIEUC-IEUNG" . 4429)
+ ("HANGUL CHOSEONG CHITUEUMCIEUC" . 4430)
+ ("HANGUL CHOSEONG CHITUEUMSSANGCIEUC" . 4431)
+ ("HANGUL CHOSEONG CEONGCHIEUMCIEUC" . 4432)
+ ("HANGUL CHOSEONG CEONGCHIEUMSSANGCIEUC" . 4433)
+ ("HANGUL CHOSEONG CHIEUCH-KHIEUKH" . 4434)
+ ("HANGUL CHOSEONG CHIEUCH-HIEUH" . 4435)
+ ("HANGUL CHOSEONG CHITUEUMCHIEUCH" . 4436)
+ ("HANGUL CHOSEONG CEONGCHIEUMCHIEUCH" . 4437)
+ ("HANGUL CHOSEONG PHIEUPH-PIEUP" . 4438)
+ ("HANGUL CHOSEONG KAPYEOUNPHIEUPH" . 4439)
+ ("HANGUL CHOSEONG SSANGHIEUH" . 4440)
+ ("HANGUL CHOSEONG YEORINHIEUH" . 4441)
+ ("HANGUL CHOSEONG FILLER" . 4447)
+ ("HANGUL JUNGSEONG FILLER" . 4448)
+ ("HANGUL JUNGSEONG A" . 4449)
+ ("HANGUL JUNGSEONG AE" . 4450)
+ ("HANGUL JUNGSEONG YA" . 4451)
+ ("HANGUL JUNGSEONG YAE" . 4452)
+ ("HANGUL JUNGSEONG EO" . 4453)
+ ("HANGUL JUNGSEONG E" . 4454)
+ ("HANGUL JUNGSEONG YEO" . 4455)
+ ("HANGUL JUNGSEONG YE" . 4456)
+ ("HANGUL JUNGSEONG O" . 4457)
+ ("HANGUL JUNGSEONG WA" . 4458)
+ ("HANGUL JUNGSEONG WAE" . 4459)
+ ("HANGUL JUNGSEONG OE" . 4460)
+ ("HANGUL JUNGSEONG YO" . 4461)
+ ("HANGUL JUNGSEONG U" . 4462)
+ ("HANGUL JUNGSEONG WEO" . 4463)
+ ("HANGUL JUNGSEONG WE" . 4464)
+ ("HANGUL JUNGSEONG WI" . 4465)
+ ("HANGUL JUNGSEONG YU" . 4466)
+ ("HANGUL JUNGSEONG EU" . 4467)
+ ("HANGUL JUNGSEONG YI" . 4468)
+ ("HANGUL JUNGSEONG I" . 4469)
+ ("HANGUL JUNGSEONG A-O" . 4470)
+ ("HANGUL JUNGSEONG A-U" . 4471)
+ ("HANGUL JUNGSEONG YA-O" . 4472)
+ ("HANGUL JUNGSEONG YA-YO" . 4473)
+ ("HANGUL JUNGSEONG EO-O" . 4474)
+ ("HANGUL JUNGSEONG EO-U" . 4475)
+ ("HANGUL JUNGSEONG EO-EU" . 4476)
+ ("HANGUL JUNGSEONG YEO-O" . 4477)
+ ("HANGUL JUNGSEONG YEO-U" . 4478)
+ ("HANGUL JUNGSEONG O-EO" . 4479)
+ ("HANGUL JUNGSEONG O-E" . 4480)
+ ("HANGUL JUNGSEONG O-YE" . 4481)
+ ("HANGUL JUNGSEONG O-O" . 4482)
+ ("HANGUL JUNGSEONG O-U" . 4483)
+ ("HANGUL JUNGSEONG YO-YA" . 4484)
+ ("HANGUL JUNGSEONG YO-YAE" . 4485)
+ ("HANGUL JUNGSEONG YO-YEO" . 4486)
+ ("HANGUL JUNGSEONG YO-O" . 4487)
+ ("HANGUL JUNGSEONG YO-I" . 4488)
+ ("HANGUL JUNGSEONG U-A" . 4489)
+ ("HANGUL JUNGSEONG U-AE" . 4490)
+ ("HANGUL JUNGSEONG U-EO-EU" . 4491)
+ ("HANGUL JUNGSEONG U-YE" . 4492)
+ ("HANGUL JUNGSEONG U-U" . 4493)
+ ("HANGUL JUNGSEONG YU-A" . 4494)
+ ("HANGUL JUNGSEONG YU-EO" . 4495)
+ ("HANGUL JUNGSEONG YU-E" . 4496)
+ ("HANGUL JUNGSEONG YU-YEO" . 4497)
+ ("HANGUL JUNGSEONG YU-YE" . 4498)
+ ("HANGUL JUNGSEONG YU-U" . 4499)
+ ("HANGUL JUNGSEONG YU-I" . 4500)
+ ("HANGUL JUNGSEONG EU-U" . 4501)
+ ("HANGUL JUNGSEONG EU-EU" . 4502)
+ ("HANGUL JUNGSEONG YI-U" . 4503)
+ ("HANGUL JUNGSEONG I-A" . 4504)
+ ("HANGUL JUNGSEONG I-YA" . 4505)
+ ("HANGUL JUNGSEONG I-O" . 4506)
+ ("HANGUL JUNGSEONG I-U" . 4507)
+ ("HANGUL JUNGSEONG I-EU" . 4508)
+ ("HANGUL JUNGSEONG I-ARAEA" . 4509)
+ ("HANGUL JUNGSEONG ARAEA" . 4510)
+ ("HANGUL JUNGSEONG ARAEA-EO" . 4511)
+ ("HANGUL JUNGSEONG ARAEA-U" . 4512)
+ ("HANGUL JUNGSEONG ARAEA-I" . 4513)
+ ("HANGUL JUNGSEONG SSANGARAEA" . 4514)
+ ("HANGUL JONGSEONG KIYEOK" . 4520)
+ ("HANGUL JONGSEONG SSANGKIYEOK" . 4521)
+ ("HANGUL JONGSEONG KIYEOK-SIOS" . 4522)
+ ("HANGUL JONGSEONG NIEUN" . 4523)
+ ("HANGUL JONGSEONG NIEUN-CIEUC" . 4524)
+ ("HANGUL JONGSEONG NIEUN-HIEUH" . 4525)
+ ("HANGUL JONGSEONG TIKEUT" . 4526)
+ ("HANGUL JONGSEONG RIEUL" . 4527)
+ ("HANGUL JONGSEONG RIEUL-KIYEOK" . 4528)
+ ("HANGUL JONGSEONG RIEUL-MIEUM" . 4529)
+ ("HANGUL JONGSEONG RIEUL-PIEUP" . 4530)
+ ("HANGUL JONGSEONG RIEUL-SIOS" . 4531)
+ ("HANGUL JONGSEONG RIEUL-THIEUTH" . 4532)
+ ("HANGUL JONGSEONG RIEUL-PHIEUPH" . 4533)
+ ("HANGUL JONGSEONG RIEUL-HIEUH" . 4534)
+ ("HANGUL JONGSEONG MIEUM" . 4535)
+ ("HANGUL JONGSEONG PIEUP" . 4536)
+ ("HANGUL JONGSEONG PIEUP-SIOS" . 4537)
+ ("HANGUL JONGSEONG SIOS" . 4538)
+ ("HANGUL JONGSEONG SSANGSIOS" . 4539)
+ ("HANGUL JONGSEONG IEUNG" . 4540)
+ ("HANGUL JONGSEONG CIEUC" . 4541)
+ ("HANGUL JONGSEONG CHIEUCH" . 4542)
+ ("HANGUL JONGSEONG KHIEUKH" . 4543)
+ ("HANGUL JONGSEONG THIEUTH" . 4544)
+ ("HANGUL JONGSEONG PHIEUPH" . 4545)
+ ("HANGUL JONGSEONG HIEUH" . 4546)
+ ("HANGUL JONGSEONG KIYEOK-RIEUL" . 4547)
+ ("HANGUL JONGSEONG KIYEOK-SIOS-KIYEOK" . 4548)
+ ("HANGUL JONGSEONG NIEUN-KIYEOK" . 4549)
+ ("HANGUL JONGSEONG NIEUN-TIKEUT" . 4550)
+ ("HANGUL JONGSEONG NIEUN-SIOS" . 4551)
+ ("HANGUL JONGSEONG NIEUN-PANSIOS" . 4552)
+ ("HANGUL JONGSEONG NIEUN-THIEUTH" . 4553)
+ ("HANGUL JONGSEONG TIKEUT-KIYEOK" . 4554)
+ ("HANGUL JONGSEONG TIKEUT-RIEUL" . 4555)
+ ("HANGUL JONGSEONG RIEUL-KIYEOK-SIOS" . 4556)
+ ("HANGUL JONGSEONG RIEUL-NIEUN" . 4557)
+ ("HANGUL JONGSEONG RIEUL-TIKEUT" . 4558)
+ ("HANGUL JONGSEONG RIEUL-TIKEUT-HIEUH" . 4559)
+ ("HANGUL JONGSEONG SSANGRIEUL" . 4560)
+ ("HANGUL JONGSEONG RIEUL-MIEUM-KIYEOK" . 4561)
+ ("HANGUL JONGSEONG RIEUL-MIEUM-SIOS" . 4562)
+ ("HANGUL JONGSEONG RIEUL-PIEUP-SIOS" . 4563)
+ ("HANGUL JONGSEONG RIEUL-PIEUP-HIEUH" . 4564)
+ ("HANGUL JONGSEONG RIEUL-KAPYEOUNPIEUP" . 4565)
+ ("HANGUL JONGSEONG RIEUL-SSANGSIOS" . 4566)
+ ("HANGUL JONGSEONG RIEUL-PANSIOS" . 4567)
+ ("HANGUL JONGSEONG RIEUL-KHIEUKH" . 4568)
+ ("HANGUL JONGSEONG RIEUL-YEORINHIEUH" . 4569)
+ ("HANGUL JONGSEONG MIEUM-KIYEOK" . 4570)
+ ("HANGUL JONGSEONG MIEUM-RIEUL" . 4571)
+ ("HANGUL JONGSEONG MIEUM-PIEUP" . 4572)
+ ("HANGUL JONGSEONG MIEUM-SIOS" . 4573)
+ ("HANGUL JONGSEONG MIEUM-SSANGSIOS" . 4574)
+ ("HANGUL JONGSEONG MIEUM-PANSIOS" . 4575)
+ ("HANGUL JONGSEONG MIEUM-CHIEUCH" . 4576)
+ ("HANGUL JONGSEONG MIEUM-HIEUH" . 4577)
+ ("HANGUL JONGSEONG KAPYEOUNMIEUM" . 4578)
+ ("HANGUL JONGSEONG PIEUP-RIEUL" . 4579)
+ ("HANGUL JONGSEONG PIEUP-PHIEUPH" . 4580)
+ ("HANGUL JONGSEONG PIEUP-HIEUH" . 4581)
+ ("HANGUL JONGSEONG KAPYEOUNPIEUP" . 4582)
+ ("HANGUL JONGSEONG SIOS-KIYEOK" . 4583)
+ ("HANGUL JONGSEONG SIOS-TIKEUT" . 4584)
+ ("HANGUL JONGSEONG SIOS-RIEUL" . 4585)
+ ("HANGUL JONGSEONG SIOS-PIEUP" . 4586)
+ ("HANGUL JONGSEONG PANSIOS" . 4587)
+ ("HANGUL JONGSEONG IEUNG-KIYEOK" . 4588)
+ ("HANGUL JONGSEONG IEUNG-SSANGKIYEOK" . 4589)
+ ("HANGUL JONGSEONG SSANGIEUNG" . 4590)
+ ("HANGUL JONGSEONG IEUNG-KHIEUKH" . 4591)
+ ("HANGUL JONGSEONG YESIEUNG" . 4592)
+ ("HANGUL JONGSEONG YESIEUNG-SIOS" . 4593)
+ ("HANGUL JONGSEONG YESIEUNG-PANSIOS" . 4594)
+ ("HANGUL JONGSEONG PHIEUPH-PIEUP" . 4595)
+ ("HANGUL JONGSEONG KAPYEOUNPHIEUPH" . 4596)
+ ("HANGUL JONGSEONG HIEUH-NIEUN" . 4597)
+ ("HANGUL JONGSEONG HIEUH-RIEUL" . 4598)
+ ("HANGUL JONGSEONG HIEUH-MIEUM" . 4599)
+ ("HANGUL JONGSEONG HIEUH-PIEUP" . 4600)
+ ("HANGUL JONGSEONG YEORINHIEUH" . 4601)
+ ("ETHIOPIC SYLLABLE HA" . 4608)
+ ("ETHIOPIC SYLLABLE HU" . 4609)
+ ("ETHIOPIC SYLLABLE HI" . 4610)
+ ("ETHIOPIC SYLLABLE HAA" . 4611)
+ ("ETHIOPIC SYLLABLE HEE" . 4612)
+ ("ETHIOPIC SYLLABLE HE" . 4613)
+ ("ETHIOPIC SYLLABLE HO" . 4614)
+ ("ETHIOPIC SYLLABLE LA" . 4616)
+ ("ETHIOPIC SYLLABLE LU" . 4617)
+ ("ETHIOPIC SYLLABLE LI" . 4618)
+ ("ETHIOPIC SYLLABLE LAA" . 4619)
+ ("ETHIOPIC SYLLABLE LEE" . 4620)
+ ("ETHIOPIC SYLLABLE LE" . 4621)
+ ("ETHIOPIC SYLLABLE LO" . 4622)
+ ("ETHIOPIC SYLLABLE LWA" . 4623)
+ ("ETHIOPIC SYLLABLE HHA" . 4624)
+ ("ETHIOPIC SYLLABLE HHU" . 4625)
+ ("ETHIOPIC SYLLABLE HHI" . 4626)
+ ("ETHIOPIC SYLLABLE HHAA" . 4627)
+ ("ETHIOPIC SYLLABLE HHEE" . 4628)
+ ("ETHIOPIC SYLLABLE HHE" . 4629)
+ ("ETHIOPIC SYLLABLE HHO" . 4630)
+ ("ETHIOPIC SYLLABLE HHWA" . 4631)
+ ("ETHIOPIC SYLLABLE MA" . 4632)
+ ("ETHIOPIC SYLLABLE MU" . 4633)
+ ("ETHIOPIC SYLLABLE MI" . 4634)
+ ("ETHIOPIC SYLLABLE MAA" . 4635)
+ ("ETHIOPIC SYLLABLE MEE" . 4636)
+ ("ETHIOPIC SYLLABLE ME" . 4637)
+ ("ETHIOPIC SYLLABLE MO" . 4638)
+ ("ETHIOPIC SYLLABLE MWA" . 4639)
+ ("ETHIOPIC SYLLABLE SZA" . 4640)
+ ("ETHIOPIC SYLLABLE SZU" . 4641)
+ ("ETHIOPIC SYLLABLE SZI" . 4642)
+ ("ETHIOPIC SYLLABLE SZAA" . 4643)
+ ("ETHIOPIC SYLLABLE SZEE" . 4644)
+ ("ETHIOPIC SYLLABLE SZE" . 4645)
+ ("ETHIOPIC SYLLABLE SZO" . 4646)
+ ("ETHIOPIC SYLLABLE SZWA" . 4647)
+ ("ETHIOPIC SYLLABLE RA" . 4648)
+ ("ETHIOPIC SYLLABLE RU" . 4649)
+ ("ETHIOPIC SYLLABLE RI" . 4650)
+ ("ETHIOPIC SYLLABLE RAA" . 4651)
+ ("ETHIOPIC SYLLABLE REE" . 4652)
+ ("ETHIOPIC SYLLABLE RE" . 4653)
+ ("ETHIOPIC SYLLABLE RO" . 4654)
+ ("ETHIOPIC SYLLABLE RWA" . 4655)
+ ("ETHIOPIC SYLLABLE SA" . 4656)
+ ("ETHIOPIC SYLLABLE SU" . 4657)
+ ("ETHIOPIC SYLLABLE SI" . 4658)
+ ("ETHIOPIC SYLLABLE SAA" . 4659)
+ ("ETHIOPIC SYLLABLE SEE" . 4660)
+ ("ETHIOPIC SYLLABLE SE" . 4661)
+ ("ETHIOPIC SYLLABLE SO" . 4662)
+ ("ETHIOPIC SYLLABLE SWA" . 4663)
+ ("ETHIOPIC SYLLABLE SHA" . 4664)
+ ("ETHIOPIC SYLLABLE SHU" . 4665)
+ ("ETHIOPIC SYLLABLE SHI" . 4666)
+ ("ETHIOPIC SYLLABLE SHAA" . 4667)
+ ("ETHIOPIC SYLLABLE SHEE" . 4668)
+ ("ETHIOPIC SYLLABLE SHE" . 4669)
+ ("ETHIOPIC SYLLABLE SHO" . 4670)
+ ("ETHIOPIC SYLLABLE SHWA" . 4671)
+ ("ETHIOPIC SYLLABLE QA" . 4672)
+ ("ETHIOPIC SYLLABLE QU" . 4673)
+ ("ETHIOPIC SYLLABLE QI" . 4674)
+ ("ETHIOPIC SYLLABLE QAA" . 4675)
+ ("ETHIOPIC SYLLABLE QEE" . 4676)
+ ("ETHIOPIC SYLLABLE QE" . 4677)
+ ("ETHIOPIC SYLLABLE QO" . 4678)
+ ("ETHIOPIC SYLLABLE QWA" . 4680)
+ ("ETHIOPIC SYLLABLE QWI" . 4682)
+ ("ETHIOPIC SYLLABLE QWAA" . 4683)
+ ("ETHIOPIC SYLLABLE QWEE" . 4684)
+ ("ETHIOPIC SYLLABLE QWE" . 4685)
+ ("ETHIOPIC SYLLABLE QHA" . 4688)
+ ("ETHIOPIC SYLLABLE QHU" . 4689)
+ ("ETHIOPIC SYLLABLE QHI" . 4690)
+ ("ETHIOPIC SYLLABLE QHAA" . 4691)
+ ("ETHIOPIC SYLLABLE QHEE" . 4692)
+ ("ETHIOPIC SYLLABLE QHE" . 4693)
+ ("ETHIOPIC SYLLABLE QHO" . 4694)
+ ("ETHIOPIC SYLLABLE QHWA" . 4696)
+ ("ETHIOPIC SYLLABLE QHWI" . 4698)
+ ("ETHIOPIC SYLLABLE QHWAA" . 4699)
+ ("ETHIOPIC SYLLABLE QHWEE" . 4700)
+ ("ETHIOPIC SYLLABLE QHWE" . 4701)
+ ("ETHIOPIC SYLLABLE BA" . 4704)
+ ("ETHIOPIC SYLLABLE BU" . 4705)
+ ("ETHIOPIC SYLLABLE BI" . 4706)
+ ("ETHIOPIC SYLLABLE BAA" . 4707)
+ ("ETHIOPIC SYLLABLE BEE" . 4708)
+ ("ETHIOPIC SYLLABLE BE" . 4709)
+ ("ETHIOPIC SYLLABLE BO" . 4710)
+ ("ETHIOPIC SYLLABLE BWA" . 4711)
+ ("ETHIOPIC SYLLABLE VA" . 4712)
+ ("ETHIOPIC SYLLABLE VU" . 4713)
+ ("ETHIOPIC SYLLABLE VI" . 4714)
+ ("ETHIOPIC SYLLABLE VAA" . 4715)
+ ("ETHIOPIC SYLLABLE VEE" . 4716)
+ ("ETHIOPIC SYLLABLE VE" . 4717)
+ ("ETHIOPIC SYLLABLE VO" . 4718)
+ ("ETHIOPIC SYLLABLE VWA" . 4719)
+ ("ETHIOPIC SYLLABLE TA" . 4720)
+ ("ETHIOPIC SYLLABLE TU" . 4721)
+ ("ETHIOPIC SYLLABLE TI" . 4722)
+ ("ETHIOPIC SYLLABLE TAA" . 4723)
+ ("ETHIOPIC SYLLABLE TEE" . 4724)
+ ("ETHIOPIC SYLLABLE TE" . 4725)
+ ("ETHIOPIC SYLLABLE TO" . 4726)
+ ("ETHIOPIC SYLLABLE TWA" . 4727)
+ ("ETHIOPIC SYLLABLE CA" . 4728)
+ ("ETHIOPIC SYLLABLE CU" . 4729)
+ ("ETHIOPIC SYLLABLE CI" . 4730)
+ ("ETHIOPIC SYLLABLE CAA" . 4731)
+ ("ETHIOPIC SYLLABLE CEE" . 4732)
+ ("ETHIOPIC SYLLABLE CE" . 4733)
+ ("ETHIOPIC SYLLABLE CO" . 4734)
+ ("ETHIOPIC SYLLABLE CWA" . 4735)
+ ("ETHIOPIC SYLLABLE XA" . 4736)
+ ("ETHIOPIC SYLLABLE XU" . 4737)
+ ("ETHIOPIC SYLLABLE XI" . 4738)
+ ("ETHIOPIC SYLLABLE XAA" . 4739)
+ ("ETHIOPIC SYLLABLE XEE" . 4740)
+ ("ETHIOPIC SYLLABLE XE" . 4741)
+ ("ETHIOPIC SYLLABLE XO" . 4742)
+ ("ETHIOPIC SYLLABLE XWA" . 4744)
+ ("ETHIOPIC SYLLABLE XWI" . 4746)
+ ("ETHIOPIC SYLLABLE XWAA" . 4747)
+ ("ETHIOPIC SYLLABLE XWEE" . 4748)
+ ("ETHIOPIC SYLLABLE XWE" . 4749)
+ ("ETHIOPIC SYLLABLE NA" . 4752)
+ ("ETHIOPIC SYLLABLE NU" . 4753)
+ ("ETHIOPIC SYLLABLE NI" . 4754)
+ ("ETHIOPIC SYLLABLE NAA" . 4755)
+ ("ETHIOPIC SYLLABLE NEE" . 4756)
+ ("ETHIOPIC SYLLABLE NE" . 4757)
+ ("ETHIOPIC SYLLABLE NO" . 4758)
+ ("ETHIOPIC SYLLABLE NWA" . 4759)
+ ("ETHIOPIC SYLLABLE NYA" . 4760)
+ ("ETHIOPIC SYLLABLE NYU" . 4761)
+ ("ETHIOPIC SYLLABLE NYI" . 4762)
+ ("ETHIOPIC SYLLABLE NYAA" . 4763)
+ ("ETHIOPIC SYLLABLE NYEE" . 4764)
+ ("ETHIOPIC SYLLABLE NYE" . 4765)
+ ("ETHIOPIC SYLLABLE NYO" . 4766)
+ ("ETHIOPIC SYLLABLE NYWA" . 4767)
+ ("ETHIOPIC SYLLABLE GLOTTAL A" . 4768)
+ ("ETHIOPIC SYLLABLE GLOTTAL U" . 4769)
+ ("ETHIOPIC SYLLABLE GLOTTAL I" . 4770)
+ ("ETHIOPIC SYLLABLE GLOTTAL AA" . 4771)
+ ("ETHIOPIC SYLLABLE GLOTTAL EE" . 4772)
+ ("ETHIOPIC SYLLABLE GLOTTAL E" . 4773)
+ ("ETHIOPIC SYLLABLE GLOTTAL O" . 4774)
+ ("ETHIOPIC SYLLABLE GLOTTAL WA" . 4775)
+ ("ETHIOPIC SYLLABLE KA" . 4776)
+ ("ETHIOPIC SYLLABLE KU" . 4777)
+ ("ETHIOPIC SYLLABLE KI" . 4778)
+ ("ETHIOPIC SYLLABLE KAA" . 4779)
+ ("ETHIOPIC SYLLABLE KEE" . 4780)
+ ("ETHIOPIC SYLLABLE KE" . 4781)
+ ("ETHIOPIC SYLLABLE KO" . 4782)
+ ("ETHIOPIC SYLLABLE KWA" . 4784)
+ ("ETHIOPIC SYLLABLE KWI" . 4786)
+ ("ETHIOPIC SYLLABLE KWAA" . 4787)
+ ("ETHIOPIC SYLLABLE KWEE" . 4788)
+ ("ETHIOPIC SYLLABLE KWE" . 4789)
+ ("ETHIOPIC SYLLABLE KXA" . 4792)
+ ("ETHIOPIC SYLLABLE KXU" . 4793)
+ ("ETHIOPIC SYLLABLE KXI" . 4794)
+ ("ETHIOPIC SYLLABLE KXAA" . 4795)
+ ("ETHIOPIC SYLLABLE KXEE" . 4796)
+ ("ETHIOPIC SYLLABLE KXE" . 4797)
+ ("ETHIOPIC SYLLABLE KXO" . 4798)
+ ("ETHIOPIC SYLLABLE KXWA" . 4800)
+ ("ETHIOPIC SYLLABLE KXWI" . 4802)
+ ("ETHIOPIC SYLLABLE KXWAA" . 4803)
+ ("ETHIOPIC SYLLABLE KXWEE" . 4804)
+ ("ETHIOPIC SYLLABLE KXWE" . 4805)
+ ("ETHIOPIC SYLLABLE WA" . 4808)
+ ("ETHIOPIC SYLLABLE WU" . 4809)
+ ("ETHIOPIC SYLLABLE WI" . 4810)
+ ("ETHIOPIC SYLLABLE WAA" . 4811)
+ ("ETHIOPIC SYLLABLE WEE" . 4812)
+ ("ETHIOPIC SYLLABLE WE" . 4813)
+ ("ETHIOPIC SYLLABLE WO" . 4814)
+ ("ETHIOPIC SYLLABLE PHARYNGEAL A" . 4816)
+ ("ETHIOPIC SYLLABLE PHARYNGEAL U" . 4817)
+ ("ETHIOPIC SYLLABLE PHARYNGEAL I" . 4818)
+ ("ETHIOPIC SYLLABLE PHARYNGEAL AA" . 4819)
+ ("ETHIOPIC SYLLABLE PHARYNGEAL EE" . 4820)
+ ("ETHIOPIC SYLLABLE PHARYNGEAL E" . 4821)
+ ("ETHIOPIC SYLLABLE PHARYNGEAL O" . 4822)
+ ("ETHIOPIC SYLLABLE ZA" . 4824)
+ ("ETHIOPIC SYLLABLE ZU" . 4825)
+ ("ETHIOPIC SYLLABLE ZI" . 4826)
+ ("ETHIOPIC SYLLABLE ZAA" . 4827)
+ ("ETHIOPIC SYLLABLE ZEE" . 4828)
+ ("ETHIOPIC SYLLABLE ZE" . 4829)
+ ("ETHIOPIC SYLLABLE ZO" . 4830)
+ ("ETHIOPIC SYLLABLE ZWA" . 4831)
+ ("ETHIOPIC SYLLABLE ZHA" . 4832)
+ ("ETHIOPIC SYLLABLE ZHU" . 4833)
+ ("ETHIOPIC SYLLABLE ZHI" . 4834)
+ ("ETHIOPIC SYLLABLE ZHAA" . 4835)
+ ("ETHIOPIC SYLLABLE ZHEE" . 4836)
+ ("ETHIOPIC SYLLABLE ZHE" . 4837)
+ ("ETHIOPIC SYLLABLE ZHO" . 4838)
+ ("ETHIOPIC SYLLABLE ZHWA" . 4839)
+ ("ETHIOPIC SYLLABLE YA" . 4840)
+ ("ETHIOPIC SYLLABLE YU" . 4841)
+ ("ETHIOPIC SYLLABLE YI" . 4842)
+ ("ETHIOPIC SYLLABLE YAA" . 4843)
+ ("ETHIOPIC SYLLABLE YEE" . 4844)
+ ("ETHIOPIC SYLLABLE YE" . 4845)
+ ("ETHIOPIC SYLLABLE YO" . 4846)
+ ("ETHIOPIC SYLLABLE DA" . 4848)
+ ("ETHIOPIC SYLLABLE DU" . 4849)
+ ("ETHIOPIC SYLLABLE DI" . 4850)
+ ("ETHIOPIC SYLLABLE DAA" . 4851)
+ ("ETHIOPIC SYLLABLE DEE" . 4852)
+ ("ETHIOPIC SYLLABLE DE" . 4853)
+ ("ETHIOPIC SYLLABLE DO" . 4854)
+ ("ETHIOPIC SYLLABLE DWA" . 4855)
+ ("ETHIOPIC SYLLABLE DDA" . 4856)
+ ("ETHIOPIC SYLLABLE DDU" . 4857)
+ ("ETHIOPIC SYLLABLE DDI" . 4858)
+ ("ETHIOPIC SYLLABLE DDAA" . 4859)
+ ("ETHIOPIC SYLLABLE DDEE" . 4860)
+ ("ETHIOPIC SYLLABLE DDE" . 4861)
+ ("ETHIOPIC SYLLABLE DDO" . 4862)
+ ("ETHIOPIC SYLLABLE DDWA" . 4863)
+ ("ETHIOPIC SYLLABLE JA" . 4864)
+ ("ETHIOPIC SYLLABLE JU" . 4865)
+ ("ETHIOPIC SYLLABLE JI" . 4866)
+ ("ETHIOPIC SYLLABLE JAA" . 4867)
+ ("ETHIOPIC SYLLABLE JEE" . 4868)
+ ("ETHIOPIC SYLLABLE JE" . 4869)
+ ("ETHIOPIC SYLLABLE JO" . 4870)
+ ("ETHIOPIC SYLLABLE JWA" . 4871)
+ ("ETHIOPIC SYLLABLE GA" . 4872)
+ ("ETHIOPIC SYLLABLE GU" . 4873)
+ ("ETHIOPIC SYLLABLE GI" . 4874)
+ ("ETHIOPIC SYLLABLE GAA" . 4875)
+ ("ETHIOPIC SYLLABLE GEE" . 4876)
+ ("ETHIOPIC SYLLABLE GE" . 4877)
+ ("ETHIOPIC SYLLABLE GO" . 4878)
+ ("ETHIOPIC SYLLABLE GWA" . 4880)
+ ("ETHIOPIC SYLLABLE GWI" . 4882)
+ ("ETHIOPIC SYLLABLE GWAA" . 4883)
+ ("ETHIOPIC SYLLABLE GWEE" . 4884)
+ ("ETHIOPIC SYLLABLE GWE" . 4885)
+ ("ETHIOPIC SYLLABLE GGA" . 4888)
+ ("ETHIOPIC SYLLABLE GGU" . 4889)
+ ("ETHIOPIC SYLLABLE GGI" . 4890)
+ ("ETHIOPIC SYLLABLE GGAA" . 4891)
+ ("ETHIOPIC SYLLABLE GGEE" . 4892)
+ ("ETHIOPIC SYLLABLE GGE" . 4893)
+ ("ETHIOPIC SYLLABLE GGO" . 4894)
+ ("ETHIOPIC SYLLABLE THA" . 4896)
+ ("ETHIOPIC SYLLABLE THU" . 4897)
+ ("ETHIOPIC SYLLABLE THI" . 4898)
+ ("ETHIOPIC SYLLABLE THAA" . 4899)
+ ("ETHIOPIC SYLLABLE THEE" . 4900)
+ ("ETHIOPIC SYLLABLE THE" . 4901)
+ ("ETHIOPIC SYLLABLE THO" . 4902)
+ ("ETHIOPIC SYLLABLE THWA" . 4903)
+ ("ETHIOPIC SYLLABLE CHA" . 4904)
+ ("ETHIOPIC SYLLABLE CHU" . 4905)
+ ("ETHIOPIC SYLLABLE CHI" . 4906)
+ ("ETHIOPIC SYLLABLE CHAA" . 4907)
+ ("ETHIOPIC SYLLABLE CHEE" . 4908)
+ ("ETHIOPIC SYLLABLE CHE" . 4909)
+ ("ETHIOPIC SYLLABLE CHO" . 4910)
+ ("ETHIOPIC SYLLABLE CHWA" . 4911)
+ ("ETHIOPIC SYLLABLE PHA" . 4912)
+ ("ETHIOPIC SYLLABLE PHU" . 4913)
+ ("ETHIOPIC SYLLABLE PHI" . 4914)
+ ("ETHIOPIC SYLLABLE PHAA" . 4915)
+ ("ETHIOPIC SYLLABLE PHEE" . 4916)
+ ("ETHIOPIC SYLLABLE PHE" . 4917)
+ ("ETHIOPIC SYLLABLE PHO" . 4918)
+ ("ETHIOPIC SYLLABLE PHWA" . 4919)
+ ("ETHIOPIC SYLLABLE TSA" . 4920)
+ ("ETHIOPIC SYLLABLE TSU" . 4921)
+ ("ETHIOPIC SYLLABLE TSI" . 4922)
+ ("ETHIOPIC SYLLABLE TSAA" . 4923)
+ ("ETHIOPIC SYLLABLE TSEE" . 4924)
+ ("ETHIOPIC SYLLABLE TSE" . 4925)
+ ("ETHIOPIC SYLLABLE TSO" . 4926)
+ ("ETHIOPIC SYLLABLE TSWA" . 4927)
+ ("ETHIOPIC SYLLABLE TZA" . 4928)
+ ("ETHIOPIC SYLLABLE TZU" . 4929)
+ ("ETHIOPIC SYLLABLE TZI" . 4930)
+ ("ETHIOPIC SYLLABLE TZAA" . 4931)
+ ("ETHIOPIC SYLLABLE TZEE" . 4932)
+ ("ETHIOPIC SYLLABLE TZE" . 4933)
+ ("ETHIOPIC SYLLABLE TZO" . 4934)
+ ("ETHIOPIC SYLLABLE FA" . 4936)
+ ("ETHIOPIC SYLLABLE FU" . 4937)
+ ("ETHIOPIC SYLLABLE FI" . 4938)
+ ("ETHIOPIC SYLLABLE FAA" . 4939)
+ ("ETHIOPIC SYLLABLE FEE" . 4940)
+ ("ETHIOPIC SYLLABLE FE" . 4941)
+ ("ETHIOPIC SYLLABLE FO" . 4942)
+ ("ETHIOPIC SYLLABLE FWA" . 4943)
+ ("ETHIOPIC SYLLABLE PA" . 4944)
+ ("ETHIOPIC SYLLABLE PU" . 4945)
+ ("ETHIOPIC SYLLABLE PI" . 4946)
+ ("ETHIOPIC SYLLABLE PAA" . 4947)
+ ("ETHIOPIC SYLLABLE PEE" . 4948)
+ ("ETHIOPIC SYLLABLE PE" . 4949)
+ ("ETHIOPIC SYLLABLE PO" . 4950)
+ ("ETHIOPIC SYLLABLE PWA" . 4951)
+ ("ETHIOPIC SYLLABLE RYA" . 4952)
+ ("ETHIOPIC SYLLABLE MYA" . 4953)
+ ("ETHIOPIC SYLLABLE FYA" . 4954)
+ ("ETHIOPIC WORDSPACE" . 4961)
+ ("ETHIOPIC FULL STOP" . 4962)
+ ("ETHIOPIC COMMA" . 4963)
+ ("ETHIOPIC SEMICOLON" . 4964)
+ ("ETHIOPIC COLON" . 4965)
+ ("ETHIOPIC PREFACE COLON" . 4966)
+ ("ETHIOPIC QUESTION MARK" . 4967)
+ ("ETHIOPIC PARAGRAPH SEPARATOR" . 4968)
+ ("ETHIOPIC DIGIT ONE" . 4969)
+ ("ETHIOPIC DIGIT TWO" . 4970)
+ ("ETHIOPIC DIGIT THREE" . 4971)
+ ("ETHIOPIC DIGIT FOUR" . 4972)
+ ("ETHIOPIC DIGIT FIVE" . 4973)
+ ("ETHIOPIC DIGIT SIX" . 4974)
+ ("ETHIOPIC DIGIT SEVEN" . 4975)
+ ("ETHIOPIC DIGIT EIGHT" . 4976)
+ ("ETHIOPIC DIGIT NINE" . 4977)
+ ("ETHIOPIC NUMBER TEN" . 4978)
+ ("ETHIOPIC NUMBER TWENTY" . 4979)
+ ("ETHIOPIC NUMBER THIRTY" . 4980)
+ ("ETHIOPIC NUMBER FORTY" . 4981)
+ ("ETHIOPIC NUMBER FIFTY" . 4982)
+ ("ETHIOPIC NUMBER SIXTY" . 4983)
+ ("ETHIOPIC NUMBER SEVENTY" . 4984)
+ ("ETHIOPIC NUMBER EIGHTY" . 4985)
+ ("ETHIOPIC NUMBER NINETY" . 4986)
+ ("ETHIOPIC NUMBER HUNDRED" . 4987)
+ ("ETHIOPIC NUMBER TEN THOUSAND" . 4988)
+ ("CHEROKEE LETTER A" . 5024)
+ ("CHEROKEE LETTER E" . 5025)
+ ("CHEROKEE LETTER I" . 5026)
+ ("CHEROKEE LETTER O" . 5027)
+ ("CHEROKEE LETTER U" . 5028)
+ ("CHEROKEE LETTER V" . 5029)
+ ("CHEROKEE LETTER GA" . 5030)
+ ("CHEROKEE LETTER KA" . 5031)
+ ("CHEROKEE LETTER GE" . 5032)
+ ("CHEROKEE LETTER GI" . 5033)
+ ("CHEROKEE LETTER GO" . 5034)
+ ("CHEROKEE LETTER GU" . 5035)
+ ("CHEROKEE LETTER GV" . 5036)
+ ("CHEROKEE LETTER HA" . 5037)
+ ("CHEROKEE LETTER HE" . 5038)
+ ("CHEROKEE LETTER HI" . 5039)
+ ("CHEROKEE LETTER HO" . 5040)
+ ("CHEROKEE LETTER HU" . 5041)
+ ("CHEROKEE LETTER HV" . 5042)
+ ("CHEROKEE LETTER LA" . 5043)
+ ("CHEROKEE LETTER LE" . 5044)
+ ("CHEROKEE LETTER LI" . 5045)
+ ("CHEROKEE LETTER LO" . 5046)
+ ("CHEROKEE LETTER LU" . 5047)
+ ("CHEROKEE LETTER LV" . 5048)
+ ("CHEROKEE LETTER MA" . 5049)
+ ("CHEROKEE LETTER ME" . 5050)
+ ("CHEROKEE LETTER MI" . 5051)
+ ("CHEROKEE LETTER MO" . 5052)
+ ("CHEROKEE LETTER MU" . 5053)
+ ("CHEROKEE LETTER NA" . 5054)
+ ("CHEROKEE LETTER HNA" . 5055)
+ ("CHEROKEE LETTER NAH" . 5056)
+ ("CHEROKEE LETTER NE" . 5057)
+ ("CHEROKEE LETTER NI" . 5058)
+ ("CHEROKEE LETTER NO" . 5059)
+ ("CHEROKEE LETTER NU" . 5060)
+ ("CHEROKEE LETTER NV" . 5061)
+ ("CHEROKEE LETTER QUA" . 5062)
+ ("CHEROKEE LETTER QUE" . 5063)
+ ("CHEROKEE LETTER QUI" . 5064)
+ ("CHEROKEE LETTER QUO" . 5065)
+ ("CHEROKEE LETTER QUU" . 5066)
+ ("CHEROKEE LETTER QUV" . 5067)
+ ("CHEROKEE LETTER SA" . 5068)
+ ("CHEROKEE LETTER S" . 5069)
+ ("CHEROKEE LETTER SE" . 5070)
+ ("CHEROKEE LETTER SI" . 5071)
+ ("CHEROKEE LETTER SO" . 5072)
+ ("CHEROKEE LETTER SU" . 5073)
+ ("CHEROKEE LETTER SV" . 5074)
+ ("CHEROKEE LETTER DA" . 5075)
+ ("CHEROKEE LETTER TA" . 5076)
+ ("CHEROKEE LETTER DE" . 5077)
+ ("CHEROKEE LETTER TE" . 5078)
+ ("CHEROKEE LETTER DI" . 5079)
+ ("CHEROKEE LETTER TI" . 5080)
+ ("CHEROKEE LETTER DO" . 5081)
+ ("CHEROKEE LETTER DU" . 5082)
+ ("CHEROKEE LETTER DV" . 5083)
+ ("CHEROKEE LETTER DLA" . 5084)
+ ("CHEROKEE LETTER TLA" . 5085)
+ ("CHEROKEE LETTER TLE" . 5086)
+ ("CHEROKEE LETTER TLI" . 5087)
+ ("CHEROKEE LETTER TLO" . 5088)
+ ("CHEROKEE LETTER TLU" . 5089)
+ ("CHEROKEE LETTER TLV" . 5090)
+ ("CHEROKEE LETTER TSA" . 5091)
+ ("CHEROKEE LETTER TSE" . 5092)
+ ("CHEROKEE LETTER TSI" . 5093)
+ ("CHEROKEE LETTER TSO" . 5094)
+ ("CHEROKEE LETTER TSU" . 5095)
+ ("CHEROKEE LETTER TSV" . 5096)
+ ("CHEROKEE LETTER WA" . 5097)
+ ("CHEROKEE LETTER WE" . 5098)
+ ("CHEROKEE LETTER WI" . 5099)
+ ("CHEROKEE LETTER WO" . 5100)
+ ("CHEROKEE LETTER WU" . 5101)
+ ("CHEROKEE LETTER WV" . 5102)
+ ("CHEROKEE LETTER YA" . 5103)
+ ("CHEROKEE LETTER YE" . 5104)
+ ("CHEROKEE LETTER YI" . 5105)
+ ("CHEROKEE LETTER YO" . 5106)
+ ("CHEROKEE LETTER YU" . 5107)
+ ("CHEROKEE LETTER YV" . 5108)
+ ("CANADIAN SYLLABICS E" . 5121)
+ ("CANADIAN SYLLABICS AAI" . 5122)
+ ("CANADIAN SYLLABICS I" . 5123)
+ ("CANADIAN SYLLABICS II" . 5124)
+ ("CANADIAN SYLLABICS O" . 5125)
+ ("CANADIAN SYLLABICS OO" . 5126)
+ ("CANADIAN SYLLABICS Y-CREE OO" . 5127)
+ ("CANADIAN SYLLABICS CARRIER EE" . 5128)
+ ("CANADIAN SYLLABICS CARRIER I" . 5129)
+ ("CANADIAN SYLLABICS A" . 5130)
+ ("CANADIAN SYLLABICS AA" . 5131)
+ ("CANADIAN SYLLABICS WE" . 5132)
+ ("CANADIAN SYLLABICS WEST-CREE WE" . 5133)
+ ("CANADIAN SYLLABICS WI" . 5134)
+ ("CANADIAN SYLLABICS WEST-CREE WI" . 5135)
+ ("CANADIAN SYLLABICS WII" . 5136)
+ ("CANADIAN SYLLABICS WEST-CREE WII" . 5137)
+ ("CANADIAN SYLLABICS WO" . 5138)
+ ("CANADIAN SYLLABICS WEST-CREE WO" . 5139)
+ ("CANADIAN SYLLABICS WOO" . 5140)
+ ("CANADIAN SYLLABICS WEST-CREE WOO" . 5141)
+ ("CANADIAN SYLLABICS NASKAPI WOO" . 5142)
+ ("CANADIAN SYLLABICS WA" . 5143)
+ ("CANADIAN SYLLABICS WEST-CREE WA" . 5144)
+ ("CANADIAN SYLLABICS WAA" . 5145)
+ ("CANADIAN SYLLABICS WEST-CREE WAA" . 5146)
+ ("CANADIAN SYLLABICS NASKAPI WAA" . 5147)
+ ("CANADIAN SYLLABICS AI" . 5148)
+ ("CANADIAN SYLLABICS Y-CREE W" . 5149)
+ ("CANADIAN SYLLABICS GLOTTAL STOP" . 5150)
+ ("CANADIAN SYLLABICS FINAL ACUTE" . 5151)
+ ("CANADIAN SYLLABICS FINAL GRAVE" . 5152)
+ ("CANADIAN SYLLABICS FINAL BOTTOM HALF RING" . 5153)
+ ("CANADIAN SYLLABICS FINAL TOP HALF RING" . 5154)
+ ("CANADIAN SYLLABICS FINAL RIGHT HALF RING" . 5155)
+ ("CANADIAN SYLLABICS FINAL RING" . 5156)
+ ("CANADIAN SYLLABICS FINAL DOUBLE ACUTE" . 5157)
+ ("CANADIAN SYLLABICS FINAL DOUBLE SHORT VERTICAL STROKES" . 5158)
+ ("CANADIAN SYLLABICS FINAL MIDDLE DOT" . 5159)
+ ("CANADIAN SYLLABICS FINAL SHORT HORIZONTAL STROKE" . 5160)
+ ("CANADIAN SYLLABICS FINAL PLUS" . 5161)
+ ("CANADIAN SYLLABICS FINAL DOWN TACK" . 5162)
+ ("CANADIAN SYLLABICS EN" . 5163)
+ ("CANADIAN SYLLABICS IN" . 5164)
+ ("CANADIAN SYLLABICS ON" . 5165)
+ ("CANADIAN SYLLABICS AN" . 5166)
+ ("CANADIAN SYLLABICS PE" . 5167)
+ ("CANADIAN SYLLABICS PAAI" . 5168)
+ ("CANADIAN SYLLABICS PI" . 5169)
+ ("CANADIAN SYLLABICS PII" . 5170)
+ ("CANADIAN SYLLABICS PO" . 5171)
+ ("CANADIAN SYLLABICS POO" . 5172)
+ ("CANADIAN SYLLABICS Y-CREE POO" . 5173)
+ ("CANADIAN SYLLABICS CARRIER HEE" . 5174)
+ ("CANADIAN SYLLABICS CARRIER HI" . 5175)
+ ("CANADIAN SYLLABICS PA" . 5176)
+ ("CANADIAN SYLLABICS PAA" . 5177)
+ ("CANADIAN SYLLABICS PWE" . 5178)
+ ("CANADIAN SYLLABICS WEST-CREE PWE" . 5179)
+ ("CANADIAN SYLLABICS PWI" . 5180)
+ ("CANADIAN SYLLABICS WEST-CREE PWI" . 5181)
+ ("CANADIAN SYLLABICS PWII" . 5182)
+ ("CANADIAN SYLLABICS WEST-CREE PWII" . 5183)
+ ("CANADIAN SYLLABICS PWO" . 5184)
+ ("CANADIAN SYLLABICS WEST-CREE PWO" . 5185)
+ ("CANADIAN SYLLABICS PWOO" . 5186)
+ ("CANADIAN SYLLABICS WEST-CREE PWOO" . 5187)
+ ("CANADIAN SYLLABICS PWA" . 5188)
+ ("CANADIAN SYLLABICS WEST-CREE PWA" . 5189)
+ ("CANADIAN SYLLABICS PWAA" . 5190)
+ ("CANADIAN SYLLABICS WEST-CREE PWAA" . 5191)
+ ("CANADIAN SYLLABICS Y-CREE PWAA" . 5192)
+ ("CANADIAN SYLLABICS P" . 5193)
+ ("CANADIAN SYLLABICS WEST-CREE P" . 5194)
+ ("CANADIAN SYLLABICS CARRIER H" . 5195)
+ ("CANADIAN SYLLABICS TE" . 5196)
+ ("CANADIAN SYLLABICS TAAI" . 5197)
+ ("CANADIAN SYLLABICS TI" . 5198)
+ ("CANADIAN SYLLABICS TII" . 5199)
+ ("CANADIAN SYLLABICS TO" . 5200)
+ ("CANADIAN SYLLABICS TOO" . 5201)
+ ("CANADIAN SYLLABICS Y-CREE TOO" . 5202)
+ ("CANADIAN SYLLABICS CARRIER DEE" . 5203)
+ ("CANADIAN SYLLABICS CARRIER DI" . 5204)
+ ("CANADIAN SYLLABICS TA" . 5205)
+ ("CANADIAN SYLLABICS TAA" . 5206)
+ ("CANADIAN SYLLABICS TWE" . 5207)
+ ("CANADIAN SYLLABICS WEST-CREE TWE" . 5208)
+ ("CANADIAN SYLLABICS TWI" . 5209)
+ ("CANADIAN SYLLABICS WEST-CREE TWI" . 5210)
+ ("CANADIAN SYLLABICS TWII" . 5211)
+ ("CANADIAN SYLLABICS WEST-CREE TWII" . 5212)
+ ("CANADIAN SYLLABICS TWO" . 5213)
+ ("CANADIAN SYLLABICS WEST-CREE TWO" . 5214)
+ ("CANADIAN SYLLABICS TWOO" . 5215)
+ ("CANADIAN SYLLABICS WEST-CREE TWOO" . 5216)
+ ("CANADIAN SYLLABICS TWA" . 5217)
+ ("CANADIAN SYLLABICS WEST-CREE TWA" . 5218)
+ ("CANADIAN SYLLABICS TWAA" . 5219)
+ ("CANADIAN SYLLABICS WEST-CREE TWAA" . 5220)
+ ("CANADIAN SYLLABICS NASKAPI TWAA" . 5221)
+ ("CANADIAN SYLLABICS T" . 5222)
+ ("CANADIAN SYLLABICS TTE" . 5223)
+ ("CANADIAN SYLLABICS TTI" . 5224)
+ ("CANADIAN SYLLABICS TTO" . 5225)
+ ("CANADIAN SYLLABICS TTA" . 5226)
+ ("CANADIAN SYLLABICS KE" . 5227)
+ ("CANADIAN SYLLABICS KAAI" . 5228)
+ ("CANADIAN SYLLABICS KI" . 5229)
+ ("CANADIAN SYLLABICS KII" . 5230)
+ ("CANADIAN SYLLABICS KO" . 5231)
+ ("CANADIAN SYLLABICS KOO" . 5232)
+ ("CANADIAN SYLLABICS Y-CREE KOO" . 5233)
+ ("CANADIAN SYLLABICS KA" . 5234)
+ ("CANADIAN SYLLABICS KAA" . 5235)
+ ("CANADIAN SYLLABICS KWE" . 5236)
+ ("CANADIAN SYLLABICS WEST-CREE KWE" . 5237)
+ ("CANADIAN SYLLABICS KWI" . 5238)
+ ("CANADIAN SYLLABICS WEST-CREE KWI" . 5239)
+ ("CANADIAN SYLLABICS KWII" . 5240)
+ ("CANADIAN SYLLABICS WEST-CREE KWII" . 5241)
+ ("CANADIAN SYLLABICS KWO" . 5242)
+ ("CANADIAN SYLLABICS WEST-CREE KWO" . 5243)
+ ("CANADIAN SYLLABICS KWOO" . 5244)
+ ("CANADIAN SYLLABICS WEST-CREE KWOO" . 5245)
+ ("CANADIAN SYLLABICS KWA" . 5246)
+ ("CANADIAN SYLLABICS WEST-CREE KWA" . 5247)
+ ("CANADIAN SYLLABICS KWAA" . 5248)
+ ("CANADIAN SYLLABICS WEST-CREE KWAA" . 5249)
+ ("CANADIAN SYLLABICS NASKAPI KWAA" . 5250)
+ ("CANADIAN SYLLABICS K" . 5251)
+ ("CANADIAN SYLLABICS KW" . 5252)
+ ("CANADIAN SYLLABICS SOUTH-SLAVEY KEH" . 5253)
+ ("CANADIAN SYLLABICS SOUTH-SLAVEY KIH" . 5254)
+ ("CANADIAN SYLLABICS SOUTH-SLAVEY KOH" . 5255)
+ ("CANADIAN SYLLABICS SOUTH-SLAVEY KAH" . 5256)
+ ("CANADIAN SYLLABICS CE" . 5257)
+ ("CANADIAN SYLLABICS CAAI" . 5258)
+ ("CANADIAN SYLLABICS CI" . 5259)
+ ("CANADIAN SYLLABICS CII" . 5260)
+ ("CANADIAN SYLLABICS CO" . 5261)
+ ("CANADIAN SYLLABICS COO" . 5262)
+ ("CANADIAN SYLLABICS Y-CREE COO" . 5263)
+ ("CANADIAN SYLLABICS CA" . 5264)
+ ("CANADIAN SYLLABICS CAA" . 5265)
+ ("CANADIAN SYLLABICS CWE" . 5266)
+ ("CANADIAN SYLLABICS WEST-CREE CWE" . 5267)
+ ("CANADIAN SYLLABICS CWI" . 5268)
+ ("CANADIAN SYLLABICS WEST-CREE CWI" . 5269)
+ ("CANADIAN SYLLABICS CWII" . 5270)
+ ("CANADIAN SYLLABICS WEST-CREE CWII" . 5271)
+ ("CANADIAN SYLLABICS CWO" . 5272)
+ ("CANADIAN SYLLABICS WEST-CREE CWO" . 5273)
+ ("CANADIAN SYLLABICS CWOO" . 5274)
+ ("CANADIAN SYLLABICS WEST-CREE CWOO" . 5275)
+ ("CANADIAN SYLLABICS CWA" . 5276)
+ ("CANADIAN SYLLABICS WEST-CREE CWA" . 5277)
+ ("CANADIAN SYLLABICS CWAA" . 5278)
+ ("CANADIAN SYLLABICS WEST-CREE CWAA" . 5279)
+ ("CANADIAN SYLLABICS NASKAPI CWAA" . 5280)
+ ("CANADIAN SYLLABICS C" . 5281)
+ ("CANADIAN SYLLABICS SAYISI TH" . 5282)
+ ("CANADIAN SYLLABICS ME" . 5283)
+ ("CANADIAN SYLLABICS MAAI" . 5284)
+ ("CANADIAN SYLLABICS MI" . 5285)
+ ("CANADIAN SYLLABICS MII" . 5286)
+ ("CANADIAN SYLLABICS MO" . 5287)
+ ("CANADIAN SYLLABICS MOO" . 5288)
+ ("CANADIAN SYLLABICS Y-CREE MOO" . 5289)
+ ("CANADIAN SYLLABICS MA" . 5290)
+ ("CANADIAN SYLLABICS MAA" . 5291)
+ ("CANADIAN SYLLABICS MWE" . 5292)
+ ("CANADIAN SYLLABICS WEST-CREE MWE" . 5293)
+ ("CANADIAN SYLLABICS MWI" . 5294)
+ ("CANADIAN SYLLABICS WEST-CREE MWI" . 5295)
+ ("CANADIAN SYLLABICS MWII" . 5296)
+ ("CANADIAN SYLLABICS WEST-CREE MWII" . 5297)
+ ("CANADIAN SYLLABICS MWO" . 5298)
+ ("CANADIAN SYLLABICS WEST-CREE MWO" . 5299)
+ ("CANADIAN SYLLABICS MWOO" . 5300)
+ ("CANADIAN SYLLABICS WEST-CREE MWOO" . 5301)
+ ("CANADIAN SYLLABICS MWA" . 5302)
+ ("CANADIAN SYLLABICS WEST-CREE MWA" . 5303)
+ ("CANADIAN SYLLABICS MWAA" . 5304)
+ ("CANADIAN SYLLABICS WEST-CREE MWAA" . 5305)
+ ("CANADIAN SYLLABICS NASKAPI MWAA" . 5306)
+ ("CANADIAN SYLLABICS M" . 5307)
+ ("CANADIAN SYLLABICS WEST-CREE M" . 5308)
+ ("CANADIAN SYLLABICS MH" . 5309)
+ ("CANADIAN SYLLABICS ATHAPASCAN M" . 5310)
+ ("CANADIAN SYLLABICS SAYISI M" . 5311)
+ ("CANADIAN SYLLABICS NE" . 5312)
+ ("CANADIAN SYLLABICS NAAI" . 5313)
+ ("CANADIAN SYLLABICS NI" . 5314)
+ ("CANADIAN SYLLABICS NII" . 5315)
+ ("CANADIAN SYLLABICS NO" . 5316)
+ ("CANADIAN SYLLABICS NOO" . 5317)
+ ("CANADIAN SYLLABICS Y-CREE NOO" . 5318)
+ ("CANADIAN SYLLABICS NA" . 5319)
+ ("CANADIAN SYLLABICS NAA" . 5320)
+ ("CANADIAN SYLLABICS NWE" . 5321)
+ ("CANADIAN SYLLABICS WEST-CREE NWE" . 5322)
+ ("CANADIAN SYLLABICS NWA" . 5323)
+ ("CANADIAN SYLLABICS WEST-CREE NWA" . 5324)
+ ("CANADIAN SYLLABICS NWAA" . 5325)
+ ("CANADIAN SYLLABICS WEST-CREE NWAA" . 5326)
+ ("CANADIAN SYLLABICS NASKAPI NWAA" . 5327)
+ ("CANADIAN SYLLABICS N" . 5328)
+ ("CANADIAN SYLLABICS CARRIER NG" . 5329)
+ ("CANADIAN SYLLABICS NH" . 5330)
+ ("CANADIAN SYLLABICS LE" . 5331)
+ ("CANADIAN SYLLABICS LAAI" . 5332)
+ ("CANADIAN SYLLABICS LI" . 5333)
+ ("CANADIAN SYLLABICS LII" . 5334)
+ ("CANADIAN SYLLABICS LO" . 5335)
+ ("CANADIAN SYLLABICS LOO" . 5336)
+ ("CANADIAN SYLLABICS Y-CREE LOO" . 5337)
+ ("CANADIAN SYLLABICS LA" . 5338)
+ ("CANADIAN SYLLABICS LAA" . 5339)
+ ("CANADIAN SYLLABICS LWE" . 5340)
+ ("CANADIAN SYLLABICS WEST-CREE LWE" . 5341)
+ ("CANADIAN SYLLABICS LWI" . 5342)
+ ("CANADIAN SYLLABICS WEST-CREE LWI" . 5343)
+ ("CANADIAN SYLLABICS LWII" . 5344)
+ ("CANADIAN SYLLABICS WEST-CREE LWII" . 5345)
+ ("CANADIAN SYLLABICS LWO" . 5346)
+ ("CANADIAN SYLLABICS WEST-CREE LWO" . 5347)
+ ("CANADIAN SYLLABICS LWOO" . 5348)
+ ("CANADIAN SYLLABICS WEST-CREE LWOO" . 5349)
+ ("CANADIAN SYLLABICS LWA" . 5350)
+ ("CANADIAN SYLLABICS WEST-CREE LWA" . 5351)
+ ("CANADIAN SYLLABICS LWAA" . 5352)
+ ("CANADIAN SYLLABICS WEST-CREE LWAA" . 5353)
+ ("CANADIAN SYLLABICS L" . 5354)
+ ("CANADIAN SYLLABICS WEST-CREE L" . 5355)
+ ("CANADIAN SYLLABICS MEDIAL L" . 5356)
+ ("CANADIAN SYLLABICS SE" . 5357)
+ ("CANADIAN SYLLABICS SAAI" . 5358)
+ ("CANADIAN SYLLABICS SI" . 5359)
+ ("CANADIAN SYLLABICS SII" . 5360)
+ ("CANADIAN SYLLABICS SO" . 5361)
+ ("CANADIAN SYLLABICS SOO" . 5362)
+ ("CANADIAN SYLLABICS Y-CREE SOO" . 5363)
+ ("CANADIAN SYLLABICS SA" . 5364)
+ ("CANADIAN SYLLABICS SAA" . 5365)
+ ("CANADIAN SYLLABICS SWE" . 5366)
+ ("CANADIAN SYLLABICS WEST-CREE SWE" . 5367)
+ ("CANADIAN SYLLABICS SWI" . 5368)
+ ("CANADIAN SYLLABICS WEST-CREE SWI" . 5369)
+ ("CANADIAN SYLLABICS SWII" . 5370)
+ ("CANADIAN SYLLABICS WEST-CREE SWII" . 5371)
+ ("CANADIAN SYLLABICS SWO" . 5372)
+ ("CANADIAN SYLLABICS WEST-CREE SWO" . 5373)
+ ("CANADIAN SYLLABICS SWOO" . 5374)
+ ("CANADIAN SYLLABICS WEST-CREE SWOO" . 5375)
+ ("CANADIAN SYLLABICS SWA" . 5376)
+ ("CANADIAN SYLLABICS WEST-CREE SWA" . 5377)
+ ("CANADIAN SYLLABICS SWAA" . 5378)
+ ("CANADIAN SYLLABICS WEST-CREE SWAA" . 5379)
+ ("CANADIAN SYLLABICS NASKAPI SWAA" . 5380)
+ ("CANADIAN SYLLABICS S" . 5381)
+ ("CANADIAN SYLLABICS ATHAPASCAN S" . 5382)
+ ("CANADIAN SYLLABICS SW" . 5383)
+ ("CANADIAN SYLLABICS BLACKFOOT S" . 5384)
+ ("CANADIAN SYLLABICS MOOSE-CREE SK" . 5385)
+ ("CANADIAN SYLLABICS NASKAPI SKW" . 5386)
+ ("CANADIAN SYLLABICS NASKAPI S-W" . 5387)
+ ("CANADIAN SYLLABICS NASKAPI SPWA" . 5388)
+ ("CANADIAN SYLLABICS NASKAPI STWA" . 5389)
+ ("CANADIAN SYLLABICS NASKAPI SKWA" . 5390)
+ ("CANADIAN SYLLABICS NASKAPI SCWA" . 5391)
+ ("CANADIAN SYLLABICS SHE" . 5392)
+ ("CANADIAN SYLLABICS SHI" . 5393)
+ ("CANADIAN SYLLABICS SHII" . 5394)
+ ("CANADIAN SYLLABICS SHO" . 5395)
+ ("CANADIAN SYLLABICS SHOO" . 5396)
+ ("CANADIAN SYLLABICS SHA" . 5397)
+ ("CANADIAN SYLLABICS SHAA" . 5398)
+ ("CANADIAN SYLLABICS SHWE" . 5399)
+ ("CANADIAN SYLLABICS WEST-CREE SHWE" . 5400)
+ ("CANADIAN SYLLABICS SHWI" . 5401)
+ ("CANADIAN SYLLABICS WEST-CREE SHWI" . 5402)
+ ("CANADIAN SYLLABICS SHWII" . 5403)
+ ("CANADIAN SYLLABICS WEST-CREE SHWII" . 5404)
+ ("CANADIAN SYLLABICS SHWO" . 5405)
+ ("CANADIAN SYLLABICS WEST-CREE SHWO" . 5406)
+ ("CANADIAN SYLLABICS SHWOO" . 5407)
+ ("CANADIAN SYLLABICS WEST-CREE SHWOO" . 5408)
+ ("CANADIAN SYLLABICS SHWA" . 5409)
+ ("CANADIAN SYLLABICS WEST-CREE SHWA" . 5410)
+ ("CANADIAN SYLLABICS SHWAA" . 5411)
+ ("CANADIAN SYLLABICS WEST-CREE SHWAA" . 5412)
+ ("CANADIAN SYLLABICS SH" . 5413)
+ ("CANADIAN SYLLABICS YE" . 5414)
+ ("CANADIAN SYLLABICS YAAI" . 5415)
+ ("CANADIAN SYLLABICS YI" . 5416)
+ ("CANADIAN SYLLABICS YII" . 5417)
+ ("CANADIAN SYLLABICS YO" . 5418)
+ ("CANADIAN SYLLABICS YOO" . 5419)
+ ("CANADIAN SYLLABICS Y-CREE YOO" . 5420)
+ ("CANADIAN SYLLABICS YA" . 5421)
+ ("CANADIAN SYLLABICS YAA" . 5422)
+ ("CANADIAN SYLLABICS YWE" . 5423)
+ ("CANADIAN SYLLABICS WEST-CREE YWE" . 5424)
+ ("CANADIAN SYLLABICS YWI" . 5425)
+ ("CANADIAN SYLLABICS WEST-CREE YWI" . 5426)
+ ("CANADIAN SYLLABICS YWII" . 5427)
+ ("CANADIAN SYLLABICS WEST-CREE YWII" . 5428)
+ ("CANADIAN SYLLABICS YWO" . 5429)
+ ("CANADIAN SYLLABICS WEST-CREE YWO" . 5430)
+ ("CANADIAN SYLLABICS YWOO" . 5431)
+ ("CANADIAN SYLLABICS WEST-CREE YWOO" . 5432)
+ ("CANADIAN SYLLABICS YWA" . 5433)
+ ("CANADIAN SYLLABICS WEST-CREE YWA" . 5434)
+ ("CANADIAN SYLLABICS YWAA" . 5435)
+ ("CANADIAN SYLLABICS WEST-CREE YWAA" . 5436)
+ ("CANADIAN SYLLABICS NASKAPI YWAA" . 5437)
+ ("CANADIAN SYLLABICS Y" . 5438)
+ ("CANADIAN SYLLABICS BIBLE-CREE Y" . 5439)
+ ("CANADIAN SYLLABICS WEST-CREE Y" . 5440)
+ ("CANADIAN SYLLABICS SAYISI YI" . 5441)
+ ("CANADIAN SYLLABICS RE" . 5442)
+ ("CANADIAN SYLLABICS R-CREE RE" . 5443)
+ ("CANADIAN SYLLABICS WEST-CREE LE" . 5444)
+ ("CANADIAN SYLLABICS RAAI" . 5445)
+ ("CANADIAN SYLLABICS RI" . 5446)
+ ("CANADIAN SYLLABICS RII" . 5447)
+ ("CANADIAN SYLLABICS RO" . 5448)
+ ("CANADIAN SYLLABICS ROO" . 5449)
+ ("CANADIAN SYLLABICS WEST-CREE LO" . 5450)
+ ("CANADIAN SYLLABICS RA" . 5451)
+ ("CANADIAN SYLLABICS RAA" . 5452)
+ ("CANADIAN SYLLABICS WEST-CREE LA" . 5453)
+ ("CANADIAN SYLLABICS RWAA" . 5454)
+ ("CANADIAN SYLLABICS WEST-CREE RWAA" . 5455)
+ ("CANADIAN SYLLABICS R" . 5456)
+ ("CANADIAN SYLLABICS WEST-CREE R" . 5457)
+ ("CANADIAN SYLLABICS MEDIAL R" . 5458)
+ ("CANADIAN SYLLABICS FE" . 5459)
+ ("CANADIAN SYLLABICS FAAI" . 5460)
+ ("CANADIAN SYLLABICS FI" . 5461)
+ ("CANADIAN SYLLABICS FII" . 5462)
+ ("CANADIAN SYLLABICS FO" . 5463)
+ ("CANADIAN SYLLABICS FOO" . 5464)
+ ("CANADIAN SYLLABICS FA" . 5465)
+ ("CANADIAN SYLLABICS FAA" . 5466)
+ ("CANADIAN SYLLABICS FWAA" . 5467)
+ ("CANADIAN SYLLABICS WEST-CREE FWAA" . 5468)
+ ("CANADIAN SYLLABICS F" . 5469)
+ ("CANADIAN SYLLABICS THE" . 5470)
+ ("CANADIAN SYLLABICS N-CREE THE" . 5471)
+ ("CANADIAN SYLLABICS THI" . 5472)
+ ("CANADIAN SYLLABICS N-CREE THI" . 5473)
+ ("CANADIAN SYLLABICS THII" . 5474)
+ ("CANADIAN SYLLABICS N-CREE THII" . 5475)
+ ("CANADIAN SYLLABICS THO" . 5476)
+ ("CANADIAN SYLLABICS THOO" . 5477)
+ ("CANADIAN SYLLABICS THA" . 5478)
+ ("CANADIAN SYLLABICS THAA" . 5479)
+ ("CANADIAN SYLLABICS THWAA" . 5480)
+ ("CANADIAN SYLLABICS WEST-CREE THWAA" . 5481)
+ ("CANADIAN SYLLABICS TH" . 5482)
+ ("CANADIAN SYLLABICS TTHE" . 5483)
+ ("CANADIAN SYLLABICS TTHI" . 5484)
+ ("CANADIAN SYLLABICS TTHO" . 5485)
+ ("CANADIAN SYLLABICS TTHA" . 5486)
+ ("CANADIAN SYLLABICS TTH" . 5487)
+ ("CANADIAN SYLLABICS TYE" . 5488)
+ ("CANADIAN SYLLABICS TYI" . 5489)
+ ("CANADIAN SYLLABICS TYO" . 5490)
+ ("CANADIAN SYLLABICS TYA" . 5491)
+ ("CANADIAN SYLLABICS NUNAVIK HE" . 5492)
+ ("CANADIAN SYLLABICS NUNAVIK HI" . 5493)
+ ("CANADIAN SYLLABICS NUNAVIK HII" . 5494)
+ ("CANADIAN SYLLABICS NUNAVIK HO" . 5495)
+ ("CANADIAN SYLLABICS NUNAVIK HOO" . 5496)
+ ("CANADIAN SYLLABICS NUNAVIK HA" . 5497)
+ ("CANADIAN SYLLABICS NUNAVIK HAA" . 5498)
+ ("CANADIAN SYLLABICS NUNAVIK H" . 5499)
+ ("CANADIAN SYLLABICS NUNAVUT H" . 5500)
+ ("CANADIAN SYLLABICS HK" . 5501)
+ ("CANADIAN SYLLABICS QAAI" . 5502)
+ ("CANADIAN SYLLABICS QI" . 5503)
+ ("CANADIAN SYLLABICS QII" . 5504)
+ ("CANADIAN SYLLABICS QO" . 5505)
+ ("CANADIAN SYLLABICS QOO" . 5506)
+ ("CANADIAN SYLLABICS QA" . 5507)
+ ("CANADIAN SYLLABICS QAA" . 5508)
+ ("CANADIAN SYLLABICS Q" . 5509)
+ ("CANADIAN SYLLABICS TLHE" . 5510)
+ ("CANADIAN SYLLABICS TLHI" . 5511)
+ ("CANADIAN SYLLABICS TLHO" . 5512)
+ ("CANADIAN SYLLABICS TLHA" . 5513)
+ ("CANADIAN SYLLABICS WEST-CREE RE" . 5514)
+ ("CANADIAN SYLLABICS WEST-CREE RI" . 5515)
+ ("CANADIAN SYLLABICS WEST-CREE RO" . 5516)
+ ("CANADIAN SYLLABICS WEST-CREE RA" . 5517)
+ ("CANADIAN SYLLABICS NGAAI" . 5518)
+ ("CANADIAN SYLLABICS NGI" . 5519)
+ ("CANADIAN SYLLABICS NGII" . 5520)
+ ("CANADIAN SYLLABICS NGO" . 5521)
+ ("CANADIAN SYLLABICS NGOO" . 5522)
+ ("CANADIAN SYLLABICS NGA" . 5523)
+ ("CANADIAN SYLLABICS NGAA" . 5524)
+ ("CANADIAN SYLLABICS NG" . 5525)
+ ("CANADIAN SYLLABICS NNG" . 5526)
+ ("CANADIAN SYLLABICS SAYISI SHE" . 5527)
+ ("CANADIAN SYLLABICS SAYISI SHI" . 5528)
+ ("CANADIAN SYLLABICS SAYISI SHO" . 5529)
+ ("CANADIAN SYLLABICS SAYISI SHA" . 5530)
+ ("CANADIAN SYLLABICS WOODS-CREE THE" . 5531)
+ ("CANADIAN SYLLABICS WOODS-CREE THI" . 5532)
+ ("CANADIAN SYLLABICS WOODS-CREE THO" . 5533)
+ ("CANADIAN SYLLABICS WOODS-CREE THA" . 5534)
+ ("CANADIAN SYLLABICS WOODS-CREE TH" . 5535)
+ ("CANADIAN SYLLABICS LHI" . 5536)
+ ("CANADIAN SYLLABICS LHII" . 5537)
+ ("CANADIAN SYLLABICS LHO" . 5538)
+ ("CANADIAN SYLLABICS LHOO" . 5539)
+ ("CANADIAN SYLLABICS LHA" . 5540)
+ ("CANADIAN SYLLABICS LHAA" . 5541)
+ ("CANADIAN SYLLABICS LH" . 5542)
+ ("CANADIAN SYLLABICS TH-CREE THE" . 5543)
+ ("CANADIAN SYLLABICS TH-CREE THI" . 5544)
+ ("CANADIAN SYLLABICS TH-CREE THII" . 5545)
+ ("CANADIAN SYLLABICS TH-CREE THO" . 5546)
+ ("CANADIAN SYLLABICS TH-CREE THOO" . 5547)
+ ("CANADIAN SYLLABICS TH-CREE THA" . 5548)
+ ("CANADIAN SYLLABICS TH-CREE THAA" . 5549)
+ ("CANADIAN SYLLABICS TH-CREE TH" . 5550)
+ ("CANADIAN SYLLABICS AIVILIK B" . 5551)
+ ("CANADIAN SYLLABICS BLACKFOOT E" . 5552)
+ ("CANADIAN SYLLABICS BLACKFOOT I" . 5553)
+ ("CANADIAN SYLLABICS BLACKFOOT O" . 5554)
+ ("CANADIAN SYLLABICS BLACKFOOT A" . 5555)
+ ("CANADIAN SYLLABICS BLACKFOOT WE" . 5556)
+ ("CANADIAN SYLLABICS BLACKFOOT WI" . 5557)
+ ("CANADIAN SYLLABICS BLACKFOOT WO" . 5558)
+ ("CANADIAN SYLLABICS BLACKFOOT WA" . 5559)
+ ("CANADIAN SYLLABICS BLACKFOOT NE" . 5560)
+ ("CANADIAN SYLLABICS BLACKFOOT NI" . 5561)
+ ("CANADIAN SYLLABICS BLACKFOOT NO" . 5562)
+ ("CANADIAN SYLLABICS BLACKFOOT NA" . 5563)
+ ("CANADIAN SYLLABICS BLACKFOOT KE" . 5564)
+ ("CANADIAN SYLLABICS BLACKFOOT KI" . 5565)
+ ("CANADIAN SYLLABICS BLACKFOOT KO" . 5566)
+ ("CANADIAN SYLLABICS BLACKFOOT KA" . 5567)
+ ("CANADIAN SYLLABICS SAYISI HE" . 5568)
+ ("CANADIAN SYLLABICS SAYISI HI" . 5569)
+ ("CANADIAN SYLLABICS SAYISI HO" . 5570)
+ ("CANADIAN SYLLABICS SAYISI HA" . 5571)
+ ("CANADIAN SYLLABICS CARRIER GHU" . 5572)
+ ("CANADIAN SYLLABICS CARRIER GHO" . 5573)
+ ("CANADIAN SYLLABICS CARRIER GHE" . 5574)
+ ("CANADIAN SYLLABICS CARRIER GHEE" . 5575)
+ ("CANADIAN SYLLABICS CARRIER GHI" . 5576)
+ ("CANADIAN SYLLABICS CARRIER GHA" . 5577)
+ ("CANADIAN SYLLABICS CARRIER RU" . 5578)
+ ("CANADIAN SYLLABICS CARRIER RO" . 5579)
+ ("CANADIAN SYLLABICS CARRIER RE" . 5580)
+ ("CANADIAN SYLLABICS CARRIER REE" . 5581)
+ ("CANADIAN SYLLABICS CARRIER RI" . 5582)
+ ("CANADIAN SYLLABICS CARRIER RA" . 5583)
+ ("CANADIAN SYLLABICS CARRIER WU" . 5584)
+ ("CANADIAN SYLLABICS CARRIER WO" . 5585)
+ ("CANADIAN SYLLABICS CARRIER WE" . 5586)
+ ("CANADIAN SYLLABICS CARRIER WEE" . 5587)
+ ("CANADIAN SYLLABICS CARRIER WI" . 5588)
+ ("CANADIAN SYLLABICS CARRIER WA" . 5589)
+ ("CANADIAN SYLLABICS CARRIER HWU" . 5590)
+ ("CANADIAN SYLLABICS CARRIER HWO" . 5591)
+ ("CANADIAN SYLLABICS CARRIER HWE" . 5592)
+ ("CANADIAN SYLLABICS CARRIER HWEE" . 5593)
+ ("CANADIAN SYLLABICS CARRIER HWI" . 5594)
+ ("CANADIAN SYLLABICS CARRIER HWA" . 5595)
+ ("CANADIAN SYLLABICS CARRIER THU" . 5596)
+ ("CANADIAN SYLLABICS CARRIER THO" . 5597)
+ ("CANADIAN SYLLABICS CARRIER THE" . 5598)
+ ("CANADIAN SYLLABICS CARRIER THEE" . 5599)
+ ("CANADIAN SYLLABICS CARRIER THI" . 5600)
+ ("CANADIAN SYLLABICS CARRIER THA" . 5601)
+ ("CANADIAN SYLLABICS CARRIER TTU" . 5602)
+ ("CANADIAN SYLLABICS CARRIER TTO" . 5603)
+ ("CANADIAN SYLLABICS CARRIER TTE" . 5604)
+ ("CANADIAN SYLLABICS CARRIER TTEE" . 5605)
+ ("CANADIAN SYLLABICS CARRIER TTI" . 5606)
+ ("CANADIAN SYLLABICS CARRIER TTA" . 5607)
+ ("CANADIAN SYLLABICS CARRIER PU" . 5608)
+ ("CANADIAN SYLLABICS CARRIER PO" . 5609)
+ ("CANADIAN SYLLABICS CARRIER PE" . 5610)
+ ("CANADIAN SYLLABICS CARRIER PEE" . 5611)
+ ("CANADIAN SYLLABICS CARRIER PI" . 5612)
+ ("CANADIAN SYLLABICS CARRIER PA" . 5613)
+ ("CANADIAN SYLLABICS CARRIER P" . 5614)
+ ("CANADIAN SYLLABICS CARRIER GU" . 5615)
+ ("CANADIAN SYLLABICS CARRIER GO" . 5616)
+ ("CANADIAN SYLLABICS CARRIER GE" . 5617)
+ ("CANADIAN SYLLABICS CARRIER GEE" . 5618)
+ ("CANADIAN SYLLABICS CARRIER GI" . 5619)
+ ("CANADIAN SYLLABICS CARRIER GA" . 5620)
+ ("CANADIAN SYLLABICS CARRIER KHU" . 5621)
+ ("CANADIAN SYLLABICS CARRIER KHO" . 5622)
+ ("CANADIAN SYLLABICS CARRIER KHE" . 5623)
+ ("CANADIAN SYLLABICS CARRIER KHEE" . 5624)
+ ("CANADIAN SYLLABICS CARRIER KHI" . 5625)
+ ("CANADIAN SYLLABICS CARRIER KHA" . 5626)
+ ("CANADIAN SYLLABICS CARRIER KKU" . 5627)
+ ("CANADIAN SYLLABICS CARRIER KKO" . 5628)
+ ("CANADIAN SYLLABICS CARRIER KKE" . 5629)
+ ("CANADIAN SYLLABICS CARRIER KKEE" . 5630)
+ ("CANADIAN SYLLABICS CARRIER KKI" . 5631)
+ ("CANADIAN SYLLABICS CARRIER KKA" . 5632)
+ ("CANADIAN SYLLABICS CARRIER KK" . 5633)
+ ("CANADIAN SYLLABICS CARRIER NU" . 5634)
+ ("CANADIAN SYLLABICS CARRIER NO" . 5635)
+ ("CANADIAN SYLLABICS CARRIER NE" . 5636)
+ ("CANADIAN SYLLABICS CARRIER NEE" . 5637)
+ ("CANADIAN SYLLABICS CARRIER NI" . 5638)
+ ("CANADIAN SYLLABICS CARRIER NA" . 5639)
+ ("CANADIAN SYLLABICS CARRIER MU" . 5640)
+ ("CANADIAN SYLLABICS CARRIER MO" . 5641)
+ ("CANADIAN SYLLABICS CARRIER ME" . 5642)
+ ("CANADIAN SYLLABICS CARRIER MEE" . 5643)
+ ("CANADIAN SYLLABICS CARRIER MI" . 5644)
+ ("CANADIAN SYLLABICS CARRIER MA" . 5645)
+ ("CANADIAN SYLLABICS CARRIER YU" . 5646)
+ ("CANADIAN SYLLABICS CARRIER YO" . 5647)
+ ("CANADIAN SYLLABICS CARRIER YE" . 5648)
+ ("CANADIAN SYLLABICS CARRIER YEE" . 5649)
+ ("CANADIAN SYLLABICS CARRIER YI" . 5650)
+ ("CANADIAN SYLLABICS CARRIER YA" . 5651)
+ ("CANADIAN SYLLABICS CARRIER JU" . 5652)
+ ("CANADIAN SYLLABICS SAYISI JU" . 5653)
+ ("CANADIAN SYLLABICS CARRIER JO" . 5654)
+ ("CANADIAN SYLLABICS CARRIER JE" . 5655)
+ ("CANADIAN SYLLABICS CARRIER JEE" . 5656)
+ ("CANADIAN SYLLABICS CARRIER JI" . 5657)
+ ("CANADIAN SYLLABICS SAYISI JI" . 5658)
+ ("CANADIAN SYLLABICS CARRIER JA" . 5659)
+ ("CANADIAN SYLLABICS CARRIER JJU" . 5660)
+ ("CANADIAN SYLLABICS CARRIER JJO" . 5661)
+ ("CANADIAN SYLLABICS CARRIER JJE" . 5662)
+ ("CANADIAN SYLLABICS CARRIER JJEE" . 5663)
+ ("CANADIAN SYLLABICS CARRIER JJI" . 5664)
+ ("CANADIAN SYLLABICS CARRIER JJA" . 5665)
+ ("CANADIAN SYLLABICS CARRIER LU" . 5666)
+ ("CANADIAN SYLLABICS CARRIER LO" . 5667)
+ ("CANADIAN SYLLABICS CARRIER LE" . 5668)
+ ("CANADIAN SYLLABICS CARRIER LEE" . 5669)
+ ("CANADIAN SYLLABICS CARRIER LI" . 5670)
+ ("CANADIAN SYLLABICS CARRIER LA" . 5671)
+ ("CANADIAN SYLLABICS CARRIER DLU" . 5672)
+ ("CANADIAN SYLLABICS CARRIER DLO" . 5673)
+ ("CANADIAN SYLLABICS CARRIER DLE" . 5674)
+ ("CANADIAN SYLLABICS CARRIER DLEE" . 5675)
+ ("CANADIAN SYLLABICS CARRIER DLI" . 5676)
+ ("CANADIAN SYLLABICS CARRIER DLA" . 5677)
+ ("CANADIAN SYLLABICS CARRIER LHU" . 5678)
+ ("CANADIAN SYLLABICS CARRIER LHO" . 5679)
+ ("CANADIAN SYLLABICS CARRIER LHE" . 5680)
+ ("CANADIAN SYLLABICS CARRIER LHEE" . 5681)
+ ("CANADIAN SYLLABICS CARRIER LHI" . 5682)
+ ("CANADIAN SYLLABICS CARRIER LHA" . 5683)
+ ("CANADIAN SYLLABICS CARRIER TLHU" . 5684)
+ ("CANADIAN SYLLABICS CARRIER TLHO" . 5685)
+ ("CANADIAN SYLLABICS CARRIER TLHE" . 5686)
+ ("CANADIAN SYLLABICS CARRIER TLHEE" . 5687)
+ ("CANADIAN SYLLABICS CARRIER TLHI" . 5688)
+ ("CANADIAN SYLLABICS CARRIER TLHA" . 5689)
+ ("CANADIAN SYLLABICS CARRIER TLU" . 5690)
+ ("CANADIAN SYLLABICS CARRIER TLO" . 5691)
+ ("CANADIAN SYLLABICS CARRIER TLE" . 5692)
+ ("CANADIAN SYLLABICS CARRIER TLEE" . 5693)
+ ("CANADIAN SYLLABICS CARRIER TLI" . 5694)
+ ("CANADIAN SYLLABICS CARRIER TLA" . 5695)
+ ("CANADIAN SYLLABICS CARRIER ZU" . 5696)
+ ("CANADIAN SYLLABICS CARRIER ZO" . 5697)
+ ("CANADIAN SYLLABICS CARRIER ZE" . 5698)
+ ("CANADIAN SYLLABICS CARRIER ZEE" . 5699)
+ ("CANADIAN SYLLABICS CARRIER ZI" . 5700)
+ ("CANADIAN SYLLABICS CARRIER ZA" . 5701)
+ ("CANADIAN SYLLABICS CARRIER Z" . 5702)
+ ("CANADIAN SYLLABICS CARRIER INITIAL Z" . 5703)
+ ("CANADIAN SYLLABICS CARRIER DZU" . 5704)
+ ("CANADIAN SYLLABICS CARRIER DZO" . 5705)
+ ("CANADIAN SYLLABICS CARRIER DZE" . 5706)
+ ("CANADIAN SYLLABICS CARRIER DZEE" . 5707)
+ ("CANADIAN SYLLABICS CARRIER DZI" . 5708)
+ ("CANADIAN SYLLABICS CARRIER DZA" . 5709)
+ ("CANADIAN SYLLABICS CARRIER SU" . 5710)
+ ("CANADIAN SYLLABICS CARRIER SO" . 5711)
+ ("CANADIAN SYLLABICS CARRIER SE" . 5712)
+ ("CANADIAN SYLLABICS CARRIER SEE" . 5713)
+ ("CANADIAN SYLLABICS CARRIER SI" . 5714)
+ ("CANADIAN SYLLABICS CARRIER SA" . 5715)
+ ("CANADIAN SYLLABICS CARRIER SHU" . 5716)
+ ("CANADIAN SYLLABICS CARRIER SHO" . 5717)
+ ("CANADIAN SYLLABICS CARRIER SHE" . 5718)
+ ("CANADIAN SYLLABICS CARRIER SHEE" . 5719)
+ ("CANADIAN SYLLABICS CARRIER SHI" . 5720)
+ ("CANADIAN SYLLABICS CARRIER SHA" . 5721)
+ ("CANADIAN SYLLABICS CARRIER SH" . 5722)
+ ("CANADIAN SYLLABICS CARRIER TSU" . 5723)
+ ("CANADIAN SYLLABICS CARRIER TSO" . 5724)
+ ("CANADIAN SYLLABICS CARRIER TSE" . 5725)
+ ("CANADIAN SYLLABICS CARRIER TSEE" . 5726)
+ ("CANADIAN SYLLABICS CARRIER TSI" . 5727)
+ ("CANADIAN SYLLABICS CARRIER TSA" . 5728)
+ ("CANADIAN SYLLABICS CARRIER CHU" . 5729)
+ ("CANADIAN SYLLABICS CARRIER CHO" . 5730)
+ ("CANADIAN SYLLABICS CARRIER CHE" . 5731)
+ ("CANADIAN SYLLABICS CARRIER CHEE" . 5732)
+ ("CANADIAN SYLLABICS CARRIER CHI" . 5733)
+ ("CANADIAN SYLLABICS CARRIER CHA" . 5734)
+ ("CANADIAN SYLLABICS CARRIER TTSU" . 5735)
+ ("CANADIAN SYLLABICS CARRIER TTSO" . 5736)
+ ("CANADIAN SYLLABICS CARRIER TTSE" . 5737)
+ ("CANADIAN SYLLABICS CARRIER TTSEE" . 5738)
+ ("CANADIAN SYLLABICS CARRIER TTSI" . 5739)
+ ("CANADIAN SYLLABICS CARRIER TTSA" . 5740)
+ ("CANADIAN SYLLABICS CHI SIGN" . 5741)
+ ("CANADIAN SYLLABICS FULL STOP" . 5742)
+ ("CANADIAN SYLLABICS QAI" . 5743)
+ ("CANADIAN SYLLABICS NGAI" . 5744)
+ ("CANADIAN SYLLABICS NNGI" . 5745)
+ ("CANADIAN SYLLABICS NNGII" . 5746)
+ ("CANADIAN SYLLABICS NNGO" . 5747)
+ ("CANADIAN SYLLABICS NNGOO" . 5748)
+ ("CANADIAN SYLLABICS NNGA" . 5749)
+ ("CANADIAN SYLLABICS NNGAA" . 5750)
+ ("OGHAM SPACE MARK" . 5760)
+ ("OGHAM LETTER BEITH" . 5761)
+ ("OGHAM LETTER LUIS" . 5762)
+ ("OGHAM LETTER FEARN" . 5763)
+ ("OGHAM LETTER SAIL" . 5764)
+ ("OGHAM LETTER NION" . 5765)
+ ("OGHAM LETTER UATH" . 5766)
+ ("OGHAM LETTER DAIR" . 5767)
+ ("OGHAM LETTER TINNE" . 5768)
+ ("OGHAM LETTER COLL" . 5769)
+ ("OGHAM LETTER CEIRT" . 5770)
+ ("OGHAM LETTER MUIN" . 5771)
+ ("OGHAM LETTER GORT" . 5772)
+ ("OGHAM LETTER NGEADAL" . 5773)
+ ("OGHAM LETTER STRAIF" . 5774)
+ ("OGHAM LETTER RUIS" . 5775)
+ ("OGHAM LETTER AILM" . 5776)
+ ("OGHAM LETTER ONN" . 5777)
+ ("OGHAM LETTER UR" . 5778)
+ ("OGHAM LETTER EADHADH" . 5779)
+ ("OGHAM LETTER IODHADH" . 5780)
+ ("OGHAM LETTER EABHADH" . 5781)
+ ("OGHAM LETTER OR" . 5782)
+ ("OGHAM LETTER UILLEANN" . 5783)
+ ("OGHAM LETTER IFIN" . 5784)
+ ("OGHAM LETTER EAMHANCHOLL" . 5785)
+ ("OGHAM LETTER PEITH" . 5786)
+ ("OGHAM FEATHER MARK" . 5787)
+ ("OGHAM REVERSED FEATHER MARK" . 5788)
+ ("RUNIC LETTER FEHU FEOH FE F" . 5792)
+ ("RUNIC LETTER V" . 5793)
+ ("RUNIC LETTER URUZ UR U" . 5794)
+ ("RUNIC LETTER YR" . 5795)
+ ("RUNIC LETTER Y" . 5796)
+ ("RUNIC LETTER W" . 5797)
+ ("RUNIC LETTER THURISAZ THURS THORN" . 5798)
+ ("RUNIC LETTER ETH" . 5799)
+ ("RUNIC LETTER ANSUZ A" . 5800)
+ ("RUNIC LETTER OS O" . 5801)
+ ("RUNIC LETTER AC A" . 5802)
+ ("RUNIC LETTER AESC" . 5803)
+ ("RUNIC LETTER LONG-BRANCH-OSS O" . 5804)
+ ("RUNIC LETTER SHORT-TWIG-OSS O" . 5805)
+ ("RUNIC LETTER O" . 5806)
+ ("RUNIC LETTER OE" . 5807)
+ ("RUNIC LETTER ON" . 5808)
+ ("RUNIC LETTER RAIDO RAD REID R" . 5809)
+ ("RUNIC LETTER KAUNA" . 5810)
+ ("RUNIC LETTER CEN" . 5811)
+ ("RUNIC LETTER KAUN K" . 5812)
+ ("RUNIC LETTER G" . 5813)
+ ("RUNIC LETTER ENG" . 5814)
+ ("RUNIC LETTER GEBO GYFU G" . 5815)
+ ("RUNIC LETTER GAR" . 5816)
+ ("RUNIC LETTER WUNJO WYNN W" . 5817)
+ ("RUNIC LETTER HAGLAZ H" . 5818)
+ ("RUNIC LETTER HAEGL H" . 5819)
+ ("RUNIC LETTER LONG-BRANCH-HAGALL H" . 5820)
+ ("RUNIC LETTER SHORT-TWIG-HAGALL H" . 5821)
+ ("RUNIC LETTER NAUDIZ NYD NAUD N" . 5822)
+ ("RUNIC LETTER SHORT-TWIG-NAUD N" . 5823)
+ ("RUNIC LETTER DOTTED-N" . 5824)
+ ("RUNIC LETTER ISAZ IS ISS I" . 5825)
+ ("RUNIC LETTER E" . 5826)
+ ("RUNIC LETTER JERAN J" . 5827)
+ ("RUNIC LETTER GER" . 5828)
+ ("RUNIC LETTER LONG-BRANCH-AR AE" . 5829)
+ ("RUNIC LETTER SHORT-TWIG-AR A" . 5830)
+ ("RUNIC LETTER IWAZ EOH" . 5831)
+ ("RUNIC LETTER PERTHO PEORTH P" . 5832)
+ ("RUNIC LETTER ALGIZ EOLHX" . 5833)
+ ("RUNIC LETTER SOWILO S" . 5834)
+ ("RUNIC LETTER SIGEL LONG-BRANCH-SOL S" . 5835)
+ ("RUNIC LETTER SHORT-TWIG-SOL S" . 5836)
+ ("RUNIC LETTER C" . 5837)
+ ("RUNIC LETTER Z" . 5838)
+ ("RUNIC LETTER TIWAZ TIR TYR T" . 5839)
+ ("RUNIC LETTER SHORT-TWIG-TYR T" . 5840)
+ ("RUNIC LETTER D" . 5841)
+ ("RUNIC LETTER BERKANAN BEORC BJARKAN B" . 5842)
+ ("RUNIC LETTER SHORT-TWIG-BJARKAN B" . 5843)
+ ("RUNIC LETTER DOTTED-P" . 5844)
+ ("RUNIC LETTER OPEN-P" . 5845)
+ ("RUNIC LETTER EHWAZ EH E" . 5846)
+ ("RUNIC LETTER MANNAZ MAN M" . 5847)
+ ("RUNIC LETTER LONG-BRANCH-MADR M" . 5848)
+ ("RUNIC LETTER SHORT-TWIG-MADR M" . 5849)
+ ("RUNIC LETTER LAUKAZ LAGU LOGR L" . 5850)
+ ("RUNIC LETTER DOTTED-L" . 5851)
+ ("RUNIC LETTER INGWAZ" . 5852)
+ ("RUNIC LETTER ING" . 5853)
+ ("RUNIC LETTER DAGAZ DAEG D" . 5854)
+ ("RUNIC LETTER OTHALAN ETHEL O" . 5855)
+ ("RUNIC LETTER EAR" . 5856)
+ ("RUNIC LETTER IOR" . 5857)
+ ("RUNIC LETTER CWEORTH" . 5858)
+ ("RUNIC LETTER CALC" . 5859)
+ ("RUNIC LETTER CEALC" . 5860)
+ ("RUNIC LETTER STAN" . 5861)
+ ("RUNIC LETTER LONG-BRANCH-YR" . 5862)
+ ("RUNIC LETTER SHORT-TWIG-YR" . 5863)
+ ("RUNIC LETTER ICELANDIC-YR" . 5864)
+ ("RUNIC LETTER Q" . 5865)
+ ("RUNIC LETTER X" . 5866)
+ ("RUNIC SINGLE PUNCTUATION" . 5867)
+ ("RUNIC MULTIPLE PUNCTUATION" . 5868)
+ ("RUNIC CROSS PUNCTUATION" . 5869)
+ ("RUNIC ARLAUG SYMBOL" . 5870)
+ ("RUNIC TVIMADUR SYMBOL" . 5871)
+ ("RUNIC BELGTHOR SYMBOL" . 5872)
+ ("TAGALOG LETTER A" . 5888)
+ ("TAGALOG LETTER I" . 5889)
+ ("TAGALOG LETTER U" . 5890)
+ ("TAGALOG LETTER KA" . 5891)
+ ("TAGALOG LETTER GA" . 5892)
+ ("TAGALOG LETTER NGA" . 5893)
+ ("TAGALOG LETTER TA" . 5894)
+ ("TAGALOG LETTER DA" . 5895)
+ ("TAGALOG LETTER NA" . 5896)
+ ("TAGALOG LETTER PA" . 5897)
+ ("TAGALOG LETTER BA" . 5898)
+ ("TAGALOG LETTER MA" . 5899)
+ ("TAGALOG LETTER YA" . 5900)
+ ("TAGALOG LETTER LA" . 5902)
+ ("TAGALOG LETTER WA" . 5903)
+ ("TAGALOG LETTER SA" . 5904)
+ ("TAGALOG LETTER HA" . 5905)
+ ("TAGALOG VOWEL SIGN I" . 5906)
+ ("TAGALOG VOWEL SIGN U" . 5907)
+ ("TAGALOG SIGN VIRAMA" . 5908)
+ ("HANUNOO LETTER A" . 5920)
+ ("HANUNOO LETTER I" . 5921)
+ ("HANUNOO LETTER U" . 5922)
+ ("HANUNOO LETTER KA" . 5923)
+ ("HANUNOO LETTER GA" . 5924)
+ ("HANUNOO LETTER NGA" . 5925)
+ ("HANUNOO LETTER TA" . 5926)
+ ("HANUNOO LETTER DA" . 5927)
+ ("HANUNOO LETTER NA" . 5928)
+ ("HANUNOO LETTER PA" . 5929)
+ ("HANUNOO LETTER BA" . 5930)
+ ("HANUNOO LETTER MA" . 5931)
+ ("HANUNOO LETTER YA" . 5932)
+ ("HANUNOO LETTER RA" . 5933)
+ ("HANUNOO LETTER LA" . 5934)
+ ("HANUNOO LETTER WA" . 5935)
+ ("HANUNOO LETTER SA" . 5936)
+ ("HANUNOO LETTER HA" . 5937)
+ ("HANUNOO VOWEL SIGN I" . 5938)
+ ("HANUNOO VOWEL SIGN U" . 5939)
+ ("HANUNOO SIGN PAMUDPOD" . 5940)
+ ("PHILIPPINE SINGLE PUNCTUATION" . 5941)
+ ("PHILIPPINE DOUBLE PUNCTUATION" . 5942)
+ ("BUHID LETTER A" . 5952)
+ ("BUHID LETTER I" . 5953)
+ ("BUHID LETTER U" . 5954)
+ ("BUHID LETTER KA" . 5955)
+ ("BUHID LETTER GA" . 5956)
+ ("BUHID LETTER NGA" . 5957)
+ ("BUHID LETTER TA" . 5958)
+ ("BUHID LETTER DA" . 5959)
+ ("BUHID LETTER NA" . 5960)
+ ("BUHID LETTER PA" . 5961)
+ ("BUHID LETTER BA" . 5962)
+ ("BUHID LETTER MA" . 5963)
+ ("BUHID LETTER YA" . 5964)
+ ("BUHID LETTER RA" . 5965)
+ ("BUHID LETTER LA" . 5966)
+ ("BUHID LETTER WA" . 5967)
+ ("BUHID LETTER SA" . 5968)
+ ("BUHID LETTER HA" . 5969)
+ ("BUHID VOWEL SIGN I" . 5970)
+ ("BUHID VOWEL SIGN U" . 5971)
+ ("TAGBANWA LETTER A" . 5984)
+ ("TAGBANWA LETTER I" . 5985)
+ ("TAGBANWA LETTER U" . 5986)
+ ("TAGBANWA LETTER KA" . 5987)
+ ("TAGBANWA LETTER GA" . 5988)
+ ("TAGBANWA LETTER NGA" . 5989)
+ ("TAGBANWA LETTER TA" . 5990)
+ ("TAGBANWA LETTER DA" . 5991)
+ ("TAGBANWA LETTER NA" . 5992)
+ ("TAGBANWA LETTER PA" . 5993)
+ ("TAGBANWA LETTER BA" . 5994)
+ ("TAGBANWA LETTER MA" . 5995)
+ ("TAGBANWA LETTER YA" . 5996)
+ ("TAGBANWA LETTER LA" . 5998)
+ ("TAGBANWA LETTER WA" . 5999)
+ ("TAGBANWA LETTER SA" . 6000)
+ ("TAGBANWA VOWEL SIGN I" . 6002)
+ ("TAGBANWA VOWEL SIGN U" . 6003)
+ ("KHMER LETTER KA" . 6016)
+ ("KHMER LETTER KHA" . 6017)
+ ("KHMER LETTER KO" . 6018)
+ ("KHMER LETTER KHO" . 6019)
+ ("KHMER LETTER NGO" . 6020)
+ ("KHMER LETTER CA" . 6021)
+ ("KHMER LETTER CHA" . 6022)
+ ("KHMER LETTER CO" . 6023)
+ ("KHMER LETTER CHO" . 6024)
+ ("KHMER LETTER NYO" . 6025)
+ ("KHMER LETTER DA" . 6026)
+ ("KHMER LETTER TTHA" . 6027)
+ ("KHMER LETTER DO" . 6028)
+ ("KHMER LETTER TTHO" . 6029)
+ ("KHMER LETTER NNO" . 6030)
+ ("KHMER LETTER TA" . 6031)
+ ("KHMER LETTER THA" . 6032)
+ ("KHMER LETTER TO" . 6033)
+ ("KHMER LETTER THO" . 6034)
+ ("KHMER LETTER NO" . 6035)
+ ("KHMER LETTER BA" . 6036)
+ ("KHMER LETTER PHA" . 6037)
+ ("KHMER LETTER PO" . 6038)
+ ("KHMER LETTER PHO" . 6039)
+ ("KHMER LETTER MO" . 6040)
+ ("KHMER LETTER YO" . 6041)
+ ("KHMER LETTER RO" . 6042)
+ ("KHMER LETTER LO" . 6043)
+ ("KHMER LETTER VO" . 6044)
+ ("KHMER LETTER SHA" . 6045)
+ ("KHMER LETTER SSO" . 6046)
+ ("KHMER LETTER SA" . 6047)
+ ("KHMER LETTER HA" . 6048)
+ ("KHMER LETTER LA" . 6049)
+ ("KHMER LETTER QA" . 6050)
+ ("KHMER INDEPENDENT VOWEL QAQ" . 6051)
+ ("KHMER INDEPENDENT VOWEL QAA" . 6052)
+ ("KHMER INDEPENDENT VOWEL QI" . 6053)
+ ("KHMER INDEPENDENT VOWEL QII" . 6054)
+ ("KHMER INDEPENDENT VOWEL QU" . 6055)
+ ("KHMER INDEPENDENT VOWEL QUK" . 6056)
+ ("KHMER INDEPENDENT VOWEL QUU" . 6057)
+ ("KHMER INDEPENDENT VOWEL QUUV" . 6058)
+ ("KHMER INDEPENDENT VOWEL RY" . 6059)
+ ("KHMER INDEPENDENT VOWEL RYY" . 6060)
+ ("KHMER INDEPENDENT VOWEL LY" . 6061)
+ ("KHMER INDEPENDENT VOWEL LYY" . 6062)
+ ("KHMER INDEPENDENT VOWEL QE" . 6063)
+ ("KHMER INDEPENDENT VOWEL QAI" . 6064)
+ ("KHMER INDEPENDENT VOWEL QOO TYPE ONE" . 6065)
+ ("KHMER INDEPENDENT VOWEL QOO TYPE TWO" . 6066)
+ ("KHMER INDEPENDENT VOWEL QAU" . 6067)
+ ("KHMER VOWEL INHERENT AQ" . 6068)
+ ("KHMER VOWEL INHERENT AA" . 6069)
+ ("KHMER VOWEL SIGN AA" . 6070)
+ ("KHMER VOWEL SIGN I" . 6071)
+ ("KHMER VOWEL SIGN II" . 6072)
+ ("KHMER VOWEL SIGN Y" . 6073)
+ ("KHMER VOWEL SIGN YY" . 6074)
+ ("KHMER VOWEL SIGN U" . 6075)
+ ("KHMER VOWEL SIGN UU" . 6076)
+ ("KHMER VOWEL SIGN UA" . 6077)
+ ("KHMER VOWEL SIGN OE" . 6078)
+ ("KHMER VOWEL SIGN YA" . 6079)
+ ("KHMER VOWEL SIGN IE" . 6080)
+ ("KHMER VOWEL SIGN E" . 6081)
+ ("KHMER VOWEL SIGN AE" . 6082)
+ ("KHMER VOWEL SIGN AI" . 6083)
+ ("KHMER VOWEL SIGN OO" . 6084)
+ ("KHMER VOWEL SIGN AU" . 6085)
+ ("KHMER SIGN NIKAHIT" . 6086)
+ ("KHMER SIGN REAHMUK" . 6087)
+ ("KHMER SIGN YUUKALEAPINTU" . 6088)
+ ("KHMER SIGN MUUSIKATOAN" . 6089)
+ ("KHMER SIGN TRIISAP" . 6090)
+ ("KHMER SIGN BANTOC" . 6091)
+ ("KHMER SIGN ROBAT" . 6092)
+ ("KHMER SIGN TOANDAKHIAT" . 6093)
+ ("KHMER SIGN KAKABAT" . 6094)
+ ("KHMER SIGN AHSDA" . 6095)
+ ("KHMER SIGN SAMYOK SANNYA" . 6096)
+ ("KHMER SIGN VIRIAM" . 6097)
+ ("KHMER SIGN COENG" . 6098)
+ ("KHMER SIGN BATHAMASAT" . 6099)
+ ("KHMER SIGN KHAN" . 6100)
+ ("KHMER SIGN BARIYOOSAN" . 6101)
+ ("KHMER SIGN CAMNUC PII KUUH" . 6102)
+ ("KHMER SIGN LEK TOO" . 6103)
+ ("KHMER SIGN BEYYAL" . 6104)
+ ("KHMER SIGN PHNAEK MUAN" . 6105)
+ ("KHMER SIGN KOOMUUT" . 6106)
+ ("KHMER CURRENCY SYMBOL RIEL" . 6107)
+ ("KHMER SIGN AVAKRAHASANYA" . 6108)
+ ("KHMER DIGIT ZERO" . 6112)
+ ("KHMER DIGIT ONE" . 6113)
+ ("KHMER DIGIT TWO" . 6114)
+ ("KHMER DIGIT THREE" . 6115)
+ ("KHMER DIGIT FOUR" . 6116)
+ ("KHMER DIGIT FIVE" . 6117)
+ ("KHMER DIGIT SIX" . 6118)
+ ("KHMER DIGIT SEVEN" . 6119)
+ ("KHMER DIGIT EIGHT" . 6120)
+ ("KHMER DIGIT NINE" . 6121)
+ ("MONGOLIAN BIRGA" . 6144)
+ ("MONGOLIAN ELLIPSIS" . 6145)
+ ("MONGOLIAN COMMA" . 6146)
+ ("MONGOLIAN FULL STOP" . 6147)
+ ("MONGOLIAN COLON" . 6148)
+ ("MONGOLIAN FOUR DOTS" . 6149)
+ ("MONGOLIAN TODO SOFT HYPHEN" . 6150)
+ ("MONGOLIAN SIBE SYLLABLE BOUNDARY MARKER" . 6151)
+ ("MONGOLIAN MANCHU COMMA" . 6152)
+ ("MONGOLIAN MANCHU FULL STOP" . 6153)
+ ("MONGOLIAN NIRUGU" . 6154)
+ ("MONGOLIAN FREE VARIATION SELECTOR ONE" . 6155)
+ ("MONGOLIAN FREE VARIATION SELECTOR TWO" . 6156)
+ ("MONGOLIAN FREE VARIATION SELECTOR THREE" . 6157)
+ ("MONGOLIAN VOWEL SEPARATOR" . 6158)
+ ("MONGOLIAN DIGIT ZERO" . 6160)
+ ("MONGOLIAN DIGIT ONE" . 6161)
+ ("MONGOLIAN DIGIT TWO" . 6162)
+ ("MONGOLIAN DIGIT THREE" . 6163)
+ ("MONGOLIAN DIGIT FOUR" . 6164)
+ ("MONGOLIAN DIGIT FIVE" . 6165)
+ ("MONGOLIAN DIGIT SIX" . 6166)
+ ("MONGOLIAN DIGIT SEVEN" . 6167)
+ ("MONGOLIAN DIGIT EIGHT" . 6168)
+ ("MONGOLIAN DIGIT NINE" . 6169)
+ ("MONGOLIAN LETTER A" . 6176)
+ ("MONGOLIAN LETTER E" . 6177)
+ ("MONGOLIAN LETTER I" . 6178)
+ ("MONGOLIAN LETTER O" . 6179)
+ ("MONGOLIAN LETTER U" . 6180)
+ ("MONGOLIAN LETTER OE" . 6181)
+ ("MONGOLIAN LETTER UE" . 6182)
+ ("MONGOLIAN LETTER EE" . 6183)
+ ("MONGOLIAN LETTER NA" . 6184)
+ ("MONGOLIAN LETTER ANG" . 6185)
+ ("MONGOLIAN LETTER BA" . 6186)
+ ("MONGOLIAN LETTER PA" . 6187)
+ ("MONGOLIAN LETTER QA" . 6188)
+ ("MONGOLIAN LETTER GA" . 6189)
+ ("MONGOLIAN LETTER MA" . 6190)
+ ("MONGOLIAN LETTER LA" . 6191)
+ ("MONGOLIAN LETTER SA" . 6192)
+ ("MONGOLIAN LETTER SHA" . 6193)
+ ("MONGOLIAN LETTER TA" . 6194)
+ ("MONGOLIAN LETTER DA" . 6195)
+ ("MONGOLIAN LETTER CHA" . 6196)
+ ("MONGOLIAN LETTER JA" . 6197)
+ ("MONGOLIAN LETTER YA" . 6198)
+ ("MONGOLIAN LETTER RA" . 6199)
+ ("MONGOLIAN LETTER WA" . 6200)
+ ("MONGOLIAN LETTER FA" . 6201)
+ ("MONGOLIAN LETTER KA" . 6202)
+ ("MONGOLIAN LETTER KHA" . 6203)
+ ("MONGOLIAN LETTER TSA" . 6204)
+ ("MONGOLIAN LETTER ZA" . 6205)
+ ("MONGOLIAN LETTER HAA" . 6206)
+ ("MONGOLIAN LETTER ZRA" . 6207)
+ ("MONGOLIAN LETTER LHA" . 6208)
+ ("MONGOLIAN LETTER ZHI" . 6209)
+ ("MONGOLIAN LETTER CHI" . 6210)
+ ("MONGOLIAN LETTER TODO LONG VOWEL SIGN" . 6211)
+ ("MONGOLIAN LETTER TODO E" . 6212)
+ ("MONGOLIAN LETTER TODO I" . 6213)
+ ("MONGOLIAN LETTER TODO O" . 6214)
+ ("MONGOLIAN LETTER TODO U" . 6215)
+ ("MONGOLIAN LETTER TODO OE" . 6216)
+ ("MONGOLIAN LETTER TODO UE" . 6217)
+ ("MONGOLIAN LETTER TODO ANG" . 6218)
+ ("MONGOLIAN LETTER TODO BA" . 6219)
+ ("MONGOLIAN LETTER TODO PA" . 6220)
+ ("MONGOLIAN LETTER TODO QA" . 6221)
+ ("MONGOLIAN LETTER TODO GA" . 6222)
+ ("MONGOLIAN LETTER TODO MA" . 6223)
+ ("MONGOLIAN LETTER TODO TA" . 6224)
+ ("MONGOLIAN LETTER TODO DA" . 6225)
+ ("MONGOLIAN LETTER TODO CHA" . 6226)
+ ("MONGOLIAN LETTER TODO JA" . 6227)
+ ("MONGOLIAN LETTER TODO TSA" . 6228)
+ ("MONGOLIAN LETTER TODO YA" . 6229)
+ ("MONGOLIAN LETTER TODO WA" . 6230)
+ ("MONGOLIAN LETTER TODO KA" . 6231)
+ ("MONGOLIAN LETTER TODO GAA" . 6232)
+ ("MONGOLIAN LETTER TODO HAA" . 6233)
+ ("MONGOLIAN LETTER TODO JIA" . 6234)
+ ("MONGOLIAN LETTER TODO NIA" . 6235)
+ ("MONGOLIAN LETTER TODO DZA" . 6236)
+ ("MONGOLIAN LETTER SIBE E" . 6237)
+ ("MONGOLIAN LETTER SIBE I" . 6238)
+ ("MONGOLIAN LETTER SIBE IY" . 6239)
+ ("MONGOLIAN LETTER SIBE UE" . 6240)
+ ("MONGOLIAN LETTER SIBE U" . 6241)
+ ("MONGOLIAN LETTER SIBE ANG" . 6242)
+ ("MONGOLIAN LETTER SIBE KA" . 6243)
+ ("MONGOLIAN LETTER SIBE GA" . 6244)
+ ("MONGOLIAN LETTER SIBE HA" . 6245)
+ ("MONGOLIAN LETTER SIBE PA" . 6246)
+ ("MONGOLIAN LETTER SIBE SHA" . 6247)
+ ("MONGOLIAN LETTER SIBE TA" . 6248)
+ ("MONGOLIAN LETTER SIBE DA" . 6249)
+ ("MONGOLIAN LETTER SIBE JA" . 6250)
+ ("MONGOLIAN LETTER SIBE FA" . 6251)
+ ("MONGOLIAN LETTER SIBE GAA" . 6252)
+ ("MONGOLIAN LETTER SIBE HAA" . 6253)
+ ("MONGOLIAN LETTER SIBE TSA" . 6254)
+ ("MONGOLIAN LETTER SIBE ZA" . 6255)
+ ("MONGOLIAN LETTER SIBE RAA" . 6256)
+ ("MONGOLIAN LETTER SIBE CHA" . 6257)
+ ("MONGOLIAN LETTER SIBE ZHA" . 6258)
+ ("MONGOLIAN LETTER MANCHU I" . 6259)
+ ("MONGOLIAN LETTER MANCHU KA" . 6260)
+ ("MONGOLIAN LETTER MANCHU RA" . 6261)
+ ("MONGOLIAN LETTER MANCHU FA" . 6262)
+ ("MONGOLIAN LETTER MANCHU ZHA" . 6263)
+ ("MONGOLIAN LETTER ALI GALI ANUSVARA ONE" . 6272)
+ ("MONGOLIAN LETTER ALI GALI VISARGA ONE" . 6273)
+ ("MONGOLIAN LETTER ALI GALI DAMARU" . 6274)
+ ("MONGOLIAN LETTER ALI GALI UBADAMA" . 6275)
+ ("MONGOLIAN LETTER ALI GALI INVERTED UBADAMA" . 6276)
+ ("MONGOLIAN LETTER ALI GALI BALUDA" . 6277)
+ ("MONGOLIAN LETTER ALI GALI THREE BALUDA" . 6278)
+ ("MONGOLIAN LETTER ALI GALI A" . 6279)
+ ("MONGOLIAN LETTER ALI GALI I" . 6280)
+ ("MONGOLIAN LETTER ALI GALI KA" . 6281)
+ ("MONGOLIAN LETTER ALI GALI NGA" . 6282)
+ ("MONGOLIAN LETTER ALI GALI CA" . 6283)
+ ("MONGOLIAN LETTER ALI GALI TTA" . 6284)
+ ("MONGOLIAN LETTER ALI GALI TTHA" . 6285)
+ ("MONGOLIAN LETTER ALI GALI DDA" . 6286)
+ ("MONGOLIAN LETTER ALI GALI NNA" . 6287)
+ ("MONGOLIAN LETTER ALI GALI TA" . 6288)
+ ("MONGOLIAN LETTER ALI GALI DA" . 6289)
+ ("MONGOLIAN LETTER ALI GALI PA" . 6290)
+ ("MONGOLIAN LETTER ALI GALI PHA" . 6291)
+ ("MONGOLIAN LETTER ALI GALI SSA" . 6292)
+ ("MONGOLIAN LETTER ALI GALI ZHA" . 6293)
+ ("MONGOLIAN LETTER ALI GALI ZA" . 6294)
+ ("MONGOLIAN LETTER ALI GALI AH" . 6295)
+ ("MONGOLIAN LETTER TODO ALI GALI TA" . 6296)
+ ("MONGOLIAN LETTER TODO ALI GALI ZHA" . 6297)
+ ("MONGOLIAN LETTER MANCHU ALI GALI GHA" . 6298)
+ ("MONGOLIAN LETTER MANCHU ALI GALI NGA" . 6299)
+ ("MONGOLIAN LETTER MANCHU ALI GALI CA" . 6300)
+ ("MONGOLIAN LETTER MANCHU ALI GALI JHA" . 6301)
+ ("MONGOLIAN LETTER MANCHU ALI GALI TTA" . 6302)
+ ("MONGOLIAN LETTER MANCHU ALI GALI DDHA" . 6303)
+ ("MONGOLIAN LETTER MANCHU ALI GALI TA" . 6304)
+ ("MONGOLIAN LETTER MANCHU ALI GALI DHA" . 6305)
+ ("MONGOLIAN LETTER MANCHU ALI GALI SSA" . 6306)
+ ("MONGOLIAN LETTER MANCHU ALI GALI CYA" . 6307)
+ ("MONGOLIAN LETTER MANCHU ALI GALI ZHA" . 6308)
+ ("MONGOLIAN LETTER MANCHU ALI GALI ZA" . 6309)
+ ("MONGOLIAN LETTER ALI GALI HALF U" . 6310)
+ ("MONGOLIAN LETTER ALI GALI HALF YA" . 6311)
+ ("MONGOLIAN LETTER MANCHU ALI GALI BHA" . 6312)
+ ("MONGOLIAN LETTER ALI GALI DAGALGA" . 6313)
+ ("LATIN CAPITAL LETTER A WITH RING BELOW" . 7680)
+ ("LATIN SMALL LETTER A WITH RING BELOW" . 7681)
+ ("LATIN CAPITAL LETTER B WITH DOT ABOVE" . 7682)
+ ("LATIN SMALL LETTER B WITH DOT ABOVE" . 7683)
+ ("LATIN CAPITAL LETTER B WITH DOT BELOW" . 7684)
+ ("LATIN SMALL LETTER B WITH DOT BELOW" . 7685)
+ ("LATIN CAPITAL LETTER B WITH LINE BELOW" . 7686)
+ ("LATIN SMALL LETTER B WITH LINE BELOW" . 7687)
+ ("LATIN CAPITAL LETTER C WITH CEDILLA AND ACUTE" . 7688)
+ ("LATIN SMALL LETTER C WITH CEDILLA AND ACUTE" . 7689)
+ ("LATIN CAPITAL LETTER D WITH DOT ABOVE" . 7690)
+ ("LATIN SMALL LETTER D WITH DOT ABOVE" . 7691)
+ ("LATIN CAPITAL LETTER D WITH DOT BELOW" . 7692)
+ ("LATIN SMALL LETTER D WITH DOT BELOW" . 7693)
+ ("LATIN CAPITAL LETTER D WITH LINE BELOW" . 7694)
+ ("LATIN SMALL LETTER D WITH LINE BELOW" . 7695)
+ ("LATIN CAPITAL LETTER D WITH CEDILLA" . 7696)
+ ("LATIN SMALL LETTER D WITH CEDILLA" . 7697)
+ ("LATIN CAPITAL LETTER D WITH CIRCUMFLEX BELOW" . 7698)
+ ("LATIN SMALL LETTER D WITH CIRCUMFLEX BELOW" . 7699)
+ ("LATIN CAPITAL LETTER E WITH MACRON AND GRAVE" . 7700)
+ ("LATIN SMALL LETTER E WITH MACRON AND GRAVE" . 7701)
+ ("LATIN CAPITAL LETTER E WITH MACRON AND ACUTE" . 7702)
+ ("LATIN SMALL LETTER E WITH MACRON AND ACUTE" . 7703)
+ ("LATIN CAPITAL LETTER E WITH CIRCUMFLEX BELOW" . 7704)
+ ("LATIN SMALL LETTER E WITH CIRCUMFLEX BELOW" . 7705)
+ ("LATIN CAPITAL LETTER E WITH TILDE BELOW" . 7706)
+ ("LATIN SMALL LETTER E WITH TILDE BELOW" . 7707)
+ ("LATIN CAPITAL LETTER E WITH CEDILLA AND BREVE" . 7708)
+ ("LATIN SMALL LETTER E WITH CEDILLA AND BREVE" . 7709)
+ ("LATIN CAPITAL LETTER F WITH DOT ABOVE" . 7710)
+ ("LATIN SMALL LETTER F WITH DOT ABOVE" . 7711)
+ ("LATIN CAPITAL LETTER G WITH MACRON" . 7712)
+ ("LATIN SMALL LETTER G WITH MACRON" . 7713)
+ ("LATIN CAPITAL LETTER H WITH DOT ABOVE" . 7714)
+ ("LATIN SMALL LETTER H WITH DOT ABOVE" . 7715)
+ ("LATIN CAPITAL LETTER H WITH DOT BELOW" . 7716)
+ ("LATIN SMALL LETTER H WITH DOT BELOW" . 7717)
+ ("LATIN CAPITAL LETTER H WITH DIAERESIS" . 7718)
+ ("LATIN SMALL LETTER H WITH DIAERESIS" . 7719)
+ ("LATIN CAPITAL LETTER H WITH CEDILLA" . 7720)
+ ("LATIN SMALL LETTER H WITH CEDILLA" . 7721)
+ ("LATIN CAPITAL LETTER H WITH BREVE BELOW" . 7722)
+ ("LATIN SMALL LETTER H WITH BREVE BELOW" . 7723)
+ ("LATIN CAPITAL LETTER I WITH TILDE BELOW" . 7724)
+ ("LATIN SMALL LETTER I WITH TILDE BELOW" . 7725)
+ ("LATIN CAPITAL LETTER I WITH DIAERESIS AND ACUTE" . 7726)
+ ("LATIN SMALL LETTER I WITH DIAERESIS AND ACUTE" . 7727)
+ ("LATIN CAPITAL LETTER K WITH ACUTE" . 7728)
+ ("LATIN SMALL LETTER K WITH ACUTE" . 7729)
+ ("LATIN CAPITAL LETTER K WITH DOT BELOW" . 7730)
+ ("LATIN SMALL LETTER K WITH DOT BELOW" . 7731)
+ ("LATIN CAPITAL LETTER K WITH LINE BELOW" . 7732)
+ ("LATIN SMALL LETTER K WITH LINE BELOW" . 7733)
+ ("LATIN CAPITAL LETTER L WITH DOT BELOW" . 7734)
+ ("LATIN SMALL LETTER L WITH DOT BELOW" . 7735)
+ ("LATIN CAPITAL LETTER L WITH DOT BELOW AND MACRON" . 7736)
+ ("LATIN SMALL LETTER L WITH DOT BELOW AND MACRON" . 7737)
+ ("LATIN CAPITAL LETTER L WITH LINE BELOW" . 7738)
+ ("LATIN SMALL LETTER L WITH LINE BELOW" . 7739)
+ ("LATIN CAPITAL LETTER L WITH CIRCUMFLEX BELOW" . 7740)
+ ("LATIN SMALL LETTER L WITH CIRCUMFLEX BELOW" . 7741)
+ ("LATIN CAPITAL LETTER M WITH ACUTE" . 7742)
+ ("LATIN SMALL LETTER M WITH ACUTE" . 7743)
+ ("LATIN CAPITAL LETTER M WITH DOT ABOVE" . 7744)
+ ("LATIN SMALL LETTER M WITH DOT ABOVE" . 7745)
+ ("LATIN CAPITAL LETTER M WITH DOT BELOW" . 7746)
+ ("LATIN SMALL LETTER M WITH DOT BELOW" . 7747)
+ ("LATIN CAPITAL LETTER N WITH DOT ABOVE" . 7748)
+ ("LATIN SMALL LETTER N WITH DOT ABOVE" . 7749)
+ ("LATIN CAPITAL LETTER N WITH DOT BELOW" . 7750)
+ ("LATIN SMALL LETTER N WITH DOT BELOW" . 7751)
+ ("LATIN CAPITAL LETTER N WITH LINE BELOW" . 7752)
+ ("LATIN SMALL LETTER N WITH LINE BELOW" . 7753)
+ ("LATIN CAPITAL LETTER N WITH CIRCUMFLEX BELOW" . 7754)
+ ("LATIN SMALL LETTER N WITH CIRCUMFLEX BELOW" . 7755)
+ ("LATIN CAPITAL LETTER O WITH TILDE AND ACUTE" . 7756)
+ ("LATIN SMALL LETTER O WITH TILDE AND ACUTE" . 7757)
+ ("LATIN CAPITAL LETTER O WITH TILDE AND DIAERESIS" . 7758)
+ ("LATIN SMALL LETTER O WITH TILDE AND DIAERESIS" . 7759)
+ ("LATIN CAPITAL LETTER O WITH MACRON AND GRAVE" . 7760)
+ ("LATIN SMALL LETTER O WITH MACRON AND GRAVE" . 7761)
+ ("LATIN CAPITAL LETTER O WITH MACRON AND ACUTE" . 7762)
+ ("LATIN SMALL LETTER O WITH MACRON AND ACUTE" . 7763)
+ ("LATIN CAPITAL LETTER P WITH ACUTE" . 7764)
+ ("LATIN SMALL LETTER P WITH ACUTE" . 7765)
+ ("LATIN CAPITAL LETTER P WITH DOT ABOVE" . 7766)
+ ("LATIN SMALL LETTER P WITH DOT ABOVE" . 7767)
+ ("LATIN CAPITAL LETTER R WITH DOT ABOVE" . 7768)
+ ("LATIN SMALL LETTER R WITH DOT ABOVE" . 7769)
+ ("LATIN CAPITAL LETTER R WITH DOT BELOW" . 7770)
+ ("LATIN SMALL LETTER R WITH DOT BELOW" . 7771)
+ ("LATIN CAPITAL LETTER R WITH DOT BELOW AND MACRON" . 7772)
+ ("LATIN SMALL LETTER R WITH DOT BELOW AND MACRON" . 7773)
+ ("LATIN CAPITAL LETTER R WITH LINE BELOW" . 7774)
+ ("LATIN SMALL LETTER R WITH LINE BELOW" . 7775)
+ ("LATIN CAPITAL LETTER S WITH DOT ABOVE" . 7776)
+ ("LATIN SMALL LETTER S WITH DOT ABOVE" . 7777)
+ ("LATIN CAPITAL LETTER S WITH DOT BELOW" . 7778)
+ ("LATIN SMALL LETTER S WITH DOT BELOW" . 7779)
+ ("LATIN CAPITAL LETTER S WITH ACUTE AND DOT ABOVE" . 7780)
+ ("LATIN SMALL LETTER S WITH ACUTE AND DOT ABOVE" . 7781)
+ ("LATIN CAPITAL LETTER S WITH CARON AND DOT ABOVE" . 7782)
+ ("LATIN SMALL LETTER S WITH CARON AND DOT ABOVE" . 7783)
+ ("LATIN CAPITAL LETTER S WITH DOT BELOW AND DOT ABOVE" . 7784)
+ ("LATIN SMALL LETTER S WITH DOT BELOW AND DOT ABOVE" . 7785)
+ ("LATIN CAPITAL LETTER T WITH DOT ABOVE" . 7786)
+ ("LATIN SMALL LETTER T WITH DOT ABOVE" . 7787)
+ ("LATIN CAPITAL LETTER T WITH DOT BELOW" . 7788)
+ ("LATIN SMALL LETTER T WITH DOT BELOW" . 7789)
+ ("LATIN CAPITAL LETTER T WITH LINE BELOW" . 7790)
+ ("LATIN SMALL LETTER T WITH LINE BELOW" . 7791)
+ ("LATIN CAPITAL LETTER T WITH CIRCUMFLEX BELOW" . 7792)
+ ("LATIN SMALL LETTER T WITH CIRCUMFLEX BELOW" . 7793)
+ ("LATIN CAPITAL LETTER U WITH DIAERESIS BELOW" . 7794)
+ ("LATIN SMALL LETTER U WITH DIAERESIS BELOW" . 7795)
+ ("LATIN CAPITAL LETTER U WITH TILDE BELOW" . 7796)
+ ("LATIN SMALL LETTER U WITH TILDE BELOW" . 7797)
+ ("LATIN CAPITAL LETTER U WITH CIRCUMFLEX BELOW" . 7798)
+ ("LATIN SMALL LETTER U WITH CIRCUMFLEX BELOW" . 7799)
+ ("LATIN CAPITAL LETTER U WITH TILDE AND ACUTE" . 7800)
+ ("LATIN SMALL LETTER U WITH TILDE AND ACUTE" . 7801)
+ ("LATIN CAPITAL LETTER U WITH MACRON AND DIAERESIS" . 7802)
+ ("LATIN SMALL LETTER U WITH MACRON AND DIAERESIS" . 7803)
+ ("LATIN CAPITAL LETTER V WITH TILDE" . 7804)
+ ("LATIN SMALL LETTER V WITH TILDE" . 7805)
+ ("LATIN CAPITAL LETTER V WITH DOT BELOW" . 7806)
+ ("LATIN SMALL LETTER V WITH DOT BELOW" . 7807)
+ ("LATIN CAPITAL LETTER W WITH GRAVE" . 7808)
+ ("LATIN SMALL LETTER W WITH GRAVE" . 7809)
+ ("LATIN CAPITAL LETTER W WITH ACUTE" . 7810)
+ ("LATIN SMALL LETTER W WITH ACUTE" . 7811)
+ ("LATIN CAPITAL LETTER W WITH DIAERESIS" . 7812)
+ ("LATIN SMALL LETTER W WITH DIAERESIS" . 7813)
+ ("LATIN CAPITAL LETTER W WITH DOT ABOVE" . 7814)
+ ("LATIN SMALL LETTER W WITH DOT ABOVE" . 7815)
+ ("LATIN CAPITAL LETTER W WITH DOT BELOW" . 7816)
+ ("LATIN SMALL LETTER W WITH DOT BELOW" . 7817)
+ ("LATIN CAPITAL LETTER X WITH DOT ABOVE" . 7818)
+ ("LATIN SMALL LETTER X WITH DOT ABOVE" . 7819)
+ ("LATIN CAPITAL LETTER X WITH DIAERESIS" . 7820)
+ ("LATIN SMALL LETTER X WITH DIAERESIS" . 7821)
+ ("LATIN CAPITAL LETTER Y WITH DOT ABOVE" . 7822)
+ ("LATIN SMALL LETTER Y WITH DOT ABOVE" . 7823)
+ ("LATIN CAPITAL LETTER Z WITH CIRCUMFLEX" . 7824)
+ ("LATIN SMALL LETTER Z WITH CIRCUMFLEX" . 7825)
+ ("LATIN CAPITAL LETTER Z WITH DOT BELOW" . 7826)
+ ("LATIN SMALL LETTER Z WITH DOT BELOW" . 7827)
+ ("LATIN CAPITAL LETTER Z WITH LINE BELOW" . 7828)
+ ("LATIN SMALL LETTER Z WITH LINE BELOW" . 7829)
+ ("LATIN SMALL LETTER H WITH LINE BELOW" . 7830)
+ ("LATIN SMALL LETTER T WITH DIAERESIS" . 7831)
+ ("LATIN SMALL LETTER W WITH RING ABOVE" . 7832)
+ ("LATIN SMALL LETTER Y WITH RING ABOVE" . 7833)
+ ("LATIN SMALL LETTER A WITH RIGHT HALF RING" . 7834)
+ ("LATIN SMALL LETTER LONG S WITH DOT ABOVE" . 7835)
+ ("LATIN CAPITAL LETTER A WITH DOT BELOW" . 7840)
+ ("LATIN SMALL LETTER A WITH DOT BELOW" . 7841)
+ ("LATIN CAPITAL LETTER A WITH HOOK ABOVE" . 7842)
+ ("LATIN SMALL LETTER A WITH HOOK ABOVE" . 7843)
+ ("LATIN CAPITAL LETTER A WITH CIRCUMFLEX AND ACUTE" . 7844)
+ ("LATIN SMALL LETTER A WITH CIRCUMFLEX AND ACUTE" . 7845)
+ ("LATIN CAPITAL LETTER A WITH CIRCUMFLEX AND GRAVE" . 7846)
+ ("LATIN SMALL LETTER A WITH CIRCUMFLEX AND GRAVE" . 7847)
+ ("LATIN CAPITAL LETTER A WITH CIRCUMFLEX AND HOOK ABOVE" . 7848)
+ ("LATIN SMALL LETTER A WITH CIRCUMFLEX AND HOOK ABOVE" . 7849)
+ ("LATIN CAPITAL LETTER A WITH CIRCUMFLEX AND TILDE" . 7850)
+ ("LATIN SMALL LETTER A WITH CIRCUMFLEX AND TILDE" . 7851)
+ ("LATIN CAPITAL LETTER A WITH CIRCUMFLEX AND DOT BELOW" . 7852)
+ ("LATIN SMALL LETTER A WITH CIRCUMFLEX AND DOT BELOW" . 7853)
+ ("LATIN CAPITAL LETTER A WITH BREVE AND ACUTE" . 7854)
+ ("LATIN SMALL LETTER A WITH BREVE AND ACUTE" . 7855)
+ ("LATIN CAPITAL LETTER A WITH BREVE AND GRAVE" . 7856)
+ ("LATIN SMALL LETTER A WITH BREVE AND GRAVE" . 7857)
+ ("LATIN CAPITAL LETTER A WITH BREVE AND HOOK ABOVE" . 7858)
+ ("LATIN SMALL LETTER A WITH BREVE AND HOOK ABOVE" . 7859)
+ ("LATIN CAPITAL LETTER A WITH BREVE AND TILDE" . 7860)
+ ("LATIN SMALL LETTER A WITH BREVE AND TILDE" . 7861)
+ ("LATIN CAPITAL LETTER A WITH BREVE AND DOT BELOW" . 7862)
+ ("LATIN SMALL LETTER A WITH BREVE AND DOT BELOW" . 7863)
+ ("LATIN CAPITAL LETTER E WITH DOT BELOW" . 7864)
+ ("LATIN SMALL LETTER E WITH DOT BELOW" . 7865)
+ ("LATIN CAPITAL LETTER E WITH HOOK ABOVE" . 7866)
+ ("LATIN SMALL LETTER E WITH HOOK ABOVE" . 7867)
+ ("LATIN CAPITAL LETTER E WITH TILDE" . 7868)
+ ("LATIN SMALL LETTER E WITH TILDE" . 7869)
+ ("LATIN CAPITAL LETTER E WITH CIRCUMFLEX AND ACUTE" . 7870)
+ ("LATIN SMALL LETTER E WITH CIRCUMFLEX AND ACUTE" . 7871)
+ ("LATIN CAPITAL LETTER E WITH CIRCUMFLEX AND GRAVE" . 7872)
+ ("LATIN SMALL LETTER E WITH CIRCUMFLEX AND GRAVE" . 7873)
+ ("LATIN CAPITAL LETTER E WITH CIRCUMFLEX AND HOOK ABOVE" . 7874)
+ ("LATIN SMALL LETTER E WITH CIRCUMFLEX AND HOOK ABOVE" . 7875)
+ ("LATIN CAPITAL LETTER E WITH CIRCUMFLEX AND TILDE" . 7876)
+ ("LATIN SMALL LETTER E WITH CIRCUMFLEX AND TILDE" . 7877)
+ ("LATIN CAPITAL LETTER E WITH CIRCUMFLEX AND DOT BELOW" . 7878)
+ ("LATIN SMALL LETTER E WITH CIRCUMFLEX AND DOT BELOW" . 7879)
+ ("LATIN CAPITAL LETTER I WITH HOOK ABOVE" . 7880)
+ ("LATIN SMALL LETTER I WITH HOOK ABOVE" . 7881)
+ ("LATIN CAPITAL LETTER I WITH DOT BELOW" . 7882)
+ ("LATIN SMALL LETTER I WITH DOT BELOW" . 7883)
+ ("LATIN CAPITAL LETTER O WITH DOT BELOW" . 7884)
+ ("LATIN SMALL LETTER O WITH DOT BELOW" . 7885)
+ ("LATIN CAPITAL LETTER O WITH HOOK ABOVE" . 7886)
+ ("LATIN SMALL LETTER O WITH HOOK ABOVE" . 7887)
+ ("LATIN CAPITAL LETTER O WITH CIRCUMFLEX AND ACUTE" . 7888)
+ ("LATIN SMALL LETTER O WITH CIRCUMFLEX AND ACUTE" . 7889)
+ ("LATIN CAPITAL LETTER O WITH CIRCUMFLEX AND GRAVE" . 7890)
+ ("LATIN SMALL LETTER O WITH CIRCUMFLEX AND GRAVE" . 7891)
+ ("LATIN CAPITAL LETTER O WITH CIRCUMFLEX AND HOOK ABOVE" . 7892)
+ ("LATIN SMALL LETTER O WITH CIRCUMFLEX AND HOOK ABOVE" . 7893)
+ ("LATIN CAPITAL LETTER O WITH CIRCUMFLEX AND TILDE" . 7894)
+ ("LATIN SMALL LETTER O WITH CIRCUMFLEX AND TILDE" . 7895)
+ ("LATIN CAPITAL LETTER O WITH CIRCUMFLEX AND DOT BELOW" . 7896)
+ ("LATIN SMALL LETTER O WITH CIRCUMFLEX AND DOT BELOW" . 7897)
+ ("LATIN CAPITAL LETTER O WITH HORN AND ACUTE" . 7898)
+ ("LATIN SMALL LETTER O WITH HORN AND ACUTE" . 7899)
+ ("LATIN CAPITAL LETTER O WITH HORN AND GRAVE" . 7900)
+ ("LATIN SMALL LETTER O WITH HORN AND GRAVE" . 7901)
+ ("LATIN CAPITAL LETTER O WITH HORN AND HOOK ABOVE" . 7902)
+ ("LATIN SMALL LETTER O WITH HORN AND HOOK ABOVE" . 7903)
+ ("LATIN CAPITAL LETTER O WITH HORN AND TILDE" . 7904)
+ ("LATIN SMALL LETTER O WITH HORN AND TILDE" . 7905)
+ ("LATIN CAPITAL LETTER O WITH HORN AND DOT BELOW" . 7906)
+ ("LATIN SMALL LETTER O WITH HORN AND DOT BELOW" . 7907)
+ ("LATIN CAPITAL LETTER U WITH DOT BELOW" . 7908)
+ ("LATIN SMALL LETTER U WITH DOT BELOW" . 7909)
+ ("LATIN CAPITAL LETTER U WITH HOOK ABOVE" . 7910)
+ ("LATIN SMALL LETTER U WITH HOOK ABOVE" . 7911)
+ ("LATIN CAPITAL LETTER U WITH HORN AND ACUTE" . 7912)
+ ("LATIN SMALL LETTER U WITH HORN AND ACUTE" . 7913)
+ ("LATIN CAPITAL LETTER U WITH HORN AND GRAVE" . 7914)
+ ("LATIN SMALL LETTER U WITH HORN AND GRAVE" . 7915)
+ ("LATIN CAPITAL LETTER U WITH HORN AND HOOK ABOVE" . 7916)
+ ("LATIN SMALL LETTER U WITH HORN AND HOOK ABOVE" . 7917)
+ ("LATIN CAPITAL LETTER U WITH HORN AND TILDE" . 7918)
+ ("LATIN SMALL LETTER U WITH HORN AND TILDE" . 7919)
+ ("LATIN CAPITAL LETTER U WITH HORN AND DOT BELOW" . 7920)
+ ("LATIN SMALL LETTER U WITH HORN AND DOT BELOW" . 7921)
+ ("LATIN CAPITAL LETTER Y WITH GRAVE" . 7922)
+ ("LATIN SMALL LETTER Y WITH GRAVE" . 7923)
+ ("LATIN CAPITAL LETTER Y WITH DOT BELOW" . 7924)
+ ("LATIN SMALL LETTER Y WITH DOT BELOW" . 7925)
+ ("LATIN CAPITAL LETTER Y WITH HOOK ABOVE" . 7926)
+ ("LATIN SMALL LETTER Y WITH HOOK ABOVE" . 7927)
+ ("LATIN CAPITAL LETTER Y WITH TILDE" . 7928)
+ ("LATIN SMALL LETTER Y WITH TILDE" . 7929)
+ ("GREEK SMALL LETTER ALPHA WITH PSILI" . 7936)
+ ("GREEK SMALL LETTER ALPHA WITH DASIA" . 7937)
+ ("GREEK SMALL LETTER ALPHA WITH PSILI AND VARIA" . 7938)
+ ("GREEK SMALL LETTER ALPHA WITH DASIA AND VARIA" . 7939)
+ ("GREEK SMALL LETTER ALPHA WITH PSILI AND OXIA" . 7940)
+ ("GREEK SMALL LETTER ALPHA WITH DASIA AND OXIA" . 7941)
+ ("GREEK SMALL LETTER ALPHA WITH PSILI AND PERISPOMENI" . 7942)
+ ("GREEK SMALL LETTER ALPHA WITH DASIA AND PERISPOMENI" . 7943)
+ ("GREEK CAPITAL LETTER ALPHA WITH PSILI" . 7944)
+ ("GREEK CAPITAL LETTER ALPHA WITH DASIA" . 7945)
+ ("GREEK CAPITAL LETTER ALPHA WITH PSILI AND VARIA" . 7946)
+ ("GREEK CAPITAL LETTER ALPHA WITH DASIA AND VARIA" . 7947)
+ ("GREEK CAPITAL LETTER ALPHA WITH PSILI AND OXIA" . 7948)
+ ("GREEK CAPITAL LETTER ALPHA WITH DASIA AND OXIA" . 7949)
+ ("GREEK CAPITAL LETTER ALPHA WITH PSILI AND PERISPOMENI" . 7950)
+ ("GREEK CAPITAL LETTER ALPHA WITH DASIA AND PERISPOMENI" . 7951)
+ ("GREEK SMALL LETTER EPSILON WITH PSILI" . 7952)
+ ("GREEK SMALL LETTER EPSILON WITH DASIA" . 7953)
+ ("GREEK SMALL LETTER EPSILON WITH PSILI AND VARIA" . 7954)
+ ("GREEK SMALL LETTER EPSILON WITH DASIA AND VARIA" . 7955)
+ ("GREEK SMALL LETTER EPSILON WITH PSILI AND OXIA" . 7956)
+ ("GREEK SMALL LETTER EPSILON WITH DASIA AND OXIA" . 7957)
+ ("GREEK CAPITAL LETTER EPSILON WITH PSILI" . 7960)
+ ("GREEK CAPITAL LETTER EPSILON WITH DASIA" . 7961)
+ ("GREEK CAPITAL LETTER EPSILON WITH PSILI AND VARIA" . 7962)
+ ("GREEK CAPITAL LETTER EPSILON WITH DASIA AND VARIA" . 7963)
+ ("GREEK CAPITAL LETTER EPSILON WITH PSILI AND OXIA" . 7964)
+ ("GREEK CAPITAL LETTER EPSILON WITH DASIA AND OXIA" . 7965)
+ ("GREEK SMALL LETTER ETA WITH PSILI" . 7968)
+ ("GREEK SMALL LETTER ETA WITH DASIA" . 7969)
+ ("GREEK SMALL LETTER ETA WITH PSILI AND VARIA" . 7970)
+ ("GREEK SMALL LETTER ETA WITH DASIA AND VARIA" . 7971)
+ ("GREEK SMALL LETTER ETA WITH PSILI AND OXIA" . 7972)
+ ("GREEK SMALL LETTER ETA WITH DASIA AND OXIA" . 7973)
+ ("GREEK SMALL LETTER ETA WITH PSILI AND PERISPOMENI" . 7974)
+ ("GREEK SMALL LETTER ETA WITH DASIA AND PERISPOMENI" . 7975)
+ ("GREEK CAPITAL LETTER ETA WITH PSILI" . 7976)
+ ("GREEK CAPITAL LETTER ETA WITH DASIA" . 7977)
+ ("GREEK CAPITAL LETTER ETA WITH PSILI AND VARIA" . 7978)
+ ("GREEK CAPITAL LETTER ETA WITH DASIA AND VARIA" . 7979)
+ ("GREEK CAPITAL LETTER ETA WITH PSILI AND OXIA" . 7980)
+ ("GREEK CAPITAL LETTER ETA WITH DASIA AND OXIA" . 7981)
+ ("GREEK CAPITAL LETTER ETA WITH PSILI AND PERISPOMENI" . 7982)
+ ("GREEK CAPITAL LETTER ETA WITH DASIA AND PERISPOMENI" . 7983)
+ ("GREEK SMALL LETTER IOTA WITH PSILI" . 7984)
+ ("GREEK SMALL LETTER IOTA WITH DASIA" . 7985)
+ ("GREEK SMALL LETTER IOTA WITH PSILI AND VARIA" . 7986)
+ ("GREEK SMALL LETTER IOTA WITH DASIA AND VARIA" . 7987)
+ ("GREEK SMALL LETTER IOTA WITH PSILI AND OXIA" . 7988)
+ ("GREEK SMALL LETTER IOTA WITH DASIA AND OXIA" . 7989)
+ ("GREEK SMALL LETTER IOTA WITH PSILI AND PERISPOMENI" . 7990)
+ ("GREEK SMALL LETTER IOTA WITH DASIA AND PERISPOMENI" . 7991)
+ ("GREEK CAPITAL LETTER IOTA WITH PSILI" . 7992)
+ ("GREEK CAPITAL LETTER IOTA WITH DASIA" . 7993)
+ ("GREEK CAPITAL LETTER IOTA WITH PSILI AND VARIA" . 7994)
+ ("GREEK CAPITAL LETTER IOTA WITH DASIA AND VARIA" . 7995)
+ ("GREEK CAPITAL LETTER IOTA WITH PSILI AND OXIA" . 7996)
+ ("GREEK CAPITAL LETTER IOTA WITH DASIA AND OXIA" . 7997)
+ ("GREEK CAPITAL LETTER IOTA WITH PSILI AND PERISPOMENI" . 7998)
+ ("GREEK CAPITAL LETTER IOTA WITH DASIA AND PERISPOMENI" . 7999)
+ ("GREEK SMALL LETTER OMICRON WITH PSILI" . 8000)
+ ("GREEK SMALL LETTER OMICRON WITH DASIA" . 8001)
+ ("GREEK SMALL LETTER OMICRON WITH PSILI AND VARIA" . 8002)
+ ("GREEK SMALL LETTER OMICRON WITH DASIA AND VARIA" . 8003)
+ ("GREEK SMALL LETTER OMICRON WITH PSILI AND OXIA" . 8004)
+ ("GREEK SMALL LETTER OMICRON WITH DASIA AND OXIA" . 8005)
+ ("GREEK CAPITAL LETTER OMICRON WITH PSILI" . 8008)
+ ("GREEK CAPITAL LETTER OMICRON WITH DASIA" . 8009)
+ ("GREEK CAPITAL LETTER OMICRON WITH PSILI AND VARIA" . 8010)
+ ("GREEK CAPITAL LETTER OMICRON WITH DASIA AND VARIA" . 8011)
+ ("GREEK CAPITAL LETTER OMICRON WITH PSILI AND OXIA" . 8012)
+ ("GREEK CAPITAL LETTER OMICRON WITH DASIA AND OXIA" . 8013)
+ ("GREEK SMALL LETTER UPSILON WITH PSILI" . 8016)
+ ("GREEK SMALL LETTER UPSILON WITH DASIA" . 8017)
+ ("GREEK SMALL LETTER UPSILON WITH PSILI AND VARIA" . 8018)
+ ("GREEK SMALL LETTER UPSILON WITH DASIA AND VARIA" . 8019)
+ ("GREEK SMALL LETTER UPSILON WITH PSILI AND OXIA" . 8020)
+ ("GREEK SMALL LETTER UPSILON WITH DASIA AND OXIA" . 8021)
+ ("GREEK SMALL LETTER UPSILON WITH PSILI AND PERISPOMENI" . 8022)
+ ("GREEK SMALL LETTER UPSILON WITH DASIA AND PERISPOMENI" . 8023)
+ ("GREEK CAPITAL LETTER UPSILON WITH DASIA" . 8025)
+ ("GREEK CAPITAL LETTER UPSILON WITH DASIA AND VARIA" . 8027)
+ ("GREEK CAPITAL LETTER UPSILON WITH DASIA AND OXIA" . 8029)
+ ("GREEK CAPITAL LETTER UPSILON WITH DASIA AND PERISPOMENI" . 8031)
+ ("GREEK SMALL LETTER OMEGA WITH PSILI" . 8032)
+ ("GREEK SMALL LETTER OMEGA WITH DASIA" . 8033)
+ ("GREEK SMALL LETTER OMEGA WITH PSILI AND VARIA" . 8034)
+ ("GREEK SMALL LETTER OMEGA WITH DASIA AND VARIA" . 8035)
+ ("GREEK SMALL LETTER OMEGA WITH PSILI AND OXIA" . 8036)
+ ("GREEK SMALL LETTER OMEGA WITH DASIA AND OXIA" . 8037)
+ ("GREEK SMALL LETTER OMEGA WITH PSILI AND PERISPOMENI" . 8038)
+ ("GREEK SMALL LETTER OMEGA WITH DASIA AND PERISPOMENI" . 8039)
+ ("GREEK CAPITAL LETTER OMEGA WITH PSILI" . 8040)
+ ("GREEK CAPITAL LETTER OMEGA WITH DASIA" . 8041)
+ ("GREEK CAPITAL LETTER OMEGA WITH PSILI AND VARIA" . 8042)
+ ("GREEK CAPITAL LETTER OMEGA WITH DASIA AND VARIA" . 8043)
+ ("GREEK CAPITAL LETTER OMEGA WITH PSILI AND OXIA" . 8044)
+ ("GREEK CAPITAL LETTER OMEGA WITH DASIA AND OXIA" . 8045)
+ ("GREEK CAPITAL LETTER OMEGA WITH PSILI AND PERISPOMENI" . 8046)
+ ("GREEK CAPITAL LETTER OMEGA WITH DASIA AND PERISPOMENI" . 8047)
+ ("GREEK SMALL LETTER ALPHA WITH VARIA" . 8048)
+ ("GREEK SMALL LETTER ALPHA WITH OXIA" . 8049)
+ ("GREEK SMALL LETTER EPSILON WITH VARIA" . 8050)
+ ("GREEK SMALL LETTER EPSILON WITH OXIA" . 8051)
+ ("GREEK SMALL LETTER ETA WITH VARIA" . 8052)
+ ("GREEK SMALL LETTER ETA WITH OXIA" . 8053)
+ ("GREEK SMALL LETTER IOTA WITH VARIA" . 8054)
+ ("GREEK SMALL LETTER IOTA WITH OXIA" . 8055)
+ ("GREEK SMALL LETTER OMICRON WITH VARIA" . 8056)
+ ("GREEK SMALL LETTER OMICRON WITH OXIA" . 8057)
+ ("GREEK SMALL LETTER UPSILON WITH VARIA" . 8058)
+ ("GREEK SMALL LETTER UPSILON WITH OXIA" . 8059)
+ ("GREEK SMALL LETTER OMEGA WITH VARIA" . 8060)
+ ("GREEK SMALL LETTER OMEGA WITH OXIA" . 8061)
+ ("GREEK SMALL LETTER ALPHA WITH PSILI AND YPOGEGRAMMENI" . 8064)
+ ("GREEK SMALL LETTER ALPHA WITH DASIA AND YPOGEGRAMMENI" . 8065)
+ ("GREEK SMALL LETTER ALPHA WITH PSILI AND VARIA AND YPOGEGRAMMENI" . 8066)
+ ("GREEK SMALL LETTER ALPHA WITH DASIA AND VARIA AND YPOGEGRAMMENI" . 8067)
+ ("GREEK SMALL LETTER ALPHA WITH PSILI AND OXIA AND YPOGEGRAMMENI" . 8068)
+ ("GREEK SMALL LETTER ALPHA WITH DASIA AND OXIA AND YPOGEGRAMMENI" . 8069)
+ ("GREEK SMALL LETTER ALPHA WITH PSILI AND PERISPOMENI AND YPOGEGRAMMENI" . 8070)
+ ("GREEK SMALL LETTER ALPHA WITH DASIA AND PERISPOMENI AND YPOGEGRAMMENI" . 8071)
+ ("GREEK CAPITAL LETTER ALPHA WITH PSILI AND PROSGEGRAMMENI" . 8072)
+ ("GREEK CAPITAL LETTER ALPHA WITH DASIA AND PROSGEGRAMMENI" . 8073)
+ ("GREEK CAPITAL LETTER ALPHA WITH PSILI AND VARIA AND PROSGEGRAMMENI" . 8074)
+ ("GREEK CAPITAL LETTER ALPHA WITH DASIA AND VARIA AND PROSGEGRAMMENI" . 8075)
+ ("GREEK CAPITAL LETTER ALPHA WITH PSILI AND OXIA AND PROSGEGRAMMENI" . 8076)
+ ("GREEK CAPITAL LETTER ALPHA WITH DASIA AND OXIA AND PROSGEGRAMMENI" . 8077)
+ ("GREEK CAPITAL LETTER ALPHA WITH PSILI AND PERISPOMENI AND PROSGEGRAMMENI" . 8078)
+ ("GREEK CAPITAL LETTER ALPHA WITH DASIA AND PERISPOMENI AND PROSGEGRAMMENI" . 8079)
+ ("GREEK SMALL LETTER ETA WITH PSILI AND YPOGEGRAMMENI" . 8080)
+ ("GREEK SMALL LETTER ETA WITH DASIA AND YPOGEGRAMMENI" . 8081)
+ ("GREEK SMALL LETTER ETA WITH PSILI AND VARIA AND YPOGEGRAMMENI" . 8082)
+ ("GREEK SMALL LETTER ETA WITH DASIA AND VARIA AND YPOGEGRAMMENI" . 8083)
+ ("GREEK SMALL LETTER ETA WITH PSILI AND OXIA AND YPOGEGRAMMENI" . 8084)
+ ("GREEK SMALL LETTER ETA WITH DASIA AND OXIA AND YPOGEGRAMMENI" . 8085)
+ ("GREEK SMALL LETTER ETA WITH PSILI AND PERISPOMENI AND YPOGEGRAMMENI" . 8086)
+ ("GREEK SMALL LETTER ETA WITH DASIA AND PERISPOMENI AND YPOGEGRAMMENI" . 8087)
+ ("GREEK CAPITAL LETTER ETA WITH PSILI AND PROSGEGRAMMENI" . 8088)
+ ("GREEK CAPITAL LETTER ETA WITH DASIA AND PROSGEGRAMMENI" . 8089)
+ ("GREEK CAPITAL LETTER ETA WITH PSILI AND VARIA AND PROSGEGRAMMENI" . 8090)
+ ("GREEK CAPITAL LETTER ETA WITH DASIA AND VARIA AND PROSGEGRAMMENI" . 8091)
+ ("GREEK CAPITAL LETTER ETA WITH PSILI AND OXIA AND PROSGEGRAMMENI" . 8092)
+ ("GREEK CAPITAL LETTER ETA WITH DASIA AND OXIA AND PROSGEGRAMMENI" . 8093)
+ ("GREEK CAPITAL LETTER ETA WITH PSILI AND PERISPOMENI AND PROSGEGRAMMENI" . 8094)
+ ("GREEK CAPITAL LETTER ETA WITH DASIA AND PERISPOMENI AND PROSGEGRAMMENI" . 8095)
+ ("GREEK SMALL LETTER OMEGA WITH PSILI AND YPOGEGRAMMENI" . 8096)
+ ("GREEK SMALL LETTER OMEGA WITH DASIA AND YPOGEGRAMMENI" . 8097)
+ ("GREEK SMALL LETTER OMEGA WITH PSILI AND VARIA AND YPOGEGRAMMENI" . 8098)
+ ("GREEK SMALL LETTER OMEGA WITH DASIA AND VARIA AND YPOGEGRAMMENI" . 8099)
+ ("GREEK SMALL LETTER OMEGA WITH PSILI AND OXIA AND YPOGEGRAMMENI" . 8100)
+ ("GREEK SMALL LETTER OMEGA WITH DASIA AND OXIA AND YPOGEGRAMMENI" . 8101)
+ ("GREEK SMALL LETTER OMEGA WITH PSILI AND PERISPOMENI AND YPOGEGRAMMENI" . 8102)
+ ("GREEK SMALL LETTER OMEGA WITH DASIA AND PERISPOMENI AND YPOGEGRAMMENI" . 8103)
+ ("GREEK CAPITAL LETTER OMEGA WITH PSILI AND PROSGEGRAMMENI" . 8104)
+ ("GREEK CAPITAL LETTER OMEGA WITH DASIA AND PROSGEGRAMMENI" . 8105)
+ ("GREEK CAPITAL LETTER OMEGA WITH PSILI AND VARIA AND PROSGEGRAMMENI" . 8106)
+ ("GREEK CAPITAL LETTER OMEGA WITH DASIA AND VARIA AND PROSGEGRAMMENI" . 8107)
+ ("GREEK CAPITAL LETTER OMEGA WITH PSILI AND OXIA AND PROSGEGRAMMENI" . 8108)
+ ("GREEK CAPITAL LETTER OMEGA WITH DASIA AND OXIA AND PROSGEGRAMMENI" . 8109)
+ ("GREEK CAPITAL LETTER OMEGA WITH PSILI AND PERISPOMENI AND PROSGEGRAMMENI" . 8110)
+ ("GREEK CAPITAL LETTER OMEGA WITH DASIA AND PERISPOMENI AND PROSGEGRAMMENI" . 8111)
+ ("GREEK SMALL LETTER ALPHA WITH VRACHY" . 8112)
+ ("GREEK SMALL LETTER ALPHA WITH MACRON" . 8113)
+ ("GREEK SMALL LETTER ALPHA WITH VARIA AND YPOGEGRAMMENI" . 8114)
+ ("GREEK SMALL LETTER ALPHA WITH YPOGEGRAMMENI" . 8115)
+ ("GREEK SMALL LETTER ALPHA WITH OXIA AND YPOGEGRAMMENI" . 8116)
+ ("GREEK SMALL LETTER ALPHA WITH PERISPOMENI" . 8118)
+ ("GREEK SMALL LETTER ALPHA WITH PERISPOMENI AND YPOGEGRAMMENI" . 8119)
+ ("GREEK CAPITAL LETTER ALPHA WITH VRACHY" . 8120)
+ ("GREEK CAPITAL LETTER ALPHA WITH MACRON" . 8121)
+ ("GREEK CAPITAL LETTER ALPHA WITH VARIA" . 8122)
+ ("GREEK CAPITAL LETTER ALPHA WITH OXIA" . 8123)
+ ("GREEK CAPITAL LETTER ALPHA WITH PROSGEGRAMMENI" . 8124)
+ ("GREEK KORONIS" . 8125)
+ ("GREEK PROSGEGRAMMENI" . 8126)
+ ("GREEK PSILI" . 8127)
+ ("GREEK PERISPOMENI" . 8128)
+ ("GREEK DIALYTIKA AND PERISPOMENI" . 8129)
+ ("GREEK SMALL LETTER ETA WITH VARIA AND YPOGEGRAMMENI" . 8130)
+ ("GREEK SMALL LETTER ETA WITH YPOGEGRAMMENI" . 8131)
+ ("GREEK SMALL LETTER ETA WITH OXIA AND YPOGEGRAMMENI" . 8132)
+ ("GREEK SMALL LETTER ETA WITH PERISPOMENI" . 8134)
+ ("GREEK SMALL LETTER ETA WITH PERISPOMENI AND YPOGEGRAMMENI" . 8135)
+ ("GREEK CAPITAL LETTER EPSILON WITH VARIA" . 8136)
+ ("GREEK CAPITAL LETTER EPSILON WITH OXIA" . 8137)
+ ("GREEK CAPITAL LETTER ETA WITH VARIA" . 8138)
+ ("GREEK CAPITAL LETTER ETA WITH OXIA" . 8139)
+ ("GREEK CAPITAL LETTER ETA WITH PROSGEGRAMMENI" . 8140)
+ ("GREEK PSILI AND VARIA" . 8141)
+ ("GREEK PSILI AND OXIA" . 8142)
+ ("GREEK PSILI AND PERISPOMENI" . 8143)
+ ("GREEK SMALL LETTER IOTA WITH VRACHY" . 8144)
+ ("GREEK SMALL LETTER IOTA WITH MACRON" . 8145)
+ ("GREEK SMALL LETTER IOTA WITH DIALYTIKA AND VARIA" . 8146)
+ ("GREEK SMALL LETTER IOTA WITH DIALYTIKA AND OXIA" . 8147)
+ ("GREEK SMALL LETTER IOTA WITH PERISPOMENI" . 8150)
+ ("GREEK SMALL LETTER IOTA WITH DIALYTIKA AND PERISPOMENI" . 8151)
+ ("GREEK CAPITAL LETTER IOTA WITH VRACHY" . 8152)
+ ("GREEK CAPITAL LETTER IOTA WITH MACRON" . 8153)
+ ("GREEK CAPITAL LETTER IOTA WITH VARIA" . 8154)
+ ("GREEK CAPITAL LETTER IOTA WITH OXIA" . 8155)
+ ("GREEK DASIA AND VARIA" . 8157)
+ ("GREEK DASIA AND OXIA" . 8158)
+ ("GREEK DASIA AND PERISPOMENI" . 8159)
+ ("GREEK SMALL LETTER UPSILON WITH VRACHY" . 8160)
+ ("GREEK SMALL LETTER UPSILON WITH MACRON" . 8161)
+ ("GREEK SMALL LETTER UPSILON WITH DIALYTIKA AND VARIA" . 8162)
+ ("GREEK SMALL LETTER UPSILON WITH DIALYTIKA AND OXIA" . 8163)
+ ("GREEK SMALL LETTER RHO WITH PSILI" . 8164)
+ ("GREEK SMALL LETTER RHO WITH DASIA" . 8165)
+ ("GREEK SMALL LETTER UPSILON WITH PERISPOMENI" . 8166)
+ ("GREEK SMALL LETTER UPSILON WITH DIALYTIKA AND PERISPOMENI" . 8167)
+ ("GREEK CAPITAL LETTER UPSILON WITH VRACHY" . 8168)
+ ("GREEK CAPITAL LETTER UPSILON WITH MACRON" . 8169)
+ ("GREEK CAPITAL LETTER UPSILON WITH VARIA" . 8170)
+ ("GREEK CAPITAL LETTER UPSILON WITH OXIA" . 8171)
+ ("GREEK CAPITAL LETTER RHO WITH DASIA" . 8172)
+ ("GREEK DIALYTIKA AND VARIA" . 8173)
+ ("GREEK DIALYTIKA AND OXIA" . 8174)
+ ("GREEK VARIA" . 8175)
+ ("GREEK SMALL LETTER OMEGA WITH VARIA AND YPOGEGRAMMENI" . 8178)
+ ("GREEK SMALL LETTER OMEGA WITH YPOGEGRAMMENI" . 8179)
+ ("GREEK SMALL LETTER OMEGA WITH OXIA AND YPOGEGRAMMENI" . 8180)
+ ("GREEK SMALL LETTER OMEGA WITH PERISPOMENI" . 8182)
+ ("GREEK SMALL LETTER OMEGA WITH PERISPOMENI AND YPOGEGRAMMENI" . 8183)
+ ("GREEK CAPITAL LETTER OMICRON WITH VARIA" . 8184)
+ ("GREEK CAPITAL LETTER OMICRON WITH OXIA" . 8185)
+ ("GREEK CAPITAL LETTER OMEGA WITH VARIA" . 8186)
+ ("GREEK CAPITAL LETTER OMEGA WITH OXIA" . 8187)
+ ("GREEK CAPITAL LETTER OMEGA WITH PROSGEGRAMMENI" . 8188)
+ ("GREEK OXIA" . 8189)
+ ("GREEK DASIA" . 8190)
+ ("EN QUAD" . 8192)
+ ("EM QUAD" . 8193)
+ ("EN SPACE" . 8194)
+ ("EM SPACE" . 8195)
+ ("THREE-PER-EM SPACE" . 8196)
+ ("FOUR-PER-EM SPACE" . 8197)
+ ("SIX-PER-EM SPACE" . 8198)
+ ("FIGURE SPACE" . 8199)
+ ("PUNCTUATION SPACE" . 8200)
+ ("THIN SPACE" . 8201)
+ ("HAIR SPACE" . 8202)
+ ("ZERO WIDTH SPACE" . 8203)
+ ("ZERO WIDTH NON-JOINER" . 8204)
+ ("ZERO WIDTH JOINER" . 8205)
+ ("LEFT-TO-RIGHT MARK" . 8206)
+ ("RIGHT-TO-LEFT MARK" . 8207)
+ ("HYPHEN" . 8208)
+ ("NON-BREAKING HYPHEN" . 8209)
+ ("FIGURE DASH" . 8210)
+ ("EN DASH" . 8211)
+ ("EM DASH" . 8212)
+ ("HORIZONTAL BAR" . 8213)
+ ("DOUBLE VERTICAL LINE" . 8214)
+ ("DOUBLE LOW LINE" . 8215)
+ ("LEFT SINGLE QUOTATION MARK" . 8216)
+ ("RIGHT SINGLE QUOTATION MARK" . 8217)
+ ("SINGLE LOW-9 QUOTATION MARK" . 8218)
+ ("SINGLE HIGH-REVERSED-9 QUOTATION MARK" . 8219)
+ ("LEFT DOUBLE QUOTATION MARK" . 8220)
+ ("RIGHT DOUBLE QUOTATION MARK" . 8221)
+ ("DOUBLE LOW-9 QUOTATION MARK" . 8222)
+ ("DOUBLE HIGH-REVERSED-9 QUOTATION MARK" . 8223)
+ ("DAGGER" . 8224)
+ ("DOUBLE DAGGER" . 8225)
+ ("BULLET" . 8226)
+ ("TRIANGULAR BULLET" . 8227)
+ ("ONE DOT LEADER" . 8228)
+ ("TWO DOT LEADER" . 8229)
+ ("HORIZONTAL ELLIPSIS" . 8230)
+ ("HYPHENATION POINT" . 8231)
+ ("LINE SEPARATOR" . 8232)
+ ("PARAGRAPH SEPARATOR" . 8233)
+ ("LEFT-TO-RIGHT EMBEDDING" . 8234)
+ ("RIGHT-TO-LEFT EMBEDDING" . 8235)
+ ("POP DIRECTIONAL FORMATTING" . 8236)
+ ("LEFT-TO-RIGHT OVERRIDE" . 8237)
+ ("RIGHT-TO-LEFT OVERRIDE" . 8238)
+ ("NARROW NO-BREAK SPACE" . 8239)
+ ("PER MILLE SIGN" . 8240)
+ ("PER TEN THOUSAND SIGN" . 8241)
+ ("PRIME" . 8242)
+ ("DOUBLE PRIME" . 8243)
+ ("TRIPLE PRIME" . 8244)
+ ("REVERSED PRIME" . 8245)
+ ("REVERSED DOUBLE PRIME" . 8246)
+ ("REVERSED TRIPLE PRIME" . 8247)
+ ("CARET" . 8248)
+ ("SINGLE LEFT-POINTING ANGLE QUOTATION MARK" . 8249)
+ ("SINGLE RIGHT-POINTING ANGLE QUOTATION MARK" . 8250)
+ ("REFERENCE MARK" . 8251)
+ ("DOUBLE EXCLAMATION MARK" . 8252)
+ ("INTERROBANG" . 8253)
+ ("OVERLINE" . 8254)
+ ("UNDERTIE" . 8255)
+ ("CHARACTER TIE" . 8256)
+ ("CARET INSERTION POINT" . 8257)
+ ("ASTERISM" . 8258)
+ ("HYPHEN BULLET" . 8259)
+ ("FRACTION SLASH" . 8260)
+ ("LEFT SQUARE BRACKET WITH QUILL" . 8261)
+ ("RIGHT SQUARE BRACKET WITH QUILL" . 8262)
+ ("DOUBLE QUESTION MARK" . 8263)
+ ("QUESTION EXCLAMATION MARK" . 8264)
+ ("EXCLAMATION QUESTION MARK" . 8265)
+ ("TIRONIAN SIGN ET" . 8266)
+ ("REVERSED PILCROW SIGN" . 8267)
+ ("BLACK LEFTWARDS BULLET" . 8268)
+ ("BLACK RIGHTWARDS BULLET" . 8269)
+ ("LOW ASTERISK" . 8270)
+ ("REVERSED SEMICOLON" . 8271)
+ ("CLOSE UP" . 8272)
+ ("TWO ASTERISKS ALIGNED VERTICALLY" . 8273)
+ ("COMMERCIAL MINUS SIGN" . 8274)
+ ("QUADRUPLE PRIME" . 8279)
+ ("MEDIUM MATHEMATICAL SPACE" . 8287)
+ ("WORD JOINER" . 8288)
+ ("FUNCTION APPLICATION" . 8289)
+ ("INVISIBLE TIMES" . 8290)
+ ("INVISIBLE SEPARATOR" . 8291)
+ ("INHIBIT SYMMETRIC SWAPPING" . 8298)
+ ("ACTIVATE SYMMETRIC SWAPPING" . 8299)
+ ("INHIBIT ARABIC FORM SHAPING" . 8300)
+ ("ACTIVATE ARABIC FORM SHAPING" . 8301)
+ ("NATIONAL DIGIT SHAPES" . 8302)
+ ("NOMINAL DIGIT SHAPES" . 8303)
+ ("SUPERSCRIPT ZERO" . 8304)
+ ("SUPERSCRIPT LATIN SMALL LETTER I" . 8305)
+ ("SUPERSCRIPT FOUR" . 8308)
+ ("SUPERSCRIPT FIVE" . 8309)
+ ("SUPERSCRIPT SIX" . 8310)
+ ("SUPERSCRIPT SEVEN" . 8311)
+ ("SUPERSCRIPT EIGHT" . 8312)
+ ("SUPERSCRIPT NINE" . 8313)
+ ("SUPERSCRIPT PLUS SIGN" . 8314)
+ ("SUPERSCRIPT MINUS" . 8315)
+ ("SUPERSCRIPT EQUALS SIGN" . 8316)
+ ("SUPERSCRIPT LEFT PARENTHESIS" . 8317)
+ ("SUPERSCRIPT RIGHT PARENTHESIS" . 8318)
+ ("SUPERSCRIPT LATIN SMALL LETTER N" . 8319)
+ ("SUBSCRIPT ZERO" . 8320)
+ ("SUBSCRIPT ONE" . 8321)
+ ("SUBSCRIPT TWO" . 8322)
+ ("SUBSCRIPT THREE" . 8323)
+ ("SUBSCRIPT FOUR" . 8324)
+ ("SUBSCRIPT FIVE" . 8325)
+ ("SUBSCRIPT SIX" . 8326)
+ ("SUBSCRIPT SEVEN" . 8327)
+ ("SUBSCRIPT EIGHT" . 8328)
+ ("SUBSCRIPT NINE" . 8329)
+ ("SUBSCRIPT PLUS SIGN" . 8330)
+ ("SUBSCRIPT MINUS" . 8331)
+ ("SUBSCRIPT EQUALS SIGN" . 8332)
+ ("SUBSCRIPT LEFT PARENTHESIS" . 8333)
+ ("SUBSCRIPT RIGHT PARENTHESIS" . 8334)
+ ("EURO-CURRENCY SIGN" . 8352)
+ ("COLON SIGN" . 8353)
+ ("CRUZEIRO SIGN" . 8354)
+ ("FRENCH FRANC SIGN" . 8355)
+ ("LIRA SIGN" . 8356)
+ ("MILL SIGN" . 8357)
+ ("NAIRA SIGN" . 8358)
+ ("PESETA SIGN" . 8359)
+ ("RUPEE SIGN" . 8360)
+ ("WON SIGN" . 8361)
+ ("NEW SHEQEL SIGN" . 8362)
+ ("DONG SIGN" . 8363)
+ ("EURO SIGN" . 8364)
+ ("KIP SIGN" . 8365)
+ ("TUGRIK SIGN" . 8366)
+ ("DRACHMA SIGN" . 8367)
+ ("GERMAN PENNY SIGN" . 8368)
+ ("PESO SIGN" . 8369)
+ ("COMBINING LEFT HARPOON ABOVE" . 8400)
+ ("COMBINING RIGHT HARPOON ABOVE" . 8401)
+ ("COMBINING LONG VERTICAL LINE OVERLAY" . 8402)
+ ("COMBINING SHORT VERTICAL LINE OVERLAY" . 8403)
+ ("COMBINING ANTICLOCKWISE ARROW ABOVE" . 8404)
+ ("COMBINING CLOCKWISE ARROW ABOVE" . 8405)
+ ("COMBINING LEFT ARROW ABOVE" . 8406)
+ ("COMBINING RIGHT ARROW ABOVE" . 8407)
+ ("COMBINING RING OVERLAY" . 8408)
+ ("COMBINING CLOCKWISE RING OVERLAY" . 8409)
+ ("COMBINING ANTICLOCKWISE RING OVERLAY" . 8410)
+ ("COMBINING THREE DOTS ABOVE" . 8411)
+ ("COMBINING FOUR DOTS ABOVE" . 8412)
+ ("COMBINING ENCLOSING CIRCLE" . 8413)
+ ("COMBINING ENCLOSING SQUARE" . 8414)
+ ("COMBINING ENCLOSING DIAMOND" . 8415)
+ ("COMBINING ENCLOSING CIRCLE BACKSLASH" . 8416)
+ ("COMBINING LEFT RIGHT ARROW ABOVE" . 8417)
+ ("COMBINING ENCLOSING SCREEN" . 8418)
+ ("COMBINING ENCLOSING KEYCAP" . 8419)
+ ("COMBINING ENCLOSING UPWARD POINTING TRIANGLE" . 8420)
+ ("COMBINING REVERSE SOLIDUS OVERLAY" . 8421)
+ ("COMBINING DOUBLE VERTICAL STROKE OVERLAY" . 8422)
+ ("COMBINING ANNUITY SYMBOL" . 8423)
+ ("COMBINING TRIPLE UNDERDOT" . 8424)
+ ("COMBINING WIDE BRIDGE ABOVE" . 8425)
+ ("COMBINING LEFTWARDS ARROW OVERLAY" . 8426)
+ ("ACCOUNT OF" . 8448)
+ ("ADDRESSED TO THE SUBJECT" . 8449)
+ ("DOUBLE-STRUCK CAPITAL C" . 8450)
+ ("DEGREE CELSIUS" . 8451)
+ ("CENTRE LINE SYMBOL" . 8452)
+ ("CARE OF" . 8453)
+ ("CADA UNA" . 8454)
+ ("EULER CONSTANT" . 8455)
+ ("SCRUPLE" . 8456)
+ ("DEGREE FAHRENHEIT" . 8457)
+ ("SCRIPT SMALL G" . 8458)
+ ("SCRIPT CAPITAL H" . 8459)
+ ("BLACK-LETTER CAPITAL H" . 8460)
+ ("DOUBLE-STRUCK CAPITAL H" . 8461)
+ ("PLANCK CONSTANT" . 8462)
+ ("PLANCK CONSTANT OVER TWO PI" . 8463)
+ ("SCRIPT CAPITAL I" . 8464)
+ ("BLACK-LETTER CAPITAL I" . 8465)
+ ("SCRIPT CAPITAL L" . 8466)
+ ("SCRIPT SMALL L" . 8467)
+ ("L B BAR SYMBOL" . 8468)
+ ("DOUBLE-STRUCK CAPITAL N" . 8469)
+ ("NUMERO SIGN" . 8470)
+ ("SOUND RECORDING COPYRIGHT" . 8471)
+ ("SCRIPT CAPITAL P" . 8472)
+ ("DOUBLE-STRUCK CAPITAL P" . 8473)
+ ("DOUBLE-STRUCK CAPITAL Q" . 8474)
+ ("SCRIPT CAPITAL R" . 8475)
+ ("BLACK-LETTER CAPITAL R" . 8476)
+ ("DOUBLE-STRUCK CAPITAL R" . 8477)
+ ("PRESCRIPTION TAKE" . 8478)
+ ("RESPONSE" . 8479)
+ ("SERVICE MARK" . 8480)
+ ("TELEPHONE SIGN" . 8481)
+ ("TRADE MARK SIGN" . 8482)
+ ("VERSICLE" . 8483)
+ ("DOUBLE-STRUCK CAPITAL Z" . 8484)
+ ("OUNCE SIGN" . 8485)
+ ("OHM SIGN" . 8486)
+ ("INVERTED OHM SIGN" . 8487)
+ ("BLACK-LETTER CAPITAL Z" . 8488)
+ ("TURNED GREEK SMALL LETTER IOTA" . 8489)
+ ("KELVIN SIGN" . 8490)
+ ("ANGSTROM SIGN" . 8491)
+ ("SCRIPT CAPITAL B" . 8492)
+ ("BLACK-LETTER CAPITAL C" . 8493)
+ ("ESTIMATED SYMBOL" . 8494)
+ ("SCRIPT SMALL E" . 8495)
+ ("SCRIPT CAPITAL E" . 8496)
+ ("SCRIPT CAPITAL F" . 8497)
+ ("TURNED CAPITAL F" . 8498)
+ ("SCRIPT CAPITAL M" . 8499)
+ ("SCRIPT SMALL O" . 8500)
+ ("ALEF SYMBOL" . 8501)
+ ("BET SYMBOL" . 8502)
+ ("GIMEL SYMBOL" . 8503)
+ ("DALET SYMBOL" . 8504)
+ ("INFORMATION SOURCE" . 8505)
+ ("ROTATED CAPITAL Q" . 8506)
+ ("DOUBLE-STRUCK SMALL GAMMA" . 8509)
+ ("DOUBLE-STRUCK CAPITAL GAMMA" . 8510)
+ ("DOUBLE-STRUCK CAPITAL PI" . 8511)
+ ("DOUBLE-STRUCK N-ARY SUMMATION" . 8512)
+ ("TURNED SANS-SERIF CAPITAL G" . 8513)
+ ("TURNED SANS-SERIF CAPITAL L" . 8514)
+ ("REVERSED SANS-SERIF CAPITAL L" . 8515)
+ ("TURNED SANS-SERIF CAPITAL Y" . 8516)
+ ("DOUBLE-STRUCK ITALIC CAPITAL D" . 8517)
+ ("DOUBLE-STRUCK ITALIC SMALL D" . 8518)
+ ("DOUBLE-STRUCK ITALIC SMALL E" . 8519)
+ ("DOUBLE-STRUCK ITALIC SMALL I" . 8520)
+ ("DOUBLE-STRUCK ITALIC SMALL J" . 8521)
+ ("PROPERTY LINE" . 8522)
+ ("TURNED AMPERSAND" . 8523)
+ ("VULGAR FRACTION ONE THIRD" . 8531)
+ ("VULGAR FRACTION TWO THIRDS" . 8532)
+ ("VULGAR FRACTION ONE FIFTH" . 8533)
+ ("VULGAR FRACTION TWO FIFTHS" . 8534)
+ ("VULGAR FRACTION THREE FIFTHS" . 8535)
+ ("VULGAR FRACTION FOUR FIFTHS" . 8536)
+ ("VULGAR FRACTION ONE SIXTH" . 8537)
+ ("VULGAR FRACTION FIVE SIXTHS" . 8538)
+ ("VULGAR FRACTION ONE EIGHTH" . 8539)
+ ("VULGAR FRACTION THREE EIGHTHS" . 8540)
+ ("VULGAR FRACTION FIVE EIGHTHS" . 8541)
+ ("VULGAR FRACTION SEVEN EIGHTHS" . 8542)
+ ("FRACTION NUMERATOR ONE" . 8543)
+ ("ROMAN NUMERAL ONE" . 8544)
+ ("ROMAN NUMERAL TWO" . 8545)
+ ("ROMAN NUMERAL THREE" . 8546)
+ ("ROMAN NUMERAL FOUR" . 8547)
+ ("ROMAN NUMERAL FIVE" . 8548)
+ ("ROMAN NUMERAL SIX" . 8549)
+ ("ROMAN NUMERAL SEVEN" . 8550)
+ ("ROMAN NUMERAL EIGHT" . 8551)
+ ("ROMAN NUMERAL NINE" . 8552)
+ ("ROMAN NUMERAL TEN" . 8553)
+ ("ROMAN NUMERAL ELEVEN" . 8554)
+ ("ROMAN NUMERAL TWELVE" . 8555)
+ ("ROMAN NUMERAL FIFTY" . 8556)
+ ("ROMAN NUMERAL ONE HUNDRED" . 8557)
+ ("ROMAN NUMERAL FIVE HUNDRED" . 8558)
+ ("ROMAN NUMERAL ONE THOUSAND" . 8559)
+ ("SMALL ROMAN NUMERAL ONE" . 8560)
+ ("SMALL ROMAN NUMERAL TWO" . 8561)
+ ("SMALL ROMAN NUMERAL THREE" . 8562)
+ ("SMALL ROMAN NUMERAL FOUR" . 8563)
+ ("SMALL ROMAN NUMERAL FIVE" . 8564)
+ ("SMALL ROMAN NUMERAL SIX" . 8565)
+ ("SMALL ROMAN NUMERAL SEVEN" . 8566)
+ ("SMALL ROMAN NUMERAL EIGHT" . 8567)
+ ("SMALL ROMAN NUMERAL NINE" . 8568)
+ ("SMALL ROMAN NUMERAL TEN" . 8569)
+ ("SMALL ROMAN NUMERAL ELEVEN" . 8570)
+ ("SMALL ROMAN NUMERAL TWELVE" . 8571)
+ ("SMALL ROMAN NUMERAL FIFTY" . 8572)
+ ("SMALL ROMAN NUMERAL ONE HUNDRED" . 8573)
+ ("SMALL ROMAN NUMERAL FIVE HUNDRED" . 8574)
+ ("SMALL ROMAN NUMERAL ONE THOUSAND" . 8575)
+ ("ROMAN NUMERAL ONE THOUSAND C D" . 8576)
+ ("ROMAN NUMERAL FIVE THOUSAND" . 8577)
+ ("ROMAN NUMERAL TEN THOUSAND" . 8578)
+ ("ROMAN NUMERAL REVERSED ONE HUNDRED" . 8579)
+ ("LEFTWARDS ARROW" . 8592)
+ ("UPWARDS ARROW" . 8593)
+ ("RIGHTWARDS ARROW" . 8594)
+ ("DOWNWARDS ARROW" . 8595)
+ ("LEFT RIGHT ARROW" . 8596)
+ ("UP DOWN ARROW" . 8597)
+ ("NORTH WEST ARROW" . 8598)
+ ("NORTH EAST ARROW" . 8599)
+ ("SOUTH EAST ARROW" . 8600)
+ ("SOUTH WEST ARROW" . 8601)
+ ("LEFTWARDS ARROW WITH STROKE" . 8602)
+ ("RIGHTWARDS ARROW WITH STROKE" . 8603)
+ ("LEFTWARDS WAVE ARROW" . 8604)
+ ("RIGHTWARDS WAVE ARROW" . 8605)
+ ("LEFTWARDS TWO HEADED ARROW" . 8606)
+ ("UPWARDS TWO HEADED ARROW" . 8607)
+ ("RIGHTWARDS TWO HEADED ARROW" . 8608)
+ ("DOWNWARDS TWO HEADED ARROW" . 8609)
+ ("LEFTWARDS ARROW WITH TAIL" . 8610)
+ ("RIGHTWARDS ARROW WITH TAIL" . 8611)
+ ("LEFTWARDS ARROW FROM BAR" . 8612)
+ ("UPWARDS ARROW FROM BAR" . 8613)
+ ("RIGHTWARDS ARROW FROM BAR" . 8614)
+ ("DOWNWARDS ARROW FROM BAR" . 8615)
+ ("UP DOWN ARROW WITH BASE" . 8616)
+ ("LEFTWARDS ARROW WITH HOOK" . 8617)
+ ("RIGHTWARDS ARROW WITH HOOK" . 8618)
+ ("LEFTWARDS ARROW WITH LOOP" . 8619)
+ ("RIGHTWARDS ARROW WITH LOOP" . 8620)
+ ("LEFT RIGHT WAVE ARROW" . 8621)
+ ("LEFT RIGHT ARROW WITH STROKE" . 8622)
+ ("DOWNWARDS ZIGZAG ARROW" . 8623)
+ ("UPWARDS ARROW WITH TIP LEFTWARDS" . 8624)
+ ("UPWARDS ARROW WITH TIP RIGHTWARDS" . 8625)
+ ("DOWNWARDS ARROW WITH TIP LEFTWARDS" . 8626)
+ ("DOWNWARDS ARROW WITH TIP RIGHTWARDS" . 8627)
+ ("RIGHTWARDS ARROW WITH CORNER DOWNWARDS" . 8628)
+ ("DOWNWARDS ARROW WITH CORNER LEFTWARDS" . 8629)
+ ("ANTICLOCKWISE TOP SEMICIRCLE ARROW" . 8630)
+ ("CLOCKWISE TOP SEMICIRCLE ARROW" . 8631)
+ ("NORTH WEST ARROW TO LONG BAR" . 8632)
+ ("LEFTWARDS ARROW TO BAR OVER RIGHTWARDS ARROW TO BAR" . 8633)
+ ("ANTICLOCKWISE OPEN CIRCLE ARROW" . 8634)
+ ("CLOCKWISE OPEN CIRCLE ARROW" . 8635)
+ ("LEFTWARDS HARPOON WITH BARB UPWARDS" . 8636)
+ ("LEFTWARDS HARPOON WITH BARB DOWNWARDS" . 8637)
+ ("UPWARDS HARPOON WITH BARB RIGHTWARDS" . 8638)
+ ("UPWARDS HARPOON WITH BARB LEFTWARDS" . 8639)
+ ("RIGHTWARDS HARPOON WITH BARB UPWARDS" . 8640)
+ ("RIGHTWARDS HARPOON WITH BARB DOWNWARDS" . 8641)
+ ("DOWNWARDS HARPOON WITH BARB RIGHTWARDS" . 8642)
+ ("DOWNWARDS HARPOON WITH BARB LEFTWARDS" . 8643)
+ ("RIGHTWARDS ARROW OVER LEFTWARDS ARROW" . 8644)
+ ("UPWARDS ARROW LEFTWARDS OF DOWNWARDS ARROW" . 8645)
+ ("LEFTWARDS ARROW OVER RIGHTWARDS ARROW" . 8646)
+ ("LEFTWARDS PAIRED ARROWS" . 8647)
+ ("UPWARDS PAIRED ARROWS" . 8648)
+ ("RIGHTWARDS PAIRED ARROWS" . 8649)
+ ("DOWNWARDS PAIRED ARROWS" . 8650)
+ ("LEFTWARDS HARPOON OVER RIGHTWARDS HARPOON" . 8651)
+ ("RIGHTWARDS HARPOON OVER LEFTWARDS HARPOON" . 8652)
+ ("LEFTWARDS DOUBLE ARROW WITH STROKE" . 8653)
+ ("LEFT RIGHT DOUBLE ARROW WITH STROKE" . 8654)
+ ("RIGHTWARDS DOUBLE ARROW WITH STROKE" . 8655)
+ ("LEFTWARDS DOUBLE ARROW" . 8656)
+ ("UPWARDS DOUBLE ARROW" . 8657)
+ ("RIGHTWARDS DOUBLE ARROW" . 8658)
+ ("DOWNWARDS DOUBLE ARROW" . 8659)
+ ("LEFT RIGHT DOUBLE ARROW" . 8660)
+ ("UP DOWN DOUBLE ARROW" . 8661)
+ ("NORTH WEST DOUBLE ARROW" . 8662)
+ ("NORTH EAST DOUBLE ARROW" . 8663)
+ ("SOUTH EAST DOUBLE ARROW" . 8664)
+ ("SOUTH WEST DOUBLE ARROW" . 8665)
+ ("LEFTWARDS TRIPLE ARROW" . 8666)
+ ("RIGHTWARDS TRIPLE ARROW" . 8667)
+ ("LEFTWARDS SQUIGGLE ARROW" . 8668)
+ ("RIGHTWARDS SQUIGGLE ARROW" . 8669)
+ ("UPWARDS ARROW WITH DOUBLE STROKE" . 8670)
+ ("DOWNWARDS ARROW WITH DOUBLE STROKE" . 8671)
+ ("LEFTWARDS DASHED ARROW" . 8672)
+ ("UPWARDS DASHED ARROW" . 8673)
+ ("RIGHTWARDS DASHED ARROW" . 8674)
+ ("DOWNWARDS DASHED ARROW" . 8675)
+ ("LEFTWARDS ARROW TO BAR" . 8676)
+ ("RIGHTWARDS ARROW TO BAR" . 8677)
+ ("LEFTWARDS WHITE ARROW" . 8678)
+ ("UPWARDS WHITE ARROW" . 8679)
+ ("RIGHTWARDS WHITE ARROW" . 8680)
+ ("DOWNWARDS WHITE ARROW" . 8681)
+ ("UPWARDS WHITE ARROW FROM BAR" . 8682)
+ ("UPWARDS WHITE ARROW ON PEDESTAL" . 8683)
+ ("UPWARDS WHITE ARROW ON PEDESTAL WITH HORIZONTAL BAR" . 8684)
+ ("UPWARDS WHITE ARROW ON PEDESTAL WITH VERTICAL BAR" . 8685)
+ ("UPWARDS WHITE DOUBLE ARROW" . 8686)
+ ("UPWARDS WHITE DOUBLE ARROW ON PEDESTAL" . 8687)
+ ("RIGHTWARDS WHITE ARROW FROM WALL" . 8688)
+ ("NORTH WEST ARROW TO CORNER" . 8689)
+ ("SOUTH EAST ARROW TO CORNER" . 8690)
+ ("UP DOWN WHITE ARROW" . 8691)
+ ("RIGHT ARROW WITH SMALL CIRCLE" . 8692)
+ ("DOWNWARDS ARROW LEFTWARDS OF UPWARDS ARROW" . 8693)
+ ("THREE RIGHTWARDS ARROWS" . 8694)
+ ("LEFTWARDS ARROW WITH VERTICAL STROKE" . 8695)
+ ("RIGHTWARDS ARROW WITH VERTICAL STROKE" . 8696)
+ ("LEFT RIGHT ARROW WITH VERTICAL STROKE" . 8697)
+ ("LEFTWARDS ARROW WITH DOUBLE VERTICAL STROKE" . 8698)
+ ("RIGHTWARDS ARROW WITH DOUBLE VERTICAL STROKE" . 8699)
+ ("LEFT RIGHT ARROW WITH DOUBLE VERTICAL STROKE" . 8700)
+ ("LEFTWARDS OPEN-HEADED ARROW" . 8701)
+ ("RIGHTWARDS OPEN-HEADED ARROW" . 8702)
+ ("LEFT RIGHT OPEN-HEADED ARROW" . 8703)
+ ("FOR ALL" . 8704)
+ ("COMPLEMENT" . 8705)
+ ("PARTIAL DIFFERENTIAL" . 8706)
+ ("THERE EXISTS" . 8707)
+ ("THERE DOES NOT EXIST" . 8708)
+ ("EMPTY SET" . 8709)
+ ("INCREMENT" . 8710)
+ ("NABLA" . 8711)
+ ("ELEMENT OF" . 8712)
+ ("NOT AN ELEMENT OF" . 8713)
+ ("SMALL ELEMENT OF" . 8714)
+ ("CONTAINS AS MEMBER" . 8715)
+ ("DOES NOT CONTAIN AS MEMBER" . 8716)
+ ("SMALL CONTAINS AS MEMBER" . 8717)
+ ("END OF PROOF" . 8718)
+ ("N-ARY PRODUCT" . 8719)
+ ("N-ARY COPRODUCT" . 8720)
+ ("N-ARY SUMMATION" . 8721)
+ ("MINUS SIGN" . 8722)
+ ("MINUS-OR-PLUS SIGN" . 8723)
+ ("DOT PLUS" . 8724)
+ ("DIVISION SLASH" . 8725)
+ ("SET MINUS" . 8726)
+ ("ASTERISK OPERATOR" . 8727)
+ ("RING OPERATOR" . 8728)
+ ("BULLET OPERATOR" . 8729)
+ ("SQUARE ROOT" . 8730)
+ ("CUBE ROOT" . 8731)
+ ("FOURTH ROOT" . 8732)
+ ("PROPORTIONAL TO" . 8733)
+ ("INFINITY" . 8734)
+ ("RIGHT ANGLE" . 8735)
+ ("ANGLE" . 8736)
+ ("MEASURED ANGLE" . 8737)
+ ("SPHERICAL ANGLE" . 8738)
+ ("DIVIDES" . 8739)
+ ("DOES NOT DIVIDE" . 8740)
+ ("PARALLEL TO" . 8741)
+ ("NOT PARALLEL TO" . 8742)
+ ("LOGICAL AND" . 8743)
+ ("LOGICAL OR" . 8744)
+ ("INTERSECTION" . 8745)
+ ("UNION" . 8746)
+ ("INTEGRAL" . 8747)
+ ("DOUBLE INTEGRAL" . 8748)
+ ("TRIPLE INTEGRAL" . 8749)
+ ("CONTOUR INTEGRAL" . 8750)
+ ("SURFACE INTEGRAL" . 8751)
+ ("VOLUME INTEGRAL" . 8752)
+ ("CLOCKWISE INTEGRAL" . 8753)
+ ("CLOCKWISE CONTOUR INTEGRAL" . 8754)
+ ("ANTICLOCKWISE CONTOUR INTEGRAL" . 8755)
+ ("THEREFORE" . 8756)
+ ("BECAUSE" . 8757)
+ ("RATIO" . 8758)
+ ("PROPORTION" . 8759)
+ ("DOT MINUS" . 8760)
+ ("EXCESS" . 8761)
+ ("GEOMETRIC PROPORTION" . 8762)
+ ("HOMOTHETIC" . 8763)
+ ("TILDE OPERATOR" . 8764)
+ ("REVERSED TILDE" . 8765)
+ ("INVERTED LAZY S" . 8766)
+ ("SINE WAVE" . 8767)
+ ("WREATH PRODUCT" . 8768)
+ ("NOT TILDE" . 8769)
+ ("MINUS TILDE" . 8770)
+ ("ASYMPTOTICALLY EQUAL TO" . 8771)
+ ("NOT ASYMPTOTICALLY EQUAL TO" . 8772)
+ ("APPROXIMATELY EQUAL TO" . 8773)
+ ("APPROXIMATELY BUT NOT ACTUALLY EQUAL TO" . 8774)
+ ("NEITHER APPROXIMATELY NOR ACTUALLY EQUAL TO" . 8775)
+ ("ALMOST EQUAL TO" . 8776)
+ ("NOT ALMOST EQUAL TO" . 8777)
+ ("ALMOST EQUAL OR EQUAL TO" . 8778)
+ ("TRIPLE TILDE" . 8779)
+ ("ALL EQUAL TO" . 8780)
+ ("EQUIVALENT TO" . 8781)
+ ("GEOMETRICALLY EQUIVALENT TO" . 8782)
+ ("DIFFERENCE BETWEEN" . 8783)
+ ("APPROACHES THE LIMIT" . 8784)
+ ("GEOMETRICALLY EQUAL TO" . 8785)
+ ("APPROXIMATELY EQUAL TO OR THE IMAGE OF" . 8786)
+ ("IMAGE OF OR APPROXIMATELY EQUAL TO" . 8787)
+ ("COLON EQUALS" . 8788)
+ ("EQUALS COLON" . 8789)
+ ("RING IN EQUAL TO" . 8790)
+ ("RING EQUAL TO" . 8791)
+ ("CORRESPONDS TO" . 8792)
+ ("ESTIMATES" . 8793)
+ ("EQUIANGULAR TO" . 8794)
+ ("STAR EQUALS" . 8795)
+ ("DELTA EQUAL TO" . 8796)
+ ("EQUAL TO BY DEFINITION" . 8797)
+ ("MEASURED BY" . 8798)
+ ("QUESTIONED EQUAL TO" . 8799)
+ ("NOT EQUAL TO" . 8800)
+ ("IDENTICAL TO" . 8801)
+ ("NOT IDENTICAL TO" . 8802)
+ ("STRICTLY EQUIVALENT TO" . 8803)
+ ("LESS-THAN OR EQUAL TO" . 8804)
+ ("GREATER-THAN OR EQUAL TO" . 8805)
+ ("LESS-THAN OVER EQUAL TO" . 8806)
+ ("GREATER-THAN OVER EQUAL TO" . 8807)
+ ("LESS-THAN BUT NOT EQUAL TO" . 8808)
+ ("GREATER-THAN BUT NOT EQUAL TO" . 8809)
+ ("MUCH LESS-THAN" . 8810)
+ ("MUCH GREATER-THAN" . 8811)
+ ("BETWEEN" . 8812)
+ ("NOT EQUIVALENT TO" . 8813)
+ ("NOT LESS-THAN" . 8814)
+ ("NOT GREATER-THAN" . 8815)
+ ("NEITHER LESS-THAN NOR EQUAL TO" . 8816)
+ ("NEITHER GREATER-THAN NOR EQUAL TO" . 8817)
+ ("LESS-THAN OR EQUIVALENT TO" . 8818)
+ ("GREATER-THAN OR EQUIVALENT TO" . 8819)
+ ("NEITHER LESS-THAN NOR EQUIVALENT TO" . 8820)
+ ("NEITHER GREATER-THAN NOR EQUIVALENT TO" . 8821)
+ ("LESS-THAN OR GREATER-THAN" . 8822)
+ ("GREATER-THAN OR LESS-THAN" . 8823)
+ ("NEITHER LESS-THAN NOR GREATER-THAN" . 8824)
+ ("NEITHER GREATER-THAN NOR LESS-THAN" . 8825)
+ ("PRECEDES" . 8826)
+ ("SUCCEEDS" . 8827)
+ ("PRECEDES OR EQUAL TO" . 8828)
+ ("SUCCEEDS OR EQUAL TO" . 8829)
+ ("PRECEDES OR EQUIVALENT TO" . 8830)
+ ("SUCCEEDS OR EQUIVALENT TO" . 8831)
+ ("DOES NOT PRECEDE" . 8832)
+ ("DOES NOT SUCCEED" . 8833)
+ ("SUBSET OF" . 8834)
+ ("SUPERSET OF" . 8835)
+ ("NOT A SUBSET OF" . 8836)
+ ("NOT A SUPERSET OF" . 8837)
+ ("SUBSET OF OR EQUAL TO" . 8838)
+ ("SUPERSET OF OR EQUAL TO" . 8839)
+ ("NEITHER A SUBSET OF NOR EQUAL TO" . 8840)
+ ("NEITHER A SUPERSET OF NOR EQUAL TO" . 8841)
+ ("SUBSET OF WITH NOT EQUAL TO" . 8842)
+ ("SUPERSET OF WITH NOT EQUAL TO" . 8843)
+ ("MULTISET" . 8844)
+ ("MULTISET MULTIPLICATION" . 8845)
+ ("MULTISET UNION" . 8846)
+ ("SQUARE IMAGE OF" . 8847)
+ ("SQUARE ORIGINAL OF" . 8848)
+ ("SQUARE IMAGE OF OR EQUAL TO" . 8849)
+ ("SQUARE ORIGINAL OF OR EQUAL TO" . 8850)
+ ("SQUARE CAP" . 8851)
+ ("SQUARE CUP" . 8852)
+ ("CIRCLED PLUS" . 8853)
+ ("CIRCLED MINUS" . 8854)
+ ("CIRCLED TIMES" . 8855)
+ ("CIRCLED DIVISION SLASH" . 8856)
+ ("CIRCLED DOT OPERATOR" . 8857)
+ ("CIRCLED RING OPERATOR" . 8858)
+ ("CIRCLED ASTERISK OPERATOR" . 8859)
+ ("CIRCLED EQUALS" . 8860)
+ ("CIRCLED DASH" . 8861)
+ ("SQUARED PLUS" . 8862)
+ ("SQUARED MINUS" . 8863)
+ ("SQUARED TIMES" . 8864)
+ ("SQUARED DOT OPERATOR" . 8865)
+ ("RIGHT TACK" . 8866)
+ ("LEFT TACK" . 8867)
+ ("DOWN TACK" . 8868)
+ ("UP TACK" . 8869)
+ ("ASSERTION" . 8870)
+ ("MODELS" . 8871)
+ ("TRUE" . 8872)
+ ("FORCES" . 8873)
+ ("TRIPLE VERTICAL BAR RIGHT TURNSTILE" . 8874)
+ ("DOUBLE VERTICAL BAR DOUBLE RIGHT TURNSTILE" . 8875)
+ ("DOES NOT PROVE" . 8876)
+ ("NOT TRUE" . 8877)
+ ("DOES NOT FORCE" . 8878)
+ ("NEGATED DOUBLE VERTICAL BAR DOUBLE RIGHT TURNSTILE" . 8879)
+ ("PRECEDES UNDER RELATION" . 8880)
+ ("SUCCEEDS UNDER RELATION" . 8881)
+ ("NORMAL SUBGROUP OF" . 8882)
+ ("CONTAINS AS NORMAL SUBGROUP" . 8883)
+ ("NORMAL SUBGROUP OF OR EQUAL TO" . 8884)
+ ("CONTAINS AS NORMAL SUBGROUP OR EQUAL TO" . 8885)
+ ("ORIGINAL OF" . 8886)
+ ("IMAGE OF" . 8887)
+ ("MULTIMAP" . 8888)
+ ("HERMITIAN CONJUGATE MATRIX" . 8889)
+ ("INTERCALATE" . 8890)
+ ("XOR" . 8891)
+ ("NAND" . 8892)
+ ("NOR" . 8893)
+ ("RIGHT ANGLE WITH ARC" . 8894)
+ ("RIGHT TRIANGLE" . 8895)
+ ("N-ARY LOGICAL AND" . 8896)
+ ("N-ARY LOGICAL OR" . 8897)
+ ("N-ARY INTERSECTION" . 8898)
+ ("N-ARY UNION" . 8899)
+ ("DIAMOND OPERATOR" . 8900)
+ ("DOT OPERATOR" . 8901)
+ ("STAR OPERATOR" . 8902)
+ ("DIVISION TIMES" . 8903)
+ ("BOWTIE" . 8904)
+ ("LEFT NORMAL FACTOR SEMIDIRECT PRODUCT" . 8905)
+ ("RIGHT NORMAL FACTOR SEMIDIRECT PRODUCT" . 8906)
+ ("LEFT SEMIDIRECT PRODUCT" . 8907)
+ ("RIGHT SEMIDIRECT PRODUCT" . 8908)
+ ("REVERSED TILDE EQUALS" . 8909)
+ ("CURLY LOGICAL OR" . 8910)
+ ("CURLY LOGICAL AND" . 8911)
+ ("DOUBLE SUBSET" . 8912)
+ ("DOUBLE SUPERSET" . 8913)
+ ("DOUBLE INTERSECTION" . 8914)
+ ("DOUBLE UNION" . 8915)
+ ("PITCHFORK" . 8916)
+ ("EQUAL AND PARALLEL TO" . 8917)
+ ("LESS-THAN WITH DOT" . 8918)
+ ("GREATER-THAN WITH DOT" . 8919)
+ ("VERY MUCH LESS-THAN" . 8920)
+ ("VERY MUCH GREATER-THAN" . 8921)
+ ("LESS-THAN EQUAL TO OR GREATER-THAN" . 8922)
+ ("GREATER-THAN EQUAL TO OR LESS-THAN" . 8923)
+ ("EQUAL TO OR LESS-THAN" . 8924)
+ ("EQUAL TO OR GREATER-THAN" . 8925)
+ ("EQUAL TO OR PRECEDES" . 8926)
+ ("EQUAL TO OR SUCCEEDS" . 8927)
+ ("DOES NOT PRECEDE OR EQUAL" . 8928)
+ ("DOES NOT SUCCEED OR EQUAL" . 8929)
+ ("NOT SQUARE IMAGE OF OR EQUAL TO" . 8930)
+ ("NOT SQUARE ORIGINAL OF OR EQUAL TO" . 8931)
+ ("SQUARE IMAGE OF OR NOT EQUAL TO" . 8932)
+ ("SQUARE ORIGINAL OF OR NOT EQUAL TO" . 8933)
+ ("LESS-THAN BUT NOT EQUIVALENT TO" . 8934)
+ ("GREATER-THAN BUT NOT EQUIVALENT TO" . 8935)
+ ("PRECEDES BUT NOT EQUIVALENT TO" . 8936)
+ ("SUCCEEDS BUT NOT EQUIVALENT TO" . 8937)
+ ("NOT NORMAL SUBGROUP OF" . 8938)
+ ("DOES NOT CONTAIN AS NORMAL SUBGROUP" . 8939)
+ ("NOT NORMAL SUBGROUP OF OR EQUAL TO" . 8940)
+ ("DOES NOT CONTAIN AS NORMAL SUBGROUP OR EQUAL" . 8941)
+ ("VERTICAL ELLIPSIS" . 8942)
+ ("MIDLINE HORIZONTAL ELLIPSIS" . 8943)
+ ("UP RIGHT DIAGONAL ELLIPSIS" . 8944)
+ ("DOWN RIGHT DIAGONAL ELLIPSIS" . 8945)
+ ("ELEMENT OF WITH LONG HORIZONTAL STROKE" . 8946)
+ ("ELEMENT OF WITH VERTICAL BAR AT END OF HORIZONTAL STROKE" . 8947)
+ ("SMALL ELEMENT OF WITH VERTICAL BAR AT END OF HORIZONTAL STROKE" . 8948)
+ ("ELEMENT OF WITH DOT ABOVE" . 8949)
+ ("ELEMENT OF WITH OVERBAR" . 8950)
+ ("SMALL ELEMENT OF WITH OVERBAR" . 8951)
+ ("ELEMENT OF WITH UNDERBAR" . 8952)
+ ("ELEMENT OF WITH TWO HORIZONTAL STROKES" . 8953)
+ ("CONTAINS WITH LONG HORIZONTAL STROKE" . 8954)
+ ("CONTAINS WITH VERTICAL BAR AT END OF HORIZONTAL STROKE" . 8955)
+ ("SMALL CONTAINS WITH VERTICAL BAR AT END OF HORIZONTAL STROKE" . 8956)
+ ("CONTAINS WITH OVERBAR" . 8957)
+ ("SMALL CONTAINS WITH OVERBAR" . 8958)
+ ("Z NOTATION BAG MEMBERSHIP" . 8959)
+ ("DIAMETER SIGN" . 8960)
+ ("ELECTRIC ARROW" . 8961)
+ ("HOUSE" . 8962)
+ ("UP ARROWHEAD" . 8963)
+ ("DOWN ARROWHEAD" . 8964)
+ ("PROJECTIVE" . 8965)
+ ("PERSPECTIVE" . 8966)
+ ("WAVY LINE" . 8967)
+ ("LEFT CEILING" . 8968)
+ ("RIGHT CEILING" . 8969)
+ ("LEFT FLOOR" . 8970)
+ ("RIGHT FLOOR" . 8971)
+ ("BOTTOM RIGHT CROP" . 8972)
+ ("BOTTOM LEFT CROP" . 8973)
+ ("TOP RIGHT CROP" . 8974)
+ ("TOP LEFT CROP" . 8975)
+ ("REVERSED NOT SIGN" . 8976)
+ ("SQUARE LOZENGE" . 8977)
+ ("ARC" . 8978)
+ ("SEGMENT" . 8979)
+ ("SECTOR" . 8980)
+ ("TELEPHONE RECORDER" . 8981)
+ ("POSITION INDICATOR" . 8982)
+ ("VIEWDATA SQUARE" . 8983)
+ ("PLACE OF INTEREST SIGN" . 8984)
+ ("TURNED NOT SIGN" . 8985)
+ ("WATCH" . 8986)
+ ("HOURGLASS" . 8987)
+ ("TOP LEFT CORNER" . 8988)
+ ("TOP RIGHT CORNER" . 8989)
+ ("BOTTOM LEFT CORNER" . 8990)
+ ("BOTTOM RIGHT CORNER" . 8991)
+ ("TOP HALF INTEGRAL" . 8992)
+ ("BOTTOM HALF INTEGRAL" . 8993)
+ ("FROWN" . 8994)
+ ("SMILE" . 8995)
+ ("UP ARROWHEAD BETWEEN TWO HORIZONTAL BARS" . 8996)
+ ("OPTION KEY" . 8997)
+ ("ERASE TO THE RIGHT" . 8998)
+ ("X IN A RECTANGLE BOX" . 8999)
+ ("KEYBOARD" . 9000)
+ ("LEFT-POINTING ANGLE BRACKET" . 9001)
+ ("RIGHT-POINTING ANGLE BRACKET" . 9002)
+ ("ERASE TO THE LEFT" . 9003)
+ ("BENZENE RING" . 9004)
+ ("CYLINDRICITY" . 9005)
+ ("ALL AROUND-PROFILE" . 9006)
+ ("SYMMETRY" . 9007)
+ ("TOTAL RUNOUT" . 9008)
+ ("DIMENSION ORIGIN" . 9009)
+ ("CONICAL TAPER" . 9010)
+ ("SLOPE" . 9011)
+ ("COUNTERBORE" . 9012)
+ ("COUNTERSINK" . 9013)
+ ("APL FUNCTIONAL SYMBOL I-BEAM" . 9014)
+ ("APL FUNCTIONAL SYMBOL SQUISH QUAD" . 9015)
+ ("APL FUNCTIONAL SYMBOL QUAD EQUAL" . 9016)
+ ("APL FUNCTIONAL SYMBOL QUAD DIVIDE" . 9017)
+ ("APL FUNCTIONAL SYMBOL QUAD DIAMOND" . 9018)
+ ("APL FUNCTIONAL SYMBOL QUAD JOT" . 9019)
+ ("APL FUNCTIONAL SYMBOL QUAD CIRCLE" . 9020)
+ ("APL FUNCTIONAL SYMBOL CIRCLE STILE" . 9021)
+ ("APL FUNCTIONAL SYMBOL CIRCLE JOT" . 9022)
+ ("APL FUNCTIONAL SYMBOL SLASH BAR" . 9023)
+ ("APL FUNCTIONAL SYMBOL BACKSLASH BAR" . 9024)
+ ("APL FUNCTIONAL SYMBOL QUAD SLASH" . 9025)
+ ("APL FUNCTIONAL SYMBOL QUAD BACKSLASH" . 9026)
+ ("APL FUNCTIONAL SYMBOL QUAD LESS-THAN" . 9027)
+ ("APL FUNCTIONAL SYMBOL QUAD GREATER-THAN" . 9028)
+ ("APL FUNCTIONAL SYMBOL LEFTWARDS VANE" . 9029)
+ ("APL FUNCTIONAL SYMBOL RIGHTWARDS VANE" . 9030)
+ ("APL FUNCTIONAL SYMBOL QUAD LEFTWARDS ARROW" . 9031)
+ ("APL FUNCTIONAL SYMBOL QUAD RIGHTWARDS ARROW" . 9032)
+ ("APL FUNCTIONAL SYMBOL CIRCLE BACKSLASH" . 9033)
+ ("APL FUNCTIONAL SYMBOL DOWN TACK UNDERBAR" . 9034)
+ ("APL FUNCTIONAL SYMBOL DELTA STILE" . 9035)
+ ("APL FUNCTIONAL SYMBOL QUAD DOWN CARET" . 9036)
+ ("APL FUNCTIONAL SYMBOL QUAD DELTA" . 9037)
+ ("APL FUNCTIONAL SYMBOL DOWN TACK JOT" . 9038)
+ ("APL FUNCTIONAL SYMBOL UPWARDS VANE" . 9039)
+ ("APL FUNCTIONAL SYMBOL QUAD UPWARDS ARROW" . 9040)
+ ("APL FUNCTIONAL SYMBOL UP TACK OVERBAR" . 9041)
+ ("APL FUNCTIONAL SYMBOL DEL STILE" . 9042)
+ ("APL FUNCTIONAL SYMBOL QUAD UP CARET" . 9043)
+ ("APL FUNCTIONAL SYMBOL QUAD DEL" . 9044)
+ ("APL FUNCTIONAL SYMBOL UP TACK JOT" . 9045)
+ ("APL FUNCTIONAL SYMBOL DOWNWARDS VANE" . 9046)
+ ("APL FUNCTIONAL SYMBOL QUAD DOWNWARDS ARROW" . 9047)
+ ("APL FUNCTIONAL SYMBOL QUOTE UNDERBAR" . 9048)
+ ("APL FUNCTIONAL SYMBOL DELTA UNDERBAR" . 9049)
+ ("APL FUNCTIONAL SYMBOL DIAMOND UNDERBAR" . 9050)
+ ("APL FUNCTIONAL SYMBOL JOT UNDERBAR" . 9051)
+ ("APL FUNCTIONAL SYMBOL CIRCLE UNDERBAR" . 9052)
+ ("APL FUNCTIONAL SYMBOL UP SHOE JOT" . 9053)
+ ("APL FUNCTIONAL SYMBOL QUOTE QUAD" . 9054)
+ ("APL FUNCTIONAL SYMBOL CIRCLE STAR" . 9055)
+ ("APL FUNCTIONAL SYMBOL QUAD COLON" . 9056)
+ ("APL FUNCTIONAL SYMBOL UP TACK DIAERESIS" . 9057)
+ ("APL FUNCTIONAL SYMBOL DEL DIAERESIS" . 9058)
+ ("APL FUNCTIONAL SYMBOL STAR DIAERESIS" . 9059)
+ ("APL FUNCTIONAL SYMBOL JOT DIAERESIS" . 9060)
+ ("APL FUNCTIONAL SYMBOL CIRCLE DIAERESIS" . 9061)
+ ("APL FUNCTIONAL SYMBOL DOWN SHOE STILE" . 9062)
+ ("APL FUNCTIONAL SYMBOL LEFT SHOE STILE" . 9063)
+ ("APL FUNCTIONAL SYMBOL TILDE DIAERESIS" . 9064)
+ ("APL FUNCTIONAL SYMBOL GREATER-THAN DIAERESIS" . 9065)
+ ("APL FUNCTIONAL SYMBOL COMMA BAR" . 9066)
+ ("APL FUNCTIONAL SYMBOL DEL TILDE" . 9067)
+ ("APL FUNCTIONAL SYMBOL ZILDE" . 9068)
+ ("APL FUNCTIONAL SYMBOL STILE TILDE" . 9069)
+ ("APL FUNCTIONAL SYMBOL SEMICOLON UNDERBAR" . 9070)
+ ("APL FUNCTIONAL SYMBOL QUAD NOT EQUAL" . 9071)
+ ("APL FUNCTIONAL SYMBOL QUAD QUESTION" . 9072)
+ ("APL FUNCTIONAL SYMBOL DOWN CARET TILDE" . 9073)
+ ("APL FUNCTIONAL SYMBOL UP CARET TILDE" . 9074)
+ ("APL FUNCTIONAL SYMBOL IOTA" . 9075)
+ ("APL FUNCTIONAL SYMBOL RHO" . 9076)
+ ("APL FUNCTIONAL SYMBOL OMEGA" . 9077)
+ ("APL FUNCTIONAL SYMBOL ALPHA UNDERBAR" . 9078)
+ ("APL FUNCTIONAL SYMBOL EPSILON UNDERBAR" . 9079)
+ ("APL FUNCTIONAL SYMBOL IOTA UNDERBAR" . 9080)
+ ("APL FUNCTIONAL SYMBOL OMEGA UNDERBAR" . 9081)
+ ("APL FUNCTIONAL SYMBOL ALPHA" . 9082)
+ ("NOT CHECK MARK" . 9083)
+ ("RIGHT ANGLE WITH DOWNWARDS ZIGZAG ARROW" . 9084)
+ ("SHOULDERED OPEN BOX" . 9085)
+ ("BELL SYMBOL" . 9086)
+ ("VERTICAL LINE WITH MIDDLE DOT" . 9087)
+ ("INSERTION SYMBOL" . 9088)
+ ("CONTINUOUS UNDERLINE SYMBOL" . 9089)
+ ("DISCONTINUOUS UNDERLINE SYMBOL" . 9090)
+ ("EMPHASIS SYMBOL" . 9091)
+ ("COMPOSITION SYMBOL" . 9092)
+ ("WHITE SQUARE WITH CENTRE VERTICAL LINE" . 9093)
+ ("ENTER SYMBOL" . 9094)
+ ("ALTERNATIVE KEY SYMBOL" . 9095)
+ ("HELM SYMBOL" . 9096)
+ ("CIRCLED HORIZONTAL BAR WITH NOTCH" . 9097)
+ ("CIRCLED TRIANGLE DOWN" . 9098)
+ ("BROKEN CIRCLE WITH NORTHWEST ARROW" . 9099)
+ ("UNDO SYMBOL" . 9100)
+ ("MONOSTABLE SYMBOL" . 9101)
+ ("HYSTERESIS SYMBOL" . 9102)
+ ("OPEN-CIRCUIT-OUTPUT H-TYPE SYMBOL" . 9103)
+ ("OPEN-CIRCUIT-OUTPUT L-TYPE SYMBOL" . 9104)
+ ("PASSIVE-PULL-DOWN-OUTPUT SYMBOL" . 9105)
+ ("PASSIVE-PULL-UP-OUTPUT SYMBOL" . 9106)
+ ("DIRECT CURRENT SYMBOL FORM TWO" . 9107)
+ ("SOFTWARE-FUNCTION SYMBOL" . 9108)
+ ("APL FUNCTIONAL SYMBOL QUAD" . 9109)
+ ("DECIMAL SEPARATOR KEY SYMBOL" . 9110)
+ ("PREVIOUS PAGE" . 9111)
+ ("NEXT PAGE" . 9112)
+ ("PRINT SCREEN SYMBOL" . 9113)
+ ("CLEAR SCREEN SYMBOL" . 9114)
+ ("LEFT PARENTHESIS UPPER HOOK" . 9115)
+ ("LEFT PARENTHESIS EXTENSION" . 9116)
+ ("LEFT PARENTHESIS LOWER HOOK" . 9117)
+ ("RIGHT PARENTHESIS UPPER HOOK" . 9118)
+ ("RIGHT PARENTHESIS EXTENSION" . 9119)
+ ("RIGHT PARENTHESIS LOWER HOOK" . 9120)
+ ("LEFT SQUARE BRACKET UPPER CORNER" . 9121)
+ ("LEFT SQUARE BRACKET EXTENSION" . 9122)
+ ("LEFT SQUARE BRACKET LOWER CORNER" . 9123)
+ ("RIGHT SQUARE BRACKET UPPER CORNER" . 9124)
+ ("RIGHT SQUARE BRACKET EXTENSION" . 9125)
+ ("RIGHT SQUARE BRACKET LOWER CORNER" . 9126)
+ ("LEFT CURLY BRACKET UPPER HOOK" . 9127)
+ ("LEFT CURLY BRACKET MIDDLE PIECE" . 9128)
+ ("LEFT CURLY BRACKET LOWER HOOK" . 9129)
+ ("CURLY BRACKET EXTENSION" . 9130)
+ ("RIGHT CURLY BRACKET UPPER HOOK" . 9131)
+ ("RIGHT CURLY BRACKET MIDDLE PIECE" . 9132)
+ ("RIGHT CURLY BRACKET LOWER HOOK" . 9133)
+ ("INTEGRAL EXTENSION" . 9134)
+ ("HORIZONTAL LINE EXTENSION" . 9135)
+ ("UPPER LEFT OR LOWER RIGHT CURLY BRACKET SECTION" . 9136)
+ ("UPPER RIGHT OR LOWER LEFT CURLY BRACKET SECTION" . 9137)
+ ("SUMMATION TOP" . 9138)
+ ("SUMMATION BOTTOM" . 9139)
+ ("TOP SQUARE BRACKET" . 9140)
+ ("BOTTOM SQUARE BRACKET" . 9141)
+ ("BOTTOM SQUARE BRACKET OVER TOP SQUARE BRACKET" . 9142)
+ ("RADICAL SYMBOL BOTTOM" . 9143)
+ ("LEFT VERTICAL BOX LINE" . 9144)
+ ("RIGHT VERTICAL BOX LINE" . 9145)
+ ("HORIZONTAL SCAN LINE-1" . 9146)
+ ("HORIZONTAL SCAN LINE-3" . 9147)
+ ("HORIZONTAL SCAN LINE-7" . 9148)
+ ("HORIZONTAL SCAN LINE-9" . 9149)
+ ("DENTISTRY SYMBOL LIGHT VERTICAL AND TOP RIGHT" . 9150)
+ ("DENTISTRY SYMBOL LIGHT VERTICAL AND BOTTOM RIGHT" . 9151)
+ ("DENTISTRY SYMBOL LIGHT VERTICAL WITH CIRCLE" . 9152)
+ ("DENTISTRY SYMBOL LIGHT DOWN AND HORIZONTAL WITH CIRCLE" . 9153)
+ ("DENTISTRY SYMBOL LIGHT UP AND HORIZONTAL WITH CIRCLE" . 9154)
+ ("DENTISTRY SYMBOL LIGHT VERTICAL WITH TRIANGLE" . 9155)
+ ("DENTISTRY SYMBOL LIGHT DOWN AND HORIZONTAL WITH TRIANGLE" . 9156)
+ ("DENTISTRY SYMBOL LIGHT UP AND HORIZONTAL WITH TRIANGLE" . 9157)
+ ("DENTISTRY SYMBOL LIGHT VERTICAL AND WAVE" . 9158)
+ ("DENTISTRY SYMBOL LIGHT DOWN AND HORIZONTAL WITH WAVE" . 9159)
+ ("DENTISTRY SYMBOL LIGHT UP AND HORIZONTAL WITH WAVE" . 9160)
+ ("DENTISTRY SYMBOL LIGHT DOWN AND HORIZONTAL" . 9161)
+ ("DENTISTRY SYMBOL LIGHT UP AND HORIZONTAL" . 9162)
+ ("DENTISTRY SYMBOL LIGHT VERTICAL AND TOP LEFT" . 9163)
+ ("DENTISTRY SYMBOL LIGHT VERTICAL AND BOTTOM LEFT" . 9164)
+ ("SQUARE FOOT" . 9165)
+ ("RETURN SYMBOL" . 9166)
+ ("SYMBOL FOR NULL" . 9216)
+ ("SYMBOL FOR START OF HEADING" . 9217)
+ ("SYMBOL FOR START OF TEXT" . 9218)
+ ("SYMBOL FOR END OF TEXT" . 9219)
+ ("SYMBOL FOR END OF TRANSMISSION" . 9220)
+ ("SYMBOL FOR ENQUIRY" . 9221)
+ ("SYMBOL FOR ACKNOWLEDGE" . 9222)
+ ("SYMBOL FOR BELL" . 9223)
+ ("SYMBOL FOR BACKSPACE" . 9224)
+ ("SYMBOL FOR HORIZONTAL TABULATION" . 9225)
+ ("SYMBOL FOR LINE FEED" . 9226)
+ ("SYMBOL FOR VERTICAL TABULATION" . 9227)
+ ("SYMBOL FOR FORM FEED" . 9228)
+ ("SYMBOL FOR CARRIAGE RETURN" . 9229)
+ ("SYMBOL FOR SHIFT OUT" . 9230)
+ ("SYMBOL FOR SHIFT IN" . 9231)
+ ("SYMBOL FOR DATA LINK ESCAPE" . 9232)
+ ("SYMBOL FOR DEVICE CONTROL ONE" . 9233)
+ ("SYMBOL FOR DEVICE CONTROL TWO" . 9234)
+ ("SYMBOL FOR DEVICE CONTROL THREE" . 9235)
+ ("SYMBOL FOR DEVICE CONTROL FOUR" . 9236)
+ ("SYMBOL FOR NEGATIVE ACKNOWLEDGE" . 9237)
+ ("SYMBOL FOR SYNCHRONOUS IDLE" . 9238)
+ ("SYMBOL FOR END OF TRANSMISSION BLOCK" . 9239)
+ ("SYMBOL FOR CANCEL" . 9240)
+ ("SYMBOL FOR END OF MEDIUM" . 9241)
+ ("SYMBOL FOR SUBSTITUTE" . 9242)
+ ("SYMBOL FOR ESCAPE" . 9243)
+ ("SYMBOL FOR FILE SEPARATOR" . 9244)
+ ("SYMBOL FOR GROUP SEPARATOR" . 9245)
+ ("SYMBOL FOR RECORD SEPARATOR" . 9246)
+ ("SYMBOL FOR UNIT SEPARATOR" . 9247)
+ ("SYMBOL FOR SPACE" . 9248)
+ ("SYMBOL FOR DELETE" . 9249)
+ ("BLANK SYMBOL" . 9250)
+ ("OPEN BOX" . 9251)
+ ("SYMBOL FOR NEWLINE" . 9252)
+ ("SYMBOL FOR DELETE FORM TWO" . 9253)
+ ("SYMBOL FOR SUBSTITUTE FORM TWO" . 9254)
+ ("OCR HOOK" . 9280)
+ ("OCR CHAIR" . 9281)
+ ("OCR FORK" . 9282)
+ ("OCR INVERTED FORK" . 9283)
+ ("OCR BELT BUCKLE" . 9284)
+ ("OCR BOW TIE" . 9285)
+ ("OCR BRANCH BANK IDENTIFICATION" . 9286)
+ ("OCR AMOUNT OF CHECK" . 9287)
+ ("OCR DASH" . 9288)
+ ("OCR CUSTOMER ACCOUNT NUMBER" . 9289)
+ ("OCR DOUBLE BACKSLASH" . 9290)
+ ("CIRCLED DIGIT ONE" . 9312)
+ ("CIRCLED DIGIT TWO" . 9313)
+ ("CIRCLED DIGIT THREE" . 9314)
+ ("CIRCLED DIGIT FOUR" . 9315)
+ ("CIRCLED DIGIT FIVE" . 9316)
+ ("CIRCLED DIGIT SIX" . 9317)
+ ("CIRCLED DIGIT SEVEN" . 9318)
+ ("CIRCLED DIGIT EIGHT" . 9319)
+ ("CIRCLED DIGIT NINE" . 9320)
+ ("CIRCLED NUMBER TEN" . 9321)
+ ("CIRCLED NUMBER ELEVEN" . 9322)
+ ("CIRCLED NUMBER TWELVE" . 9323)
+ ("CIRCLED NUMBER THIRTEEN" . 9324)
+ ("CIRCLED NUMBER FOURTEEN" . 9325)
+ ("CIRCLED NUMBER FIFTEEN" . 9326)
+ ("CIRCLED NUMBER SIXTEEN" . 9327)
+ ("CIRCLED NUMBER SEVENTEEN" . 9328)
+ ("CIRCLED NUMBER EIGHTEEN" . 9329)
+ ("CIRCLED NUMBER NINETEEN" . 9330)
+ ("CIRCLED NUMBER TWENTY" . 9331)
+ ("PARENTHESIZED DIGIT ONE" . 9332)
+ ("PARENTHESIZED DIGIT TWO" . 9333)
+ ("PARENTHESIZED DIGIT THREE" . 9334)
+ ("PARENTHESIZED DIGIT FOUR" . 9335)
+ ("PARENTHESIZED DIGIT FIVE" . 9336)
+ ("PARENTHESIZED DIGIT SIX" . 9337)
+ ("PARENTHESIZED DIGIT SEVEN" . 9338)
+ ("PARENTHESIZED DIGIT EIGHT" . 9339)
+ ("PARENTHESIZED DIGIT NINE" . 9340)
+ ("PARENTHESIZED NUMBER TEN" . 9341)
+ ("PARENTHESIZED NUMBER ELEVEN" . 9342)
+ ("PARENTHESIZED NUMBER TWELVE" . 9343)
+ ("PARENTHESIZED NUMBER THIRTEEN" . 9344)
+ ("PARENTHESIZED NUMBER FOURTEEN" . 9345)
+ ("PARENTHESIZED NUMBER FIFTEEN" . 9346)
+ ("PARENTHESIZED NUMBER SIXTEEN" . 9347)
+ ("PARENTHESIZED NUMBER SEVENTEEN" . 9348)
+ ("PARENTHESIZED NUMBER EIGHTEEN" . 9349)
+ ("PARENTHESIZED NUMBER NINETEEN" . 9350)
+ ("PARENTHESIZED NUMBER TWENTY" . 9351)
+ ("DIGIT ONE FULL STOP" . 9352)
+ ("DIGIT TWO FULL STOP" . 9353)
+ ("DIGIT THREE FULL STOP" . 9354)
+ ("DIGIT FOUR FULL STOP" . 9355)
+ ("DIGIT FIVE FULL STOP" . 9356)
+ ("DIGIT SIX FULL STOP" . 9357)
+ ("DIGIT SEVEN FULL STOP" . 9358)
+ ("DIGIT EIGHT FULL STOP" . 9359)
+ ("DIGIT NINE FULL STOP" . 9360)
+ ("NUMBER TEN FULL STOP" . 9361)
+ ("NUMBER ELEVEN FULL STOP" . 9362)
+ ("NUMBER TWELVE FULL STOP" . 9363)
+ ("NUMBER THIRTEEN FULL STOP" . 9364)
+ ("NUMBER FOURTEEN FULL STOP" . 9365)
+ ("NUMBER FIFTEEN FULL STOP" . 9366)
+ ("NUMBER SIXTEEN FULL STOP" . 9367)
+ ("NUMBER SEVENTEEN FULL STOP" . 9368)
+ ("NUMBER EIGHTEEN FULL STOP" . 9369)
+ ("NUMBER NINETEEN FULL STOP" . 9370)
+ ("NUMBER TWENTY FULL STOP" . 9371)
+ ("PARENTHESIZED LATIN SMALL LETTER A" . 9372)
+ ("PARENTHESIZED LATIN SMALL LETTER B" . 9373)
+ ("PARENTHESIZED LATIN SMALL LETTER C" . 9374)
+ ("PARENTHESIZED LATIN SMALL LETTER D" . 9375)
+ ("PARENTHESIZED LATIN SMALL LETTER E" . 9376)
+ ("PARENTHESIZED LATIN SMALL LETTER F" . 9377)
+ ("PARENTHESIZED LATIN SMALL LETTER G" . 9378)
+ ("PARENTHESIZED LATIN SMALL LETTER H" . 9379)
+ ("PARENTHESIZED LATIN SMALL LETTER I" . 9380)
+ ("PARENTHESIZED LATIN SMALL LETTER J" . 9381)
+ ("PARENTHESIZED LATIN SMALL LETTER K" . 9382)
+ ("PARENTHESIZED LATIN SMALL LETTER L" . 9383)
+ ("PARENTHESIZED LATIN SMALL LETTER M" . 9384)
+ ("PARENTHESIZED LATIN SMALL LETTER N" . 9385)
+ ("PARENTHESIZED LATIN SMALL LETTER O" . 9386)
+ ("PARENTHESIZED LATIN SMALL LETTER P" . 9387)
+ ("PARENTHESIZED LATIN SMALL LETTER Q" . 9388)
+ ("PARENTHESIZED LATIN SMALL LETTER R" . 9389)
+ ("PARENTHESIZED LATIN SMALL LETTER S" . 9390)
+ ("PARENTHESIZED LATIN SMALL LETTER T" . 9391)
+ ("PARENTHESIZED LATIN SMALL LETTER U" . 9392)
+ ("PARENTHESIZED LATIN SMALL LETTER V" . 9393)
+ ("PARENTHESIZED LATIN SMALL LETTER W" . 9394)
+ ("PARENTHESIZED LATIN SMALL LETTER X" . 9395)
+ ("PARENTHESIZED LATIN SMALL LETTER Y" . 9396)
+ ("PARENTHESIZED LATIN SMALL LETTER Z" . 9397)
+ ("CIRCLED LATIN CAPITAL LETTER A" . 9398)
+ ("CIRCLED LATIN CAPITAL LETTER B" . 9399)
+ ("CIRCLED LATIN CAPITAL LETTER C" . 9400)
+ ("CIRCLED LATIN CAPITAL LETTER D" . 9401)
+ ("CIRCLED LATIN CAPITAL LETTER E" . 9402)
+ ("CIRCLED LATIN CAPITAL LETTER F" . 9403)
+ ("CIRCLED LATIN CAPITAL LETTER G" . 9404)
+ ("CIRCLED LATIN CAPITAL LETTER H" . 9405)
+ ("CIRCLED LATIN CAPITAL LETTER I" . 9406)
+ ("CIRCLED LATIN CAPITAL LETTER J" . 9407)
+ ("CIRCLED LATIN CAPITAL LETTER K" . 9408)
+ ("CIRCLED LATIN CAPITAL LETTER L" . 9409)
+ ("CIRCLED LATIN CAPITAL LETTER M" . 9410)
+ ("CIRCLED LATIN CAPITAL LETTER N" . 9411)
+ ("CIRCLED LATIN CAPITAL LETTER O" . 9412)
+ ("CIRCLED LATIN CAPITAL LETTER P" . 9413)
+ ("CIRCLED LATIN CAPITAL LETTER Q" . 9414)
+ ("CIRCLED LATIN CAPITAL LETTER R" . 9415)
+ ("CIRCLED LATIN CAPITAL LETTER S" . 9416)
+ ("CIRCLED LATIN CAPITAL LETTER T" . 9417)
+ ("CIRCLED LATIN CAPITAL LETTER U" . 9418)
+ ("CIRCLED LATIN CAPITAL LETTER V" . 9419)
+ ("CIRCLED LATIN CAPITAL LETTER W" . 9420)
+ ("CIRCLED LATIN CAPITAL LETTER X" . 9421)
+ ("CIRCLED LATIN CAPITAL LETTER Y" . 9422)
+ ("CIRCLED LATIN CAPITAL LETTER Z" . 9423)
+ ("CIRCLED LATIN SMALL LETTER A" . 9424)
+ ("CIRCLED LATIN SMALL LETTER B" . 9425)
+ ("CIRCLED LATIN SMALL LETTER C" . 9426)
+ ("CIRCLED LATIN SMALL LETTER D" . 9427)
+ ("CIRCLED LATIN SMALL LETTER E" . 9428)
+ ("CIRCLED LATIN SMALL LETTER F" . 9429)
+ ("CIRCLED LATIN SMALL LETTER G" . 9430)
+ ("CIRCLED LATIN SMALL LETTER H" . 9431)
+ ("CIRCLED LATIN SMALL LETTER I" . 9432)
+ ("CIRCLED LATIN SMALL LETTER J" . 9433)
+ ("CIRCLED LATIN SMALL LETTER K" . 9434)
+ ("CIRCLED LATIN SMALL LETTER L" . 9435)
+ ("CIRCLED LATIN SMALL LETTER M" . 9436)
+ ("CIRCLED LATIN SMALL LETTER N" . 9437)
+ ("CIRCLED LATIN SMALL LETTER O" . 9438)
+ ("CIRCLED LATIN SMALL LETTER P" . 9439)
+ ("CIRCLED LATIN SMALL LETTER Q" . 9440)
+ ("CIRCLED LATIN SMALL LETTER R" . 9441)
+ ("CIRCLED LATIN SMALL LETTER S" . 9442)
+ ("CIRCLED LATIN SMALL LETTER T" . 9443)
+ ("CIRCLED LATIN SMALL LETTER U" . 9444)
+ ("CIRCLED LATIN SMALL LETTER V" . 9445)
+ ("CIRCLED LATIN SMALL LETTER W" . 9446)
+ ("CIRCLED LATIN SMALL LETTER X" . 9447)
+ ("CIRCLED LATIN SMALL LETTER Y" . 9448)
+ ("CIRCLED LATIN SMALL LETTER Z" . 9449)
+ ("CIRCLED DIGIT ZERO" . 9450)
+ ("NEGATIVE CIRCLED NUMBER ELEVEN" . 9451)
+ ("NEGATIVE CIRCLED NUMBER TWELVE" . 9452)
+ ("NEGATIVE CIRCLED NUMBER THIRTEEN" . 9453)
+ ("NEGATIVE CIRCLED NUMBER FOURTEEN" . 9454)
+ ("NEGATIVE CIRCLED NUMBER FIFTEEN" . 9455)
+ ("NEGATIVE CIRCLED NUMBER SIXTEEN" . 9456)
+ ("NEGATIVE CIRCLED NUMBER SEVENTEEN" . 9457)
+ ("NEGATIVE CIRCLED NUMBER EIGHTEEN" . 9458)
+ ("NEGATIVE CIRCLED NUMBER NINETEEN" . 9459)
+ ("NEGATIVE CIRCLED NUMBER TWENTY" . 9460)
+ ("DOUBLE CIRCLED DIGIT ONE" . 9461)
+ ("DOUBLE CIRCLED DIGIT TWO" . 9462)
+ ("DOUBLE CIRCLED DIGIT THREE" . 9463)
+ ("DOUBLE CIRCLED DIGIT FOUR" . 9464)
+ ("DOUBLE CIRCLED DIGIT FIVE" . 9465)
+ ("DOUBLE CIRCLED DIGIT SIX" . 9466)
+ ("DOUBLE CIRCLED DIGIT SEVEN" . 9467)
+ ("DOUBLE CIRCLED DIGIT EIGHT" . 9468)
+ ("DOUBLE CIRCLED DIGIT NINE" . 9469)
+ ("DOUBLE CIRCLED NUMBER TEN" . 9470)
+ ("BOX DRAWINGS LIGHT HORIZONTAL" . 9472)
+ ("BOX DRAWINGS HEAVY HORIZONTAL" . 9473)
+ ("BOX DRAWINGS LIGHT VERTICAL" . 9474)
+ ("BOX DRAWINGS HEAVY VERTICAL" . 9475)
+ ("BOX DRAWINGS LIGHT TRIPLE DASH HORIZONTAL" . 9476)
+ ("BOX DRAWINGS HEAVY TRIPLE DASH HORIZONTAL" . 9477)
+ ("BOX DRAWINGS LIGHT TRIPLE DASH VERTICAL" . 9478)
+ ("BOX DRAWINGS HEAVY TRIPLE DASH VERTICAL" . 9479)
+ ("BOX DRAWINGS LIGHT QUADRUPLE DASH HORIZONTAL" . 9480)
+ ("BOX DRAWINGS HEAVY QUADRUPLE DASH HORIZONTAL" . 9481)
+ ("BOX DRAWINGS LIGHT QUADRUPLE DASH VERTICAL" . 9482)
+ ("BOX DRAWINGS HEAVY QUADRUPLE DASH VERTICAL" . 9483)
+ ("BOX DRAWINGS LIGHT DOWN AND RIGHT" . 9484)
+ ("BOX DRAWINGS DOWN LIGHT AND RIGHT HEAVY" . 9485)
+ ("BOX DRAWINGS DOWN HEAVY AND RIGHT LIGHT" . 9486)
+ ("BOX DRAWINGS HEAVY DOWN AND RIGHT" . 9487)
+ ("BOX DRAWINGS LIGHT DOWN AND LEFT" . 9488)
+ ("BOX DRAWINGS DOWN LIGHT AND LEFT HEAVY" . 9489)
+ ("BOX DRAWINGS DOWN HEAVY AND LEFT LIGHT" . 9490)
+ ("BOX DRAWINGS HEAVY DOWN AND LEFT" . 9491)
+ ("BOX DRAWINGS LIGHT UP AND RIGHT" . 9492)
+ ("BOX DRAWINGS UP LIGHT AND RIGHT HEAVY" . 9493)
+ ("BOX DRAWINGS UP HEAVY AND RIGHT LIGHT" . 9494)
+ ("BOX DRAWINGS HEAVY UP AND RIGHT" . 9495)
+ ("BOX DRAWINGS LIGHT UP AND LEFT" . 9496)
+ ("BOX DRAWINGS UP LIGHT AND LEFT HEAVY" . 9497)
+ ("BOX DRAWINGS UP HEAVY AND LEFT LIGHT" . 9498)
+ ("BOX DRAWINGS HEAVY UP AND LEFT" . 9499)
+ ("BOX DRAWINGS LIGHT VERTICAL AND RIGHT" . 9500)
+ ("BOX DRAWINGS VERTICAL LIGHT AND RIGHT HEAVY" . 9501)
+ ("BOX DRAWINGS UP HEAVY AND RIGHT DOWN LIGHT" . 9502)
+ ("BOX DRAWINGS DOWN HEAVY AND RIGHT UP LIGHT" . 9503)
+ ("BOX DRAWINGS VERTICAL HEAVY AND RIGHT LIGHT" . 9504)
+ ("BOX DRAWINGS DOWN LIGHT AND RIGHT UP HEAVY" . 9505)
+ ("BOX DRAWINGS UP LIGHT AND RIGHT DOWN HEAVY" . 9506)
+ ("BOX DRAWINGS HEAVY VERTICAL AND RIGHT" . 9507)
+ ("BOX DRAWINGS LIGHT VERTICAL AND LEFT" . 9508)
+ ("BOX DRAWINGS VERTICAL LIGHT AND LEFT HEAVY" . 9509)
+ ("BOX DRAWINGS UP HEAVY AND LEFT DOWN LIGHT" . 9510)
+ ("BOX DRAWINGS DOWN HEAVY AND LEFT UP LIGHT" . 9511)
+ ("BOX DRAWINGS VERTICAL HEAVY AND LEFT LIGHT" . 9512)
+ ("BOX DRAWINGS DOWN LIGHT AND LEFT UP HEAVY" . 9513)
+ ("BOX DRAWINGS UP LIGHT AND LEFT DOWN HEAVY" . 9514)
+ ("BOX DRAWINGS HEAVY VERTICAL AND LEFT" . 9515)
+ ("BOX DRAWINGS LIGHT DOWN AND HORIZONTAL" . 9516)
+ ("BOX DRAWINGS LEFT HEAVY AND RIGHT DOWN LIGHT" . 9517)
+ ("BOX DRAWINGS RIGHT HEAVY AND LEFT DOWN LIGHT" . 9518)
+ ("BOX DRAWINGS DOWN LIGHT AND HORIZONTAL HEAVY" . 9519)
+ ("BOX DRAWINGS DOWN HEAVY AND HORIZONTAL LIGHT" . 9520)
+ ("BOX DRAWINGS RIGHT LIGHT AND LEFT DOWN HEAVY" . 9521)
+ ("BOX DRAWINGS LEFT LIGHT AND RIGHT DOWN HEAVY" . 9522)
+ ("BOX DRAWINGS HEAVY DOWN AND HORIZONTAL" . 9523)
+ ("BOX DRAWINGS LIGHT UP AND HORIZONTAL" . 9524)
+ ("BOX DRAWINGS LEFT HEAVY AND RIGHT UP LIGHT" . 9525)
+ ("BOX DRAWINGS RIGHT HEAVY AND LEFT UP LIGHT" . 9526)
+ ("BOX DRAWINGS UP LIGHT AND HORIZONTAL HEAVY" . 9527)
+ ("BOX DRAWINGS UP HEAVY AND HORIZONTAL LIGHT" . 9528)
+ ("BOX DRAWINGS RIGHT LIGHT AND LEFT UP HEAVY" . 9529)
+ ("BOX DRAWINGS LEFT LIGHT AND RIGHT UP HEAVY" . 9530)
+ ("BOX DRAWINGS HEAVY UP AND HORIZONTAL" . 9531)
+ ("BOX DRAWINGS LIGHT VERTICAL AND HORIZONTAL" . 9532)
+ ("BOX DRAWINGS LEFT HEAVY AND RIGHT VERTICAL LIGHT" . 9533)
+ ("BOX DRAWINGS RIGHT HEAVY AND LEFT VERTICAL LIGHT" . 9534)
+ ("BOX DRAWINGS VERTICAL LIGHT AND HORIZONTAL HEAVY" . 9535)
+ ("BOX DRAWINGS UP HEAVY AND DOWN HORIZONTAL LIGHT" . 9536)
+ ("BOX DRAWINGS DOWN HEAVY AND UP HORIZONTAL LIGHT" . 9537)
+ ("BOX DRAWINGS VERTICAL HEAVY AND HORIZONTAL LIGHT" . 9538)
+ ("BOX DRAWINGS LEFT UP HEAVY AND RIGHT DOWN LIGHT" . 9539)
+ ("BOX DRAWINGS RIGHT UP HEAVY AND LEFT DOWN LIGHT" . 9540)
+ ("BOX DRAWINGS LEFT DOWN HEAVY AND RIGHT UP LIGHT" . 9541)
+ ("BOX DRAWINGS RIGHT DOWN HEAVY AND LEFT UP LIGHT" . 9542)
+ ("BOX DRAWINGS DOWN LIGHT AND UP HORIZONTAL HEAVY" . 9543)
+ ("BOX DRAWINGS UP LIGHT AND DOWN HORIZONTAL HEAVY" . 9544)
+ ("BOX DRAWINGS RIGHT LIGHT AND LEFT VERTICAL HEAVY" . 9545)
+ ("BOX DRAWINGS LEFT LIGHT AND RIGHT VERTICAL HEAVY" . 9546)
+ ("BOX DRAWINGS HEAVY VERTICAL AND HORIZONTAL" . 9547)
+ ("BOX DRAWINGS LIGHT DOUBLE DASH HORIZONTAL" . 9548)
+ ("BOX DRAWINGS HEAVY DOUBLE DASH HORIZONTAL" . 9549)
+ ("BOX DRAWINGS LIGHT DOUBLE DASH VERTICAL" . 9550)
+ ("BOX DRAWINGS HEAVY DOUBLE DASH VERTICAL" . 9551)
+ ("BOX DRAWINGS DOUBLE HORIZONTAL" . 9552)
+ ("BOX DRAWINGS DOUBLE VERTICAL" . 9553)
+ ("BOX DRAWINGS DOWN SINGLE AND RIGHT DOUBLE" . 9554)
+ ("BOX DRAWINGS DOWN DOUBLE AND RIGHT SINGLE" . 9555)
+ ("BOX DRAWINGS DOUBLE DOWN AND RIGHT" . 9556)
+ ("BOX DRAWINGS DOWN SINGLE AND LEFT DOUBLE" . 9557)
+ ("BOX DRAWINGS DOWN DOUBLE AND LEFT SINGLE" . 9558)
+ ("BOX DRAWINGS DOUBLE DOWN AND LEFT" . 9559)
+ ("BOX DRAWINGS UP SINGLE AND RIGHT DOUBLE" . 9560)
+ ("BOX DRAWINGS UP DOUBLE AND RIGHT SINGLE" . 9561)
+ ("BOX DRAWINGS DOUBLE UP AND RIGHT" . 9562)
+ ("BOX DRAWINGS UP SINGLE AND LEFT DOUBLE" . 9563)
+ ("BOX DRAWINGS UP DOUBLE AND LEFT SINGLE" . 9564)
+ ("BOX DRAWINGS DOUBLE UP AND LEFT" . 9565)
+ ("BOX DRAWINGS VERTICAL SINGLE AND RIGHT DOUBLE" . 9566)
+ ("BOX DRAWINGS VERTICAL DOUBLE AND RIGHT SINGLE" . 9567)
+ ("BOX DRAWINGS DOUBLE VERTICAL AND RIGHT" . 9568)
+ ("BOX DRAWINGS VERTICAL SINGLE AND LEFT DOUBLE" . 9569)
+ ("BOX DRAWINGS VERTICAL DOUBLE AND LEFT SINGLE" . 9570)
+ ("BOX DRAWINGS DOUBLE VERTICAL AND LEFT" . 9571)
+ ("BOX DRAWINGS DOWN SINGLE AND HORIZONTAL DOUBLE" . 9572)
+ ("BOX DRAWINGS DOWN DOUBLE AND HORIZONTAL SINGLE" . 9573)
+ ("BOX DRAWINGS DOUBLE DOWN AND HORIZONTAL" . 9574)
+ ("BOX DRAWINGS UP SINGLE AND HORIZONTAL DOUBLE" . 9575)
+ ("BOX DRAWINGS UP DOUBLE AND HORIZONTAL SINGLE" . 9576)
+ ("BOX DRAWINGS DOUBLE UP AND HORIZONTAL" . 9577)
+ ("BOX DRAWINGS VERTICAL SINGLE AND HORIZONTAL DOUBLE" . 9578)
+ ("BOX DRAWINGS VERTICAL DOUBLE AND HORIZONTAL SINGLE" . 9579)
+ ("BOX DRAWINGS DOUBLE VERTICAL AND HORIZONTAL" . 9580)
+ ("BOX DRAWINGS LIGHT ARC DOWN AND RIGHT" . 9581)
+ ("BOX DRAWINGS LIGHT ARC DOWN AND LEFT" . 9582)
+ ("BOX DRAWINGS LIGHT ARC UP AND LEFT" . 9583)
+ ("BOX DRAWINGS LIGHT ARC UP AND RIGHT" . 9584)
+ ("BOX DRAWINGS LIGHT DIAGONAL UPPER RIGHT TO LOWER LEFT" . 9585)
+ ("BOX DRAWINGS LIGHT DIAGONAL UPPER LEFT TO LOWER RIGHT" . 9586)
+ ("BOX DRAWINGS LIGHT DIAGONAL CROSS" . 9587)
+ ("BOX DRAWINGS LIGHT LEFT" . 9588)
+ ("BOX DRAWINGS LIGHT UP" . 9589)
+ ("BOX DRAWINGS LIGHT RIGHT" . 9590)
+ ("BOX DRAWINGS LIGHT DOWN" . 9591)
+ ("BOX DRAWINGS HEAVY LEFT" . 9592)
+ ("BOX DRAWINGS HEAVY UP" . 9593)
+ ("BOX DRAWINGS HEAVY RIGHT" . 9594)
+ ("BOX DRAWINGS HEAVY DOWN" . 9595)
+ ("BOX DRAWINGS LIGHT LEFT AND HEAVY RIGHT" . 9596)
+ ("BOX DRAWINGS LIGHT UP AND HEAVY DOWN" . 9597)
+ ("BOX DRAWINGS HEAVY LEFT AND LIGHT RIGHT" . 9598)
+ ("BOX DRAWINGS HEAVY UP AND LIGHT DOWN" . 9599)
+ ("UPPER HALF BLOCK" . 9600)
+ ("LOWER ONE EIGHTH BLOCK" . 9601)
+ ("LOWER ONE QUARTER BLOCK" . 9602)
+ ("LOWER THREE EIGHTHS BLOCK" . 9603)
+ ("LOWER HALF BLOCK" . 9604)
+ ("LOWER FIVE EIGHTHS BLOCK" . 9605)
+ ("LOWER THREE QUARTERS BLOCK" . 9606)
+ ("LOWER SEVEN EIGHTHS BLOCK" . 9607)
+ ("FULL BLOCK" . 9608)
+ ("LEFT SEVEN EIGHTHS BLOCK" . 9609)
+ ("LEFT THREE QUARTERS BLOCK" . 9610)
+ ("LEFT FIVE EIGHTHS BLOCK" . 9611)
+ ("LEFT HALF BLOCK" . 9612)
+ ("LEFT THREE EIGHTHS BLOCK" . 9613)
+ ("LEFT ONE QUARTER BLOCK" . 9614)
+ ("LEFT ONE EIGHTH BLOCK" . 9615)
+ ("RIGHT HALF BLOCK" . 9616)
+ ("LIGHT SHADE" . 9617)
+ ("MEDIUM SHADE" . 9618)
+ ("DARK SHADE" . 9619)
+ ("UPPER ONE EIGHTH BLOCK" . 9620)
+ ("RIGHT ONE EIGHTH BLOCK" . 9621)
+ ("QUADRANT LOWER LEFT" . 9622)
+ ("QUADRANT LOWER RIGHT" . 9623)
+ ("QUADRANT UPPER LEFT" . 9624)
+ ("QUADRANT UPPER LEFT AND LOWER LEFT AND LOWER RIGHT" . 9625)
+ ("QUADRANT UPPER LEFT AND LOWER RIGHT" . 9626)
+ ("QUADRANT UPPER LEFT AND UPPER RIGHT AND LOWER LEFT" . 9627)
+ ("QUADRANT UPPER LEFT AND UPPER RIGHT AND LOWER RIGHT" . 9628)
+ ("QUADRANT UPPER RIGHT" . 9629)
+ ("QUADRANT UPPER RIGHT AND LOWER LEFT" . 9630)
+ ("QUADRANT UPPER RIGHT AND LOWER LEFT AND LOWER RIGHT" . 9631)
+ ("BLACK SQUARE" . 9632)
+ ("WHITE SQUARE" . 9633)
+ ("WHITE SQUARE WITH ROUNDED CORNERS" . 9634)
+ ("WHITE SQUARE CONTAINING BLACK SMALL SQUARE" . 9635)
+ ("SQUARE WITH HORIZONTAL FILL" . 9636)
+ ("SQUARE WITH VERTICAL FILL" . 9637)
+ ("SQUARE WITH ORTHOGONAL CROSSHATCH FILL" . 9638)
+ ("SQUARE WITH UPPER LEFT TO LOWER RIGHT FILL" . 9639)
+ ("SQUARE WITH UPPER RIGHT TO LOWER LEFT FILL" . 9640)
+ ("SQUARE WITH DIAGONAL CROSSHATCH FILL" . 9641)
+ ("BLACK SMALL SQUARE" . 9642)
+ ("WHITE SMALL SQUARE" . 9643)
+ ("BLACK RECTANGLE" . 9644)
+ ("WHITE RECTANGLE" . 9645)
+ ("BLACK VERTICAL RECTANGLE" . 9646)
+ ("WHITE VERTICAL RECTANGLE" . 9647)
+ ("BLACK PARALLELOGRAM" . 9648)
+ ("WHITE PARALLELOGRAM" . 9649)
+ ("BLACK UP-POINTING TRIANGLE" . 9650)
+ ("WHITE UP-POINTING TRIANGLE" . 9651)
+ ("BLACK UP-POINTING SMALL TRIANGLE" . 9652)
+ ("WHITE UP-POINTING SMALL TRIANGLE" . 9653)
+ ("BLACK RIGHT-POINTING TRIANGLE" . 9654)
+ ("WHITE RIGHT-POINTING TRIANGLE" . 9655)
+ ("BLACK RIGHT-POINTING SMALL TRIANGLE" . 9656)
+ ("WHITE RIGHT-POINTING SMALL TRIANGLE" . 9657)
+ ("BLACK RIGHT-POINTING POINTER" . 9658)
+ ("WHITE RIGHT-POINTING POINTER" . 9659)
+ ("BLACK DOWN-POINTING TRIANGLE" . 9660)
+ ("WHITE DOWN-POINTING TRIANGLE" . 9661)
+ ("BLACK DOWN-POINTING SMALL TRIANGLE" . 9662)
+ ("WHITE DOWN-POINTING SMALL TRIANGLE" . 9663)
+ ("BLACK LEFT-POINTING TRIANGLE" . 9664)
+ ("WHITE LEFT-POINTING TRIANGLE" . 9665)
+ ("BLACK LEFT-POINTING SMALL TRIANGLE" . 9666)
+ ("WHITE LEFT-POINTING SMALL TRIANGLE" . 9667)
+ ("BLACK LEFT-POINTING POINTER" . 9668)
+ ("WHITE LEFT-POINTING POINTER" . 9669)
+ ("BLACK DIAMOND" . 9670)
+ ("WHITE DIAMOND" . 9671)
+ ("WHITE DIAMOND CONTAINING BLACK SMALL DIAMOND" . 9672)
+ ("FISHEYE" . 9673)
+ ("LOZENGE" . 9674)
+ ("WHITE CIRCLE" . 9675)
+ ("DOTTED CIRCLE" . 9676)
+ ("CIRCLE WITH VERTICAL FILL" . 9677)
+ ("BULLSEYE" . 9678)
+ ("BLACK CIRCLE" . 9679)
+ ("CIRCLE WITH LEFT HALF BLACK" . 9680)
+ ("CIRCLE WITH RIGHT HALF BLACK" . 9681)
+ ("CIRCLE WITH LOWER HALF BLACK" . 9682)
+ ("CIRCLE WITH UPPER HALF BLACK" . 9683)
+ ("CIRCLE WITH UPPER RIGHT QUADRANT BLACK" . 9684)
+ ("CIRCLE WITH ALL BUT UPPER LEFT QUADRANT BLACK" . 9685)
+ ("LEFT HALF BLACK CIRCLE" . 9686)
+ ("RIGHT HALF BLACK CIRCLE" . 9687)
+ ("INVERSE BULLET" . 9688)
+ ("INVERSE WHITE CIRCLE" . 9689)
+ ("UPPER HALF INVERSE WHITE CIRCLE" . 9690)
+ ("LOWER HALF INVERSE WHITE CIRCLE" . 9691)
+ ("UPPER LEFT QUADRANT CIRCULAR ARC" . 9692)
+ ("UPPER RIGHT QUADRANT CIRCULAR ARC" . 9693)
+ ("LOWER RIGHT QUADRANT CIRCULAR ARC" . 9694)
+ ("LOWER LEFT QUADRANT CIRCULAR ARC" . 9695)
+ ("UPPER HALF CIRCLE" . 9696)
+ ("LOWER HALF CIRCLE" . 9697)
+ ("BLACK LOWER RIGHT TRIANGLE" . 9698)
+ ("BLACK LOWER LEFT TRIANGLE" . 9699)
+ ("BLACK UPPER LEFT TRIANGLE" . 9700)
+ ("BLACK UPPER RIGHT TRIANGLE" . 9701)
+ ("WHITE BULLET" . 9702)
+ ("SQUARE WITH LEFT HALF BLACK" . 9703)
+ ("SQUARE WITH RIGHT HALF BLACK" . 9704)
+ ("SQUARE WITH UPPER LEFT DIAGONAL HALF BLACK" . 9705)
+ ("SQUARE WITH LOWER RIGHT DIAGONAL HALF BLACK" . 9706)
+ ("WHITE SQUARE WITH VERTICAL BISECTING LINE" . 9707)
+ ("WHITE UP-POINTING TRIANGLE WITH DOT" . 9708)
+ ("UP-POINTING TRIANGLE WITH LEFT HALF BLACK" . 9709)
+ ("UP-POINTING TRIANGLE WITH RIGHT HALF BLACK" . 9710)
+ ("LARGE CIRCLE" . 9711)
+ ("WHITE SQUARE WITH UPPER LEFT QUADRANT" . 9712)
+ ("WHITE SQUARE WITH LOWER LEFT QUADRANT" . 9713)
+ ("WHITE SQUARE WITH LOWER RIGHT QUADRANT" . 9714)
+ ("WHITE SQUARE WITH UPPER RIGHT QUADRANT" . 9715)
+ ("WHITE CIRCLE WITH UPPER LEFT QUADRANT" . 9716)
+ ("WHITE CIRCLE WITH LOWER LEFT QUADRANT" . 9717)
+ ("WHITE CIRCLE WITH LOWER RIGHT QUADRANT" . 9718)
+ ("WHITE CIRCLE WITH UPPER RIGHT QUADRANT" . 9719)
+ ("UPPER LEFT TRIANGLE" . 9720)
+ ("UPPER RIGHT TRIANGLE" . 9721)
+ ("LOWER LEFT TRIANGLE" . 9722)
+ ("WHITE MEDIUM SQUARE" . 9723)
+ ("BLACK MEDIUM SQUARE" . 9724)
+ ("WHITE MEDIUM SMALL SQUARE" . 9725)
+ ("BLACK MEDIUM SMALL SQUARE" . 9726)
+ ("LOWER RIGHT TRIANGLE" . 9727)
+ ("BLACK SUN WITH RAYS" . 9728)
+ ("CLOUD" . 9729)
+ ("UMBRELLA" . 9730)
+ ("SNOWMAN" . 9731)
+ ("COMET" . 9732)
+ ("BLACK STAR" . 9733)
+ ("WHITE STAR" . 9734)
+ ("LIGHTNING" . 9735)
+ ("THUNDERSTORM" . 9736)
+ ("SUN" . 9737)
+ ("ASCENDING NODE" . 9738)
+ ("DESCENDING NODE" . 9739)
+ ("CONJUNCTION" . 9740)
+ ("OPPOSITION" . 9741)
+ ("BLACK TELEPHONE" . 9742)
+ ("WHITE TELEPHONE" . 9743)
+ ("BALLOT BOX" . 9744)
+ ("BALLOT BOX WITH CHECK" . 9745)
+ ("BALLOT BOX WITH X" . 9746)
+ ("SALTIRE" . 9747)
+ ("WHITE SHOGI PIECE" . 9750)
+ ("BLACK SHOGI PIECE" . 9751)
+ ("REVERSED ROTATED FLORAL HEART BULLET" . 9753)
+ ("BLACK LEFT POINTING INDEX" . 9754)
+ ("BLACK RIGHT POINTING INDEX" . 9755)
+ ("WHITE LEFT POINTING INDEX" . 9756)
+ ("WHITE UP POINTING INDEX" . 9757)
+ ("WHITE RIGHT POINTING INDEX" . 9758)
+ ("WHITE DOWN POINTING INDEX" . 9759)
+ ("SKULL AND CROSSBONES" . 9760)
+ ("CAUTION SIGN" . 9761)
+ ("RADIOACTIVE SIGN" . 9762)
+ ("BIOHAZARD SIGN" . 9763)
+ ("CADUCEUS" . 9764)
+ ("ANKH" . 9765)
+ ("ORTHODOX CROSS" . 9766)
+ ("CHI RHO" . 9767)
+ ("CROSS OF LORRAINE" . 9768)
+ ("CROSS OF JERUSALEM" . 9769)
+ ("STAR AND CRESCENT" . 9770)
+ ("FARSI SYMBOL" . 9771)
+ ("ADI SHAKTI" . 9772)
+ ("HAMMER AND SICKLE" . 9773)
+ ("PEACE SYMBOL" . 9774)
+ ("YIN YANG" . 9775)
+ ("TRIGRAM FOR HEAVEN" . 9776)
+ ("TRIGRAM FOR LAKE" . 9777)
+ ("TRIGRAM FOR FIRE" . 9778)
+ ("TRIGRAM FOR THUNDER" . 9779)
+ ("TRIGRAM FOR WIND" . 9780)
+ ("TRIGRAM FOR WATER" . 9781)
+ ("TRIGRAM FOR MOUNTAIN" . 9782)
+ ("TRIGRAM FOR EARTH" . 9783)
+ ("WHEEL OF DHARMA" . 9784)
+ ("WHITE FROWNING FACE" . 9785)
+ ("WHITE SMILING FACE" . 9786)
+ ("BLACK SMILING FACE" . 9787)
+ ("WHITE SUN WITH RAYS" . 9788)
+ ("FIRST QUARTER MOON" . 9789)
+ ("LAST QUARTER MOON" . 9790)
+ ("MERCURY" . 9791)
+ ("FEMALE SIGN" . 9792)
+ ("EARTH" . 9793)
+ ("MALE SIGN" . 9794)
+ ("JUPITER" . 9795)
+ ("SATURN" . 9796)
+ ("URANUS" . 9797)
+ ("NEPTUNE" . 9798)
+ ("PLUTO" . 9799)
+ ("ARIES" . 9800)
+ ("TAURUS" . 9801)
+ ("GEMINI" . 9802)
+ ("CANCER" . 9803)
+ ("LEO" . 9804)
+ ("VIRGO" . 9805)
+ ("LIBRA" . 9806)
+ ("SCORPIUS" . 9807)
+ ("SAGITTARIUS" . 9808)
+ ("CAPRICORN" . 9809)
+ ("AQUARIUS" . 9810)
+ ("PISCES" . 9811)
+ ("WHITE CHESS KING" . 9812)
+ ("WHITE CHESS QUEEN" . 9813)
+ ("WHITE CHESS ROOK" . 9814)
+ ("WHITE CHESS BISHOP" . 9815)
+ ("WHITE CHESS KNIGHT" . 9816)
+ ("WHITE CHESS PAWN" . 9817)
+ ("BLACK CHESS KING" . 9818)
+ ("BLACK CHESS QUEEN" . 9819)
+ ("BLACK CHESS ROOK" . 9820)
+ ("BLACK CHESS BISHOP" . 9821)
+ ("BLACK CHESS KNIGHT" . 9822)
+ ("BLACK CHESS PAWN" . 9823)
+ ("BLACK SPADE SUIT" . 9824)
+ ("WHITE HEART SUIT" . 9825)
+ ("WHITE DIAMOND SUIT" . 9826)
+ ("BLACK CLUB SUIT" . 9827)
+ ("WHITE SPADE SUIT" . 9828)
+ ("BLACK HEART SUIT" . 9829)
+ ("BLACK DIAMOND SUIT" . 9830)
+ ("WHITE CLUB SUIT" . 9831)
+ ("HOT SPRINGS" . 9832)
+ ("QUARTER NOTE" . 9833)
+ ("EIGHTH NOTE" . 9834)
+ ("BEAMED EIGHTH NOTES" . 9835)
+ ("BEAMED SIXTEENTH NOTES" . 9836)
+ ("MUSIC FLAT SIGN" . 9837)
+ ("MUSIC NATURAL SIGN" . 9838)
+ ("MUSIC SHARP SIGN" . 9839)
+ ("WEST SYRIAC CROSS" . 9840)
+ ("EAST SYRIAC CROSS" . 9841)
+ ("UNIVERSAL RECYCLING SYMBOL" . 9842)
+ ("RECYCLING SYMBOL FOR TYPE-1 PLASTICS" . 9843)
+ ("RECYCLING SYMBOL FOR TYPE-2 PLASTICS" . 9844)
+ ("RECYCLING SYMBOL FOR TYPE-3 PLASTICS" . 9845)
+ ("RECYCLING SYMBOL FOR TYPE-4 PLASTICS" . 9846)
+ ("RECYCLING SYMBOL FOR TYPE-5 PLASTICS" . 9847)
+ ("RECYCLING SYMBOL FOR TYPE-6 PLASTICS" . 9848)
+ ("RECYCLING SYMBOL FOR TYPE-7 PLASTICS" . 9849)
+ ("RECYCLING SYMBOL FOR GENERIC MATERIALS" . 9850)
+ ("BLACK UNIVERSAL RECYCLING SYMBOL" . 9851)
+ ("RECYCLED PAPER SYMBOL" . 9852)
+ ("PARTIALLY-RECYCLED PAPER SYMBOL" . 9853)
+ ("DIE FACE-1" . 9856)
+ ("DIE FACE-2" . 9857)
+ ("DIE FACE-3" . 9858)
+ ("DIE FACE-4" . 9859)
+ ("DIE FACE-5" . 9860)
+ ("DIE FACE-6" . 9861)
+ ("WHITE CIRCLE WITH DOT RIGHT" . 9862)
+ ("WHITE CIRCLE WITH TWO DOTS" . 9863)
+ ("BLACK CIRCLE WITH WHITE DOT RIGHT" . 9864)
+ ("BLACK CIRCLE WITH TWO WHITE DOTS" . 9865)
+ ("UPPER BLADE SCISSORS" . 9985)
+ ("BLACK SCISSORS" . 9986)
+ ("LOWER BLADE SCISSORS" . 9987)
+ ("WHITE SCISSORS" . 9988)
+ ("TELEPHONE LOCATION SIGN" . 9990)
+ ("TAPE DRIVE" . 9991)
+ ("AIRPLANE" . 9992)
+ ("ENVELOPE" . 9993)
+ ("VICTORY HAND" . 9996)
+ ("WRITING HAND" . 9997)
+ ("LOWER RIGHT PENCIL" . 9998)
+ ("PENCIL" . 9999)
+ ("UPPER RIGHT PENCIL" . 10000)
+ ("WHITE NIB" . 10001)
+ ("BLACK NIB" . 10002)
+ ("CHECK MARK" . 10003)
+ ("HEAVY CHECK MARK" . 10004)
+ ("MULTIPLICATION X" . 10005)
+ ("HEAVY MULTIPLICATION X" . 10006)
+ ("BALLOT X" . 10007)
+ ("HEAVY BALLOT X" . 10008)
+ ("OUTLINED GREEK CROSS" . 10009)
+ ("HEAVY GREEK CROSS" . 10010)
+ ("OPEN CENTRE CROSS" . 10011)
+ ("HEAVY OPEN CENTRE CROSS" . 10012)
+ ("LATIN CROSS" . 10013)
+ ("SHADOWED WHITE LATIN CROSS" . 10014)
+ ("OUTLINED LATIN CROSS" . 10015)
+ ("MALTESE CROSS" . 10016)
+ ("STAR OF DAVID" . 10017)
+ ("FOUR TEARDROP-SPOKED ASTERISK" . 10018)
+ ("FOUR BALLOON-SPOKED ASTERISK" . 10019)
+ ("HEAVY FOUR BALLOON-SPOKED ASTERISK" . 10020)
+ ("FOUR CLUB-SPOKED ASTERISK" . 10021)
+ ("BLACK FOUR POINTED STAR" . 10022)
+ ("WHITE FOUR POINTED STAR" . 10023)
+ ("STRESS OUTLINED WHITE STAR" . 10025)
+ ("CIRCLED WHITE STAR" . 10026)
+ ("OPEN CENTRE BLACK STAR" . 10027)
+ ("BLACK CENTRE WHITE STAR" . 10028)
+ ("OUTLINED BLACK STAR" . 10029)
+ ("HEAVY OUTLINED BLACK STAR" . 10030)
+ ("PINWHEEL STAR" . 10031)
+ ("SHADOWED WHITE STAR" . 10032)
+ ("HEAVY ASTERISK" . 10033)
+ ("OPEN CENTRE ASTERISK" . 10034)
+ ("EIGHT SPOKED ASTERISK" . 10035)
+ ("EIGHT POINTED BLACK STAR" . 10036)
+ ("EIGHT POINTED PINWHEEL STAR" . 10037)
+ ("SIX POINTED BLACK STAR" . 10038)
+ ("EIGHT POINTED RECTILINEAR BLACK STAR" . 10039)
+ ("HEAVY EIGHT POINTED RECTILINEAR BLACK STAR" . 10040)
+ ("TWELVE POINTED BLACK STAR" . 10041)
+ ("SIXTEEN POINTED ASTERISK" . 10042)
+ ("TEARDROP-SPOKED ASTERISK" . 10043)
+ ("OPEN CENTRE TEARDROP-SPOKED ASTERISK" . 10044)
+ ("HEAVY TEARDROP-SPOKED ASTERISK" . 10045)
+ ("SIX PETALLED BLACK AND WHITE FLORETTE" . 10046)
+ ("BLACK FLORETTE" . 10047)
+ ("WHITE FLORETTE" . 10048)
+ ("EIGHT PETALLED OUTLINED BLACK FLORETTE" . 10049)
+ ("CIRCLED OPEN CENTRE EIGHT POINTED STAR" . 10050)
+ ("HEAVY TEARDROP-SPOKED PINWHEEL ASTERISK" . 10051)
+ ("SNOWFLAKE" . 10052)
+ ("TIGHT TRIFOLIATE SNOWFLAKE" . 10053)
+ ("HEAVY CHEVRON SNOWFLAKE" . 10054)
+ ("SPARKLE" . 10055)
+ ("HEAVY SPARKLE" . 10056)
+ ("BALLOON-SPOKED ASTERISK" . 10057)
+ ("EIGHT TEARDROP-SPOKED PROPELLER ASTERISK" . 10058)
+ ("HEAVY EIGHT TEARDROP-SPOKED PROPELLER ASTERISK" . 10059)
+ ("SHADOWED WHITE CIRCLE" . 10061)
+ ("LOWER RIGHT DROP-SHADOWED WHITE SQUARE" . 10063)
+ ("UPPER RIGHT DROP-SHADOWED WHITE SQUARE" . 10064)
+ ("LOWER RIGHT SHADOWED WHITE SQUARE" . 10065)
+ ("UPPER RIGHT SHADOWED WHITE SQUARE" . 10066)
+ ("BLACK DIAMOND MINUS WHITE X" . 10070)
+ ("LIGHT VERTICAL BAR" . 10072)
+ ("MEDIUM VERTICAL BAR" . 10073)
+ ("HEAVY VERTICAL BAR" . 10074)
+ ("HEAVY SINGLE TURNED COMMA QUOTATION MARK ORNAMENT" . 10075)
+ ("HEAVY SINGLE COMMA QUOTATION MARK ORNAMENT" . 10076)
+ ("HEAVY DOUBLE TURNED COMMA QUOTATION MARK ORNAMENT" . 10077)
+ ("HEAVY DOUBLE COMMA QUOTATION MARK ORNAMENT" . 10078)
+ ("CURVED STEM PARAGRAPH SIGN ORNAMENT" . 10081)
+ ("HEAVY EXCLAMATION MARK ORNAMENT" . 10082)
+ ("HEAVY HEART EXCLAMATION MARK ORNAMENT" . 10083)
+ ("HEAVY BLACK HEART" . 10084)
+ ("ROTATED HEAVY BLACK HEART BULLET" . 10085)
+ ("FLORAL HEART" . 10086)
+ ("ROTATED FLORAL HEART BULLET" . 10087)
+ ("MEDIUM LEFT PARENTHESIS ORNAMENT" . 10088)
+ ("MEDIUM RIGHT PARENTHESIS ORNAMENT" . 10089)
+ ("MEDIUM FLATTENED LEFT PARENTHESIS ORNAMENT" . 10090)
+ ("MEDIUM FLATTENED RIGHT PARENTHESIS ORNAMENT" . 10091)
+ ("MEDIUM LEFT-POINTING ANGLE BRACKET ORNAMENT" . 10092)
+ ("MEDIUM RIGHT-POINTING ANGLE BRACKET ORNAMENT" . 10093)
+ ("HEAVY LEFT-POINTING ANGLE QUOTATION MARK ORNAMENT" . 10094)
+ ("HEAVY RIGHT-POINTING ANGLE QUOTATION MARK ORNAMENT" . 10095)
+ ("HEAVY LEFT-POINTING ANGLE BRACKET ORNAMENT" . 10096)
+ ("HEAVY RIGHT-POINTING ANGLE BRACKET ORNAMENT" . 10097)
+ ("LIGHT LEFT TORTOISE SHELL BRACKET ORNAMENT" . 10098)
+ ("LIGHT RIGHT TORTOISE SHELL BRACKET ORNAMENT" . 10099)
+ ("MEDIUM LEFT CURLY BRACKET ORNAMENT" . 10100)
+ ("MEDIUM RIGHT CURLY BRACKET ORNAMENT" . 10101)
+ ("DINGBAT NEGATIVE CIRCLED DIGIT ONE" . 10102)
+ ("DINGBAT NEGATIVE CIRCLED DIGIT TWO" . 10103)
+ ("DINGBAT NEGATIVE CIRCLED DIGIT THREE" . 10104)
+ ("DINGBAT NEGATIVE CIRCLED DIGIT FOUR" . 10105)
+ ("DINGBAT NEGATIVE CIRCLED DIGIT FIVE" . 10106)
+ ("DINGBAT NEGATIVE CIRCLED DIGIT SIX" . 10107)
+ ("DINGBAT NEGATIVE CIRCLED DIGIT SEVEN" . 10108)
+ ("DINGBAT NEGATIVE CIRCLED DIGIT EIGHT" . 10109)
+ ("DINGBAT NEGATIVE CIRCLED DIGIT NINE" . 10110)
+ ("DINGBAT NEGATIVE CIRCLED NUMBER TEN" . 10111)
+ ("DINGBAT CIRCLED SANS-SERIF DIGIT ONE" . 10112)
+ ("DINGBAT CIRCLED SANS-SERIF DIGIT TWO" . 10113)
+ ("DINGBAT CIRCLED SANS-SERIF DIGIT THREE" . 10114)
+ ("DINGBAT CIRCLED SANS-SERIF DIGIT FOUR" . 10115)
+ ("DINGBAT CIRCLED SANS-SERIF DIGIT FIVE" . 10116)
+ ("DINGBAT CIRCLED SANS-SERIF DIGIT SIX" . 10117)
+ ("DINGBAT CIRCLED SANS-SERIF DIGIT SEVEN" . 10118)
+ ("DINGBAT CIRCLED SANS-SERIF DIGIT EIGHT" . 10119)
+ ("DINGBAT CIRCLED SANS-SERIF DIGIT NINE" . 10120)
+ ("DINGBAT CIRCLED SANS-SERIF NUMBER TEN" . 10121)
+ ("DINGBAT NEGATIVE CIRCLED SANS-SERIF DIGIT ONE" . 10122)
+ ("DINGBAT NEGATIVE CIRCLED SANS-SERIF DIGIT TWO" . 10123)
+ ("DINGBAT NEGATIVE CIRCLED SANS-SERIF DIGIT THREE" . 10124)
+ ("DINGBAT NEGATIVE CIRCLED SANS-SERIF DIGIT FOUR" . 10125)
+ ("DINGBAT NEGATIVE CIRCLED SANS-SERIF DIGIT FIVE" . 10126)
+ ("DINGBAT NEGATIVE CIRCLED SANS-SERIF DIGIT SIX" . 10127)
+ ("DINGBAT NEGATIVE CIRCLED SANS-SERIF DIGIT SEVEN" . 10128)
+ ("DINGBAT NEGATIVE CIRCLED SANS-SERIF DIGIT EIGHT" . 10129)
+ ("DINGBAT NEGATIVE CIRCLED SANS-SERIF DIGIT NINE" . 10130)
+ ("DINGBAT NEGATIVE CIRCLED SANS-SERIF NUMBER TEN" . 10131)
+ ("HEAVY WIDE-HEADED RIGHTWARDS ARROW" . 10132)
+ ("HEAVY SOUTH EAST ARROW" . 10136)
+ ("HEAVY RIGHTWARDS ARROW" . 10137)
+ ("HEAVY NORTH EAST ARROW" . 10138)
+ ("DRAFTING POINT RIGHTWARDS ARROW" . 10139)
+ ("HEAVY ROUND-TIPPED RIGHTWARDS ARROW" . 10140)
+ ("TRIANGLE-HEADED RIGHTWARDS ARROW" . 10141)
+ ("HEAVY TRIANGLE-HEADED RIGHTWARDS ARROW" . 10142)
+ ("DASHED TRIANGLE-HEADED RIGHTWARDS ARROW" . 10143)
+ ("HEAVY DASHED TRIANGLE-HEADED RIGHTWARDS ARROW" . 10144)
+ ("BLACK RIGHTWARDS ARROW" . 10145)
+ ("THREE-D TOP-LIGHTED RIGHTWARDS ARROWHEAD" . 10146)
+ ("THREE-D BOTTOM-LIGHTED RIGHTWARDS ARROWHEAD" . 10147)
+ ("BLACK RIGHTWARDS ARROWHEAD" . 10148)
+ ("HEAVY BLACK CURVED DOWNWARDS AND RIGHTWARDS ARROW" . 10149)
+ ("HEAVY BLACK CURVED UPWARDS AND RIGHTWARDS ARROW" . 10150)
+ ("SQUAT BLACK RIGHTWARDS ARROW" . 10151)
+ ("HEAVY CONCAVE-POINTED BLACK RIGHTWARDS ARROW" . 10152)
+ ("RIGHT-SHADED WHITE RIGHTWARDS ARROW" . 10153)
+ ("LEFT-SHADED WHITE RIGHTWARDS ARROW" . 10154)
+ ("BACK-TILTED SHADOWED WHITE RIGHTWARDS ARROW" . 10155)
+ ("FRONT-TILTED SHADOWED WHITE RIGHTWARDS ARROW" . 10156)
+ ("HEAVY LOWER RIGHT-SHADOWED WHITE RIGHTWARDS ARROW" . 10157)
+ ("HEAVY UPPER RIGHT-SHADOWED WHITE RIGHTWARDS ARROW" . 10158)
+ ("NOTCHED LOWER RIGHT-SHADOWED WHITE RIGHTWARDS ARROW" . 10159)
+ ("NOTCHED UPPER RIGHT-SHADOWED WHITE RIGHTWARDS ARROW" . 10161)
+ ("CIRCLED HEAVY WHITE RIGHTWARDS ARROW" . 10162)
+ ("WHITE-FEATHERED RIGHTWARDS ARROW" . 10163)
+ ("BLACK-FEATHERED SOUTH EAST ARROW" . 10164)
+ ("BLACK-FEATHERED RIGHTWARDS ARROW" . 10165)
+ ("BLACK-FEATHERED NORTH EAST ARROW" . 10166)
+ ("HEAVY BLACK-FEATHERED SOUTH EAST ARROW" . 10167)
+ ("HEAVY BLACK-FEATHERED RIGHTWARDS ARROW" . 10168)
+ ("HEAVY BLACK-FEATHERED NORTH EAST ARROW" . 10169)
+ ("TEARDROP-BARBED RIGHTWARDS ARROW" . 10170)
+ ("HEAVY TEARDROP-SHANKED RIGHTWARDS ARROW" . 10171)
+ ("WEDGE-TAILED RIGHTWARDS ARROW" . 10172)
+ ("HEAVY WEDGE-TAILED RIGHTWARDS ARROW" . 10173)
+ ("OPEN-OUTLINED RIGHTWARDS ARROW" . 10174)
+ ("WHITE DIAMOND WITH CENTRED DOT" . 10192)
+ ("AND WITH DOT" . 10193)
+ ("ELEMENT OF OPENING UPWARDS" . 10194)
+ ("LOWER RIGHT CORNER WITH DOT" . 10195)
+ ("UPPER LEFT CORNER WITH DOT" . 10196)
+ ("LEFT OUTER JOIN" . 10197)
+ ("RIGHT OUTER JOIN" . 10198)
+ ("FULL OUTER JOIN" . 10199)
+ ("LARGE UP TACK" . 10200)
+ ("LARGE DOWN TACK" . 10201)
+ ("LEFT AND RIGHT DOUBLE TURNSTILE" . 10202)
+ ("LEFT AND RIGHT TACK" . 10203)
+ ("LEFT MULTIMAP" . 10204)
+ ("LONG RIGHT TACK" . 10205)
+ ("LONG LEFT TACK" . 10206)
+ ("UP TACK WITH CIRCLE ABOVE" . 10207)
+ ("LOZENGE DIVIDED BY HORIZONTAL RULE" . 10208)
+ ("WHITE CONCAVE-SIDED DIAMOND" . 10209)
+ ("WHITE CONCAVE-SIDED DIAMOND WITH LEFTWARDS TICK" . 10210)
+ ("WHITE CONCAVE-SIDED DIAMOND WITH RIGHTWARDS TICK" . 10211)
+ ("WHITE SQUARE WITH LEFTWARDS TICK" . 10212)
+ ("WHITE SQUARE WITH RIGHTWARDS TICK" . 10213)
+ ("MATHEMATICAL LEFT WHITE SQUARE BRACKET" . 10214)
+ ("MATHEMATICAL RIGHT WHITE SQUARE BRACKET" . 10215)
+ ("MATHEMATICAL LEFT ANGLE BRACKET" . 10216)
+ ("MATHEMATICAL RIGHT ANGLE BRACKET" . 10217)
+ ("MATHEMATICAL LEFT DOUBLE ANGLE BRACKET" . 10218)
+ ("MATHEMATICAL RIGHT DOUBLE ANGLE BRACKET" . 10219)
+ ("UPWARDS QUADRUPLE ARROW" . 10224)
+ ("DOWNWARDS QUADRUPLE ARROW" . 10225)
+ ("ANTICLOCKWISE GAPPED CIRCLE ARROW" . 10226)
+ ("CLOCKWISE GAPPED CIRCLE ARROW" . 10227)
+ ("RIGHT ARROW WITH CIRCLED PLUS" . 10228)
+ ("LONG LEFTWARDS ARROW" . 10229)
+ ("LONG RIGHTWARDS ARROW" . 10230)
+ ("LONG LEFT RIGHT ARROW" . 10231)
+ ("LONG LEFTWARDS DOUBLE ARROW" . 10232)
+ ("LONG RIGHTWARDS DOUBLE ARROW" . 10233)
+ ("LONG LEFT RIGHT DOUBLE ARROW" . 10234)
+ ("LONG LEFTWARDS ARROW FROM BAR" . 10235)
+ ("LONG RIGHTWARDS ARROW FROM BAR" . 10236)
+ ("LONG LEFTWARDS DOUBLE ARROW FROM BAR" . 10237)
+ ("LONG RIGHTWARDS DOUBLE ARROW FROM BAR" . 10238)
+ ("LONG RIGHTWARDS SQUIGGLE ARROW" . 10239)
+ ("BRAILLE PATTERN BLANK" . 10240)
+ ("BRAILLE PATTERN DOTS-1" . 10241)
+ ("BRAILLE PATTERN DOTS-2" . 10242)
+ ("BRAILLE PATTERN DOTS-12" . 10243)
+ ("BRAILLE PATTERN DOTS-3" . 10244)
+ ("BRAILLE PATTERN DOTS-13" . 10245)
+ ("BRAILLE PATTERN DOTS-23" . 10246)
+ ("BRAILLE PATTERN DOTS-123" . 10247)
+ ("BRAILLE PATTERN DOTS-4" . 10248)
+ ("BRAILLE PATTERN DOTS-14" . 10249)
+ ("BRAILLE PATTERN DOTS-24" . 10250)
+ ("BRAILLE PATTERN DOTS-124" . 10251)
+ ("BRAILLE PATTERN DOTS-34" . 10252)
+ ("BRAILLE PATTERN DOTS-134" . 10253)
+ ("BRAILLE PATTERN DOTS-234" . 10254)
+ ("BRAILLE PATTERN DOTS-1234" . 10255)
+ ("BRAILLE PATTERN DOTS-5" . 10256)
+ ("BRAILLE PATTERN DOTS-15" . 10257)
+ ("BRAILLE PATTERN DOTS-25" . 10258)
+ ("BRAILLE PATTERN DOTS-125" . 10259)
+ ("BRAILLE PATTERN DOTS-35" . 10260)
+ ("BRAILLE PATTERN DOTS-135" . 10261)
+ ("BRAILLE PATTERN DOTS-235" . 10262)
+ ("BRAILLE PATTERN DOTS-1235" . 10263)
+ ("BRAILLE PATTERN DOTS-45" . 10264)
+ ("BRAILLE PATTERN DOTS-145" . 10265)
+ ("BRAILLE PATTERN DOTS-245" . 10266)
+ ("BRAILLE PATTERN DOTS-1245" . 10267)
+ ("BRAILLE PATTERN DOTS-345" . 10268)
+ ("BRAILLE PATTERN DOTS-1345" . 10269)
+ ("BRAILLE PATTERN DOTS-2345" . 10270)
+ ("BRAILLE PATTERN DOTS-12345" . 10271)
+ ("BRAILLE PATTERN DOTS-6" . 10272)
+ ("BRAILLE PATTERN DOTS-16" . 10273)
+ ("BRAILLE PATTERN DOTS-26" . 10274)
+ ("BRAILLE PATTERN DOTS-126" . 10275)
+ ("BRAILLE PATTERN DOTS-36" . 10276)
+ ("BRAILLE PATTERN DOTS-136" . 10277)
+ ("BRAILLE PATTERN DOTS-236" . 10278)
+ ("BRAILLE PATTERN DOTS-1236" . 10279)
+ ("BRAILLE PATTERN DOTS-46" . 10280)
+ ("BRAILLE PATTERN DOTS-146" . 10281)
+ ("BRAILLE PATTERN DOTS-246" . 10282)
+ ("BRAILLE PATTERN DOTS-1246" . 10283)
+ ("BRAILLE PATTERN DOTS-346" . 10284)
+ ("BRAILLE PATTERN DOTS-1346" . 10285)
+ ("BRAILLE PATTERN DOTS-2346" . 10286)
+ ("BRAILLE PATTERN DOTS-12346" . 10287)
+ ("BRAILLE PATTERN DOTS-56" . 10288)
+ ("BRAILLE PATTERN DOTS-156" . 10289)
+ ("BRAILLE PATTERN DOTS-256" . 10290)
+ ("BRAILLE PATTERN DOTS-1256" . 10291)
+ ("BRAILLE PATTERN DOTS-356" . 10292)
+ ("BRAILLE PATTERN DOTS-1356" . 10293)
+ ("BRAILLE PATTERN DOTS-2356" . 10294)
+ ("BRAILLE PATTERN DOTS-12356" . 10295)
+ ("BRAILLE PATTERN DOTS-456" . 10296)
+ ("BRAILLE PATTERN DOTS-1456" . 10297)
+ ("BRAILLE PATTERN DOTS-2456" . 10298)
+ ("BRAILLE PATTERN DOTS-12456" . 10299)
+ ("BRAILLE PATTERN DOTS-3456" . 10300)
+ ("BRAILLE PATTERN DOTS-13456" . 10301)
+ ("BRAILLE PATTERN DOTS-23456" . 10302)
+ ("BRAILLE PATTERN DOTS-123456" . 10303)
+ ("BRAILLE PATTERN DOTS-7" . 10304)
+ ("BRAILLE PATTERN DOTS-17" . 10305)
+ ("BRAILLE PATTERN DOTS-27" . 10306)
+ ("BRAILLE PATTERN DOTS-127" . 10307)
+ ("BRAILLE PATTERN DOTS-37" . 10308)
+ ("BRAILLE PATTERN DOTS-137" . 10309)
+ ("BRAILLE PATTERN DOTS-237" . 10310)
+ ("BRAILLE PATTERN DOTS-1237" . 10311)
+ ("BRAILLE PATTERN DOTS-47" . 10312)
+ ("BRAILLE PATTERN DOTS-147" . 10313)
+ ("BRAILLE PATTERN DOTS-247" . 10314)
+ ("BRAILLE PATTERN DOTS-1247" . 10315)
+ ("BRAILLE PATTERN DOTS-347" . 10316)
+ ("BRAILLE PATTERN DOTS-1347" . 10317)
+ ("BRAILLE PATTERN DOTS-2347" . 10318)
+ ("BRAILLE PATTERN DOTS-12347" . 10319)
+ ("BRAILLE PATTERN DOTS-57" . 10320)
+ ("BRAILLE PATTERN DOTS-157" . 10321)
+ ("BRAILLE PATTERN DOTS-257" . 10322)
+ ("BRAILLE PATTERN DOTS-1257" . 10323)
+ ("BRAILLE PATTERN DOTS-357" . 10324)
+ ("BRAILLE PATTERN DOTS-1357" . 10325)
+ ("BRAILLE PATTERN DOTS-2357" . 10326)
+ ("BRAILLE PATTERN DOTS-12357" . 10327)
+ ("BRAILLE PATTERN DOTS-457" . 10328)
+ ("BRAILLE PATTERN DOTS-1457" . 10329)
+ ("BRAILLE PATTERN DOTS-2457" . 10330)
+ ("BRAILLE PATTERN DOTS-12457" . 10331)
+ ("BRAILLE PATTERN DOTS-3457" . 10332)
+ ("BRAILLE PATTERN DOTS-13457" . 10333)
+ ("BRAILLE PATTERN DOTS-23457" . 10334)
+ ("BRAILLE PATTERN DOTS-123457" . 10335)
+ ("BRAILLE PATTERN DOTS-67" . 10336)
+ ("BRAILLE PATTERN DOTS-167" . 10337)
+ ("BRAILLE PATTERN DOTS-267" . 10338)
+ ("BRAILLE PATTERN DOTS-1267" . 10339)
+ ("BRAILLE PATTERN DOTS-367" . 10340)
+ ("BRAILLE PATTERN DOTS-1367" . 10341)
+ ("BRAILLE PATTERN DOTS-2367" . 10342)
+ ("BRAILLE PATTERN DOTS-12367" . 10343)
+ ("BRAILLE PATTERN DOTS-467" . 10344)
+ ("BRAILLE PATTERN DOTS-1467" . 10345)
+ ("BRAILLE PATTERN DOTS-2467" . 10346)
+ ("BRAILLE PATTERN DOTS-12467" . 10347)
+ ("BRAILLE PATTERN DOTS-3467" . 10348)
+ ("BRAILLE PATTERN DOTS-13467" . 10349)
+ ("BRAILLE PATTERN DOTS-23467" . 10350)
+ ("BRAILLE PATTERN DOTS-123467" . 10351)
+ ("BRAILLE PATTERN DOTS-567" . 10352)
+ ("BRAILLE PATTERN DOTS-1567" . 10353)
+ ("BRAILLE PATTERN DOTS-2567" . 10354)
+ ("BRAILLE PATTERN DOTS-12567" . 10355)
+ ("BRAILLE PATTERN DOTS-3567" . 10356)
+ ("BRAILLE PATTERN DOTS-13567" . 10357)
+ ("BRAILLE PATTERN DOTS-23567" . 10358)
+ ("BRAILLE PATTERN DOTS-123567" . 10359)
+ ("BRAILLE PATTERN DOTS-4567" . 10360)
+ ("BRAILLE PATTERN DOTS-14567" . 10361)
+ ("BRAILLE PATTERN DOTS-24567" . 10362)
+ ("BRAILLE PATTERN DOTS-124567" . 10363)
+ ("BRAILLE PATTERN DOTS-34567" . 10364)
+ ("BRAILLE PATTERN DOTS-134567" . 10365)
+ ("BRAILLE PATTERN DOTS-234567" . 10366)
+ ("BRAILLE PATTERN DOTS-1234567" . 10367)
+ ("BRAILLE PATTERN DOTS-8" . 10368)
+ ("BRAILLE PATTERN DOTS-18" . 10369)
+ ("BRAILLE PATTERN DOTS-28" . 10370)
+ ("BRAILLE PATTERN DOTS-128" . 10371)
+ ("BRAILLE PATTERN DOTS-38" . 10372)
+ ("BRAILLE PATTERN DOTS-138" . 10373)
+ ("BRAILLE PATTERN DOTS-238" . 10374)
+ ("BRAILLE PATTERN DOTS-1238" . 10375)
+ ("BRAILLE PATTERN DOTS-48" . 10376)
+ ("BRAILLE PATTERN DOTS-148" . 10377)
+ ("BRAILLE PATTERN DOTS-248" . 10378)
+ ("BRAILLE PATTERN DOTS-1248" . 10379)
+ ("BRAILLE PATTERN DOTS-348" . 10380)
+ ("BRAILLE PATTERN DOTS-1348" . 10381)
+ ("BRAILLE PATTERN DOTS-2348" . 10382)
+ ("BRAILLE PATTERN DOTS-12348" . 10383)
+ ("BRAILLE PATTERN DOTS-58" . 10384)
+ ("BRAILLE PATTERN DOTS-158" . 10385)
+ ("BRAILLE PATTERN DOTS-258" . 10386)
+ ("BRAILLE PATTERN DOTS-1258" . 10387)
+ ("BRAILLE PATTERN DOTS-358" . 10388)
+ ("BRAILLE PATTERN DOTS-1358" . 10389)
+ ("BRAILLE PATTERN DOTS-2358" . 10390)
+ ("BRAILLE PATTERN DOTS-12358" . 10391)
+ ("BRAILLE PATTERN DOTS-458" . 10392)
+ ("BRAILLE PATTERN DOTS-1458" . 10393)
+ ("BRAILLE PATTERN DOTS-2458" . 10394)
+ ("BRAILLE PATTERN DOTS-12458" . 10395)
+ ("BRAILLE PATTERN DOTS-3458" . 10396)
+ ("BRAILLE PATTERN DOTS-13458" . 10397)
+ ("BRAILLE PATTERN DOTS-23458" . 10398)
+ ("BRAILLE PATTERN DOTS-123458" . 10399)
+ ("BRAILLE PATTERN DOTS-68" . 10400)
+ ("BRAILLE PATTERN DOTS-168" . 10401)
+ ("BRAILLE PATTERN DOTS-268" . 10402)
+ ("BRAILLE PATTERN DOTS-1268" . 10403)
+ ("BRAILLE PATTERN DOTS-368" . 10404)
+ ("BRAILLE PATTERN DOTS-1368" . 10405)
+ ("BRAILLE PATTERN DOTS-2368" . 10406)
+ ("BRAILLE PATTERN DOTS-12368" . 10407)
+ ("BRAILLE PATTERN DOTS-468" . 10408)
+ ("BRAILLE PATTERN DOTS-1468" . 10409)
+ ("BRAILLE PATTERN DOTS-2468" . 10410)
+ ("BRAILLE PATTERN DOTS-12468" . 10411)
+ ("BRAILLE PATTERN DOTS-3468" . 10412)
+ ("BRAILLE PATTERN DOTS-13468" . 10413)
+ ("BRAILLE PATTERN DOTS-23468" . 10414)
+ ("BRAILLE PATTERN DOTS-123468" . 10415)
+ ("BRAILLE PATTERN DOTS-568" . 10416)
+ ("BRAILLE PATTERN DOTS-1568" . 10417)
+ ("BRAILLE PATTERN DOTS-2568" . 10418)
+ ("BRAILLE PATTERN DOTS-12568" . 10419)
+ ("BRAILLE PATTERN DOTS-3568" . 10420)
+ ("BRAILLE PATTERN DOTS-13568" . 10421)
+ ("BRAILLE PATTERN DOTS-23568" . 10422)
+ ("BRAILLE PATTERN DOTS-123568" . 10423)
+ ("BRAILLE PATTERN DOTS-4568" . 10424)
+ ("BRAILLE PATTERN DOTS-14568" . 10425)
+ ("BRAILLE PATTERN DOTS-24568" . 10426)
+ ("BRAILLE PATTERN DOTS-124568" . 10427)
+ ("BRAILLE PATTERN DOTS-34568" . 10428)
+ ("BRAILLE PATTERN DOTS-134568" . 10429)
+ ("BRAILLE PATTERN DOTS-234568" . 10430)
+ ("BRAILLE PATTERN DOTS-1234568" . 10431)
+ ("BRAILLE PATTERN DOTS-78" . 10432)
+ ("BRAILLE PATTERN DOTS-178" . 10433)
+ ("BRAILLE PATTERN DOTS-278" . 10434)
+ ("BRAILLE PATTERN DOTS-1278" . 10435)
+ ("BRAILLE PATTERN DOTS-378" . 10436)
+ ("BRAILLE PATTERN DOTS-1378" . 10437)
+ ("BRAILLE PATTERN DOTS-2378" . 10438)
+ ("BRAILLE PATTERN DOTS-12378" . 10439)
+ ("BRAILLE PATTERN DOTS-478" . 10440)
+ ("BRAILLE PATTERN DOTS-1478" . 10441)
+ ("BRAILLE PATTERN DOTS-2478" . 10442)
+ ("BRAILLE PATTERN DOTS-12478" . 10443)
+ ("BRAILLE PATTERN DOTS-3478" . 10444)
+ ("BRAILLE PATTERN DOTS-13478" . 10445)
+ ("BRAILLE PATTERN DOTS-23478" . 10446)
+ ("BRAILLE PATTERN DOTS-123478" . 10447)
+ ("BRAILLE PATTERN DOTS-578" . 10448)
+ ("BRAILLE PATTERN DOTS-1578" . 10449)
+ ("BRAILLE PATTERN DOTS-2578" . 10450)
+ ("BRAILLE PATTERN DOTS-12578" . 10451)
+ ("BRAILLE PATTERN DOTS-3578" . 10452)
+ ("BRAILLE PATTERN DOTS-13578" . 10453)
+ ("BRAILLE PATTERN DOTS-23578" . 10454)
+ ("BRAILLE PATTERN DOTS-123578" . 10455)
+ ("BRAILLE PATTERN DOTS-4578" . 10456)
+ ("BRAILLE PATTERN DOTS-14578" . 10457)
+ ("BRAILLE PATTERN DOTS-24578" . 10458)
+ ("BRAILLE PATTERN DOTS-124578" . 10459)
+ ("BRAILLE PATTERN DOTS-34578" . 10460)
+ ("BRAILLE PATTERN DOTS-134578" . 10461)
+ ("BRAILLE PATTERN DOTS-234578" . 10462)
+ ("BRAILLE PATTERN DOTS-1234578" . 10463)
+ ("BRAILLE PATTERN DOTS-678" . 10464)
+ ("BRAILLE PATTERN DOTS-1678" . 10465)
+ ("BRAILLE PATTERN DOTS-2678" . 10466)
+ ("BRAILLE PATTERN DOTS-12678" . 10467)
+ ("BRAILLE PATTERN DOTS-3678" . 10468)
+ ("BRAILLE PATTERN DOTS-13678" . 10469)
+ ("BRAILLE PATTERN DOTS-23678" . 10470)
+ ("BRAILLE PATTERN DOTS-123678" . 10471)
+ ("BRAILLE PATTERN DOTS-4678" . 10472)
+ ("BRAILLE PATTERN DOTS-14678" . 10473)
+ ("BRAILLE PATTERN DOTS-24678" . 10474)
+ ("BRAILLE PATTERN DOTS-124678" . 10475)
+ ("BRAILLE PATTERN DOTS-34678" . 10476)
+ ("BRAILLE PATTERN DOTS-134678" . 10477)
+ ("BRAILLE PATTERN DOTS-234678" . 10478)
+ ("BRAILLE PATTERN DOTS-1234678" . 10479)
+ ("BRAILLE PATTERN DOTS-5678" . 10480)
+ ("BRAILLE PATTERN DOTS-15678" . 10481)
+ ("BRAILLE PATTERN DOTS-25678" . 10482)
+ ("BRAILLE PATTERN DOTS-125678" . 10483)
+ ("BRAILLE PATTERN DOTS-35678" . 10484)
+ ("BRAILLE PATTERN DOTS-135678" . 10485)
+ ("BRAILLE PATTERN DOTS-235678" . 10486)
+ ("BRAILLE PATTERN DOTS-1235678" . 10487)
+ ("BRAILLE PATTERN DOTS-45678" . 10488)
+ ("BRAILLE PATTERN DOTS-145678" . 10489)
+ ("BRAILLE PATTERN DOTS-245678" . 10490)
+ ("BRAILLE PATTERN DOTS-1245678" . 10491)
+ ("BRAILLE PATTERN DOTS-345678" . 10492)
+ ("BRAILLE PATTERN DOTS-1345678" . 10493)
+ ("BRAILLE PATTERN DOTS-2345678" . 10494)
+ ("BRAILLE PATTERN DOTS-12345678" . 10495)
+ ("RIGHTWARDS TWO-HEADED ARROW WITH VERTICAL STROKE" . 10496)
+ ("RIGHTWARDS TWO-HEADED ARROW WITH DOUBLE VERTICAL STROKE" . 10497)
+ ("LEFTWARDS DOUBLE ARROW WITH VERTICAL STROKE" . 10498)
+ ("RIGHTWARDS DOUBLE ARROW WITH VERTICAL STROKE" . 10499)
+ ("LEFT RIGHT DOUBLE ARROW WITH VERTICAL STROKE" . 10500)
+ ("RIGHTWARDS TWO-HEADED ARROW FROM BAR" . 10501)
+ ("LEFTWARDS DOUBLE ARROW FROM BAR" . 10502)
+ ("RIGHTWARDS DOUBLE ARROW FROM BAR" . 10503)
+ ("DOWNWARDS ARROW WITH HORIZONTAL STROKE" . 10504)
+ ("UPWARDS ARROW WITH HORIZONTAL STROKE" . 10505)
+ ("UPWARDS TRIPLE ARROW" . 10506)
+ ("DOWNWARDS TRIPLE ARROW" . 10507)
+ ("LEFTWARDS DOUBLE DASH ARROW" . 10508)
+ ("RIGHTWARDS DOUBLE DASH ARROW" . 10509)
+ ("LEFTWARDS TRIPLE DASH ARROW" . 10510)
+ ("RIGHTWARDS TRIPLE DASH ARROW" . 10511)
+ ("RIGHTWARDS TWO-HEADED TRIPLE DASH ARROW" . 10512)
+ ("RIGHTWARDS ARROW WITH DOTTED STEM" . 10513)
+ ("UPWARDS ARROW TO BAR" . 10514)
+ ("DOWNWARDS ARROW TO BAR" . 10515)
+ ("RIGHTWARDS ARROW WITH TAIL WITH VERTICAL STROKE" . 10516)
+ ("RIGHTWARDS ARROW WITH TAIL WITH DOUBLE VERTICAL STROKE" . 10517)
+ ("RIGHTWARDS TWO-HEADED ARROW WITH TAIL" . 10518)
+ ("RIGHTWARDS TWO-HEADED ARROW WITH TAIL WITH VERTICAL STROKE" . 10519)
+ ("RIGHTWARDS TWO-HEADED ARROW WITH TAIL WITH DOUBLE VERTICAL STROKE" . 10520)
+ ("LEFTWARDS ARROW-TAIL" . 10521)
+ ("RIGHTWARDS ARROW-TAIL" . 10522)
+ ("LEFTWARDS DOUBLE ARROW-TAIL" . 10523)
+ ("RIGHTWARDS DOUBLE ARROW-TAIL" . 10524)
+ ("LEFTWARDS ARROW TO BLACK DIAMOND" . 10525)
+ ("RIGHTWARDS ARROW TO BLACK DIAMOND" . 10526)
+ ("LEFTWARDS ARROW FROM BAR TO BLACK DIAMOND" . 10527)
+ ("RIGHTWARDS ARROW FROM BAR TO BLACK DIAMOND" . 10528)
+ ("NORTH WEST AND SOUTH EAST ARROW" . 10529)
+ ("NORTH EAST AND SOUTH WEST ARROW" . 10530)
+ ("NORTH WEST ARROW WITH HOOK" . 10531)
+ ("NORTH EAST ARROW WITH HOOK" . 10532)
+ ("SOUTH EAST ARROW WITH HOOK" . 10533)
+ ("SOUTH WEST ARROW WITH HOOK" . 10534)
+ ("NORTH WEST ARROW AND NORTH EAST ARROW" . 10535)
+ ("NORTH EAST ARROW AND SOUTH EAST ARROW" . 10536)
+ ("SOUTH EAST ARROW AND SOUTH WEST ARROW" . 10537)
+ ("SOUTH WEST ARROW AND NORTH WEST ARROW" . 10538)
+ ("RISING DIAGONAL CROSSING FALLING DIAGONAL" . 10539)
+ ("FALLING DIAGONAL CROSSING RISING DIAGONAL" . 10540)
+ ("SOUTH EAST ARROW CROSSING NORTH EAST ARROW" . 10541)
+ ("NORTH EAST ARROW CROSSING SOUTH EAST ARROW" . 10542)
+ ("FALLING DIAGONAL CROSSING NORTH EAST ARROW" . 10543)
+ ("RISING DIAGONAL CROSSING SOUTH EAST ARROW" . 10544)
+ ("NORTH EAST ARROW CROSSING NORTH WEST ARROW" . 10545)
+ ("NORTH WEST ARROW CROSSING NORTH EAST ARROW" . 10546)
+ ("WAVE ARROW POINTING DIRECTLY RIGHT" . 10547)
+ ("ARROW POINTING RIGHTWARDS THEN CURVING UPWARDS" . 10548)
+ ("ARROW POINTING RIGHTWARDS THEN CURVING DOWNWARDS" . 10549)
+ ("ARROW POINTING DOWNWARDS THEN CURVING LEFTWARDS" . 10550)
+ ("ARROW POINTING DOWNWARDS THEN CURVING RIGHTWARDS" . 10551)
+ ("RIGHT-SIDE ARC CLOCKWISE ARROW" . 10552)
+ ("LEFT-SIDE ARC ANTICLOCKWISE ARROW" . 10553)
+ ("TOP ARC ANTICLOCKWISE ARROW" . 10554)
+ ("BOTTOM ARC ANTICLOCKWISE ARROW" . 10555)
+ ("TOP ARC CLOCKWISE ARROW WITH MINUS" . 10556)
+ ("TOP ARC ANTICLOCKWISE ARROW WITH PLUS" . 10557)
+ ("LOWER RIGHT SEMICIRCULAR CLOCKWISE ARROW" . 10558)
+ ("LOWER LEFT SEMICIRCULAR ANTICLOCKWISE ARROW" . 10559)
+ ("ANTICLOCKWISE CLOSED CIRCLE ARROW" . 10560)
+ ("CLOCKWISE CLOSED CIRCLE ARROW" . 10561)
+ ("RIGHTWARDS ARROW ABOVE SHORT LEFTWARDS ARROW" . 10562)
+ ("LEFTWARDS ARROW ABOVE SHORT RIGHTWARDS ARROW" . 10563)
+ ("SHORT RIGHTWARDS ARROW ABOVE LEFTWARDS ARROW" . 10564)
+ ("RIGHTWARDS ARROW WITH PLUS BELOW" . 10565)
+ ("LEFTWARDS ARROW WITH PLUS BELOW" . 10566)
+ ("RIGHTWARDS ARROW THROUGH X" . 10567)
+ ("LEFT RIGHT ARROW THROUGH SMALL CIRCLE" . 10568)
+ ("UPWARDS TWO-HEADED ARROW FROM SMALL CIRCLE" . 10569)
+ ("LEFT BARB UP RIGHT BARB DOWN HARPOON" . 10570)
+ ("LEFT BARB DOWN RIGHT BARB UP HARPOON" . 10571)
+ ("UP BARB RIGHT DOWN BARB LEFT HARPOON" . 10572)
+ ("UP BARB LEFT DOWN BARB RIGHT HARPOON" . 10573)
+ ("LEFT BARB UP RIGHT BARB UP HARPOON" . 10574)
+ ("UP BARB RIGHT DOWN BARB RIGHT HARPOON" . 10575)
+ ("LEFT BARB DOWN RIGHT BARB DOWN HARPOON" . 10576)
+ ("UP BARB LEFT DOWN BARB LEFT HARPOON" . 10577)
+ ("LEFTWARDS HARPOON WITH BARB UP TO BAR" . 10578)
+ ("RIGHTWARDS HARPOON WITH BARB UP TO BAR" . 10579)
+ ("UPWARDS HARPOON WITH BARB RIGHT TO BAR" . 10580)
+ ("DOWNWARDS HARPOON WITH BARB RIGHT TO BAR" . 10581)
+ ("LEFTWARDS HARPOON WITH BARB DOWN TO BAR" . 10582)
+ ("RIGHTWARDS HARPOON WITH BARB DOWN TO BAR" . 10583)
+ ("UPWARDS HARPOON WITH BARB LEFT TO BAR" . 10584)
+ ("DOWNWARDS HARPOON WITH BARB LEFT TO BAR" . 10585)
+ ("LEFTWARDS HARPOON WITH BARB UP FROM BAR" . 10586)
+ ("RIGHTWARDS HARPOON WITH BARB UP FROM BAR" . 10587)
+ ("UPWARDS HARPOON WITH BARB RIGHT FROM BAR" . 10588)
+ ("DOWNWARDS HARPOON WITH BARB RIGHT FROM BAR" . 10589)
+ ("LEFTWARDS HARPOON WITH BARB DOWN FROM BAR" . 10590)
+ ("RIGHTWARDS HARPOON WITH BARB DOWN FROM BAR" . 10591)
+ ("UPWARDS HARPOON WITH BARB LEFT FROM BAR" . 10592)
+ ("DOWNWARDS HARPOON WITH BARB LEFT FROM BAR" . 10593)
+ ("LEFTWARDS HARPOON WITH BARB UP ABOVE LEFTWARDS HARPOON WITH BARB DOWN" . 10594)
+ ("UPWARDS HARPOON WITH BARB LEFT BESIDE UPWARDS HARPOON WITH BARB RIGHT" . 10595)
+ ("RIGHTWARDS HARPOON WITH BARB UP ABOVE RIGHTWARDS HARPOON WITH BARB DOWN" . 10596)
+ ("DOWNWARDS HARPOON WITH BARB LEFT BESIDE DOWNWARDS HARPOON WITH BARB RIGHT" . 10597)
+ ("LEFTWARDS HARPOON WITH BARB UP ABOVE RIGHTWARDS HARPOON WITH BARB UP" . 10598)
+ ("LEFTWARDS HARPOON WITH BARB DOWN ABOVE RIGHTWARDS HARPOON WITH BARB DOWN" . 10599)
+ ("RIGHTWARDS HARPOON WITH BARB UP ABOVE LEFTWARDS HARPOON WITH BARB UP" . 10600)
+ ("RIGHTWARDS HARPOON WITH BARB DOWN ABOVE LEFTWARDS HARPOON WITH BARB DOWN" . 10601)
+ ("LEFTWARDS HARPOON WITH BARB UP ABOVE LONG DASH" . 10602)
+ ("LEFTWARDS HARPOON WITH BARB DOWN BELOW LONG DASH" . 10603)
+ ("RIGHTWARDS HARPOON WITH BARB UP ABOVE LONG DASH" . 10604)
+ ("RIGHTWARDS HARPOON WITH BARB DOWN BELOW LONG DASH" . 10605)
+ ("UPWARDS HARPOON WITH BARB LEFT BESIDE DOWNWARDS HARPOON WITH BARB RIGHT" . 10606)
+ ("DOWNWARDS HARPOON WITH BARB LEFT BESIDE UPWARDS HARPOON WITH BARB RIGHT" . 10607)
+ ("RIGHT DOUBLE ARROW WITH ROUNDED HEAD" . 10608)
+ ("EQUALS SIGN ABOVE RIGHTWARDS ARROW" . 10609)
+ ("TILDE OPERATOR ABOVE RIGHTWARDS ARROW" . 10610)
+ ("LEFTWARDS ARROW ABOVE TILDE OPERATOR" . 10611)
+ ("RIGHTWARDS ARROW ABOVE TILDE OPERATOR" . 10612)
+ ("RIGHTWARDS ARROW ABOVE ALMOST EQUAL TO" . 10613)
+ ("LESS-THAN ABOVE LEFTWARDS ARROW" . 10614)
+ ("LEFTWARDS ARROW THROUGH LESS-THAN" . 10615)
+ ("GREATER-THAN ABOVE RIGHTWARDS ARROW" . 10616)
+ ("SUBSET ABOVE RIGHTWARDS ARROW" . 10617)
+ ("LEFTWARDS ARROW THROUGH SUBSET" . 10618)
+ ("SUPERSET ABOVE LEFTWARDS ARROW" . 10619)
+ ("LEFT FISH TAIL" . 10620)
+ ("RIGHT FISH TAIL" . 10621)
+ ("UP FISH TAIL" . 10622)
+ ("DOWN FISH TAIL" . 10623)
+ ("TRIPLE VERTICAL BAR DELIMITER" . 10624)
+ ("Z NOTATION SPOT" . 10625)
+ ("Z NOTATION TYPE COLON" . 10626)
+ ("LEFT WHITE CURLY BRACKET" . 10627)
+ ("RIGHT WHITE CURLY BRACKET" . 10628)
+ ("LEFT WHITE PARENTHESIS" . 10629)
+ ("RIGHT WHITE PARENTHESIS" . 10630)
+ ("Z NOTATION LEFT IMAGE BRACKET" . 10631)
+ ("Z NOTATION RIGHT IMAGE BRACKET" . 10632)
+ ("Z NOTATION LEFT BINDING BRACKET" . 10633)
+ ("Z NOTATION RIGHT BINDING BRACKET" . 10634)
+ ("LEFT SQUARE BRACKET WITH UNDERBAR" . 10635)
+ ("RIGHT SQUARE BRACKET WITH UNDERBAR" . 10636)
+ ("LEFT SQUARE BRACKET WITH TICK IN TOP CORNER" . 10637)
+ ("RIGHT SQUARE BRACKET WITH TICK IN BOTTOM CORNER" . 10638)
+ ("LEFT SQUARE BRACKET WITH TICK IN BOTTOM CORNER" . 10639)
+ ("RIGHT SQUARE BRACKET WITH TICK IN TOP CORNER" . 10640)
+ ("LEFT ANGLE BRACKET WITH DOT" . 10641)
+ ("RIGHT ANGLE BRACKET WITH DOT" . 10642)
+ ("LEFT ARC LESS-THAN BRACKET" . 10643)
+ ("RIGHT ARC GREATER-THAN BRACKET" . 10644)
+ ("DOUBLE LEFT ARC GREATER-THAN BRACKET" . 10645)
+ ("DOUBLE RIGHT ARC LESS-THAN BRACKET" . 10646)
+ ("LEFT BLACK TORTOISE SHELL BRACKET" . 10647)
+ ("RIGHT BLACK TORTOISE SHELL BRACKET" . 10648)
+ ("DOTTED FENCE" . 10649)
+ ("VERTICAL ZIGZAG LINE" . 10650)
+ ("MEASURED ANGLE OPENING LEFT" . 10651)
+ ("RIGHT ANGLE VARIANT WITH SQUARE" . 10652)
+ ("MEASURED RIGHT ANGLE WITH DOT" . 10653)
+ ("ANGLE WITH S INSIDE" . 10654)
+ ("ACUTE ANGLE" . 10655)
+ ("SPHERICAL ANGLE OPENING LEFT" . 10656)
+ ("SPHERICAL ANGLE OPENING UP" . 10657)
+ ("TURNED ANGLE" . 10658)
+ ("REVERSED ANGLE" . 10659)
+ ("ANGLE WITH UNDERBAR" . 10660)
+ ("REVERSED ANGLE WITH UNDERBAR" . 10661)
+ ("OBLIQUE ANGLE OPENING UP" . 10662)
+ ("OBLIQUE ANGLE OPENING DOWN" . 10663)
+ ("MEASURED ANGLE WITH OPEN ARM ENDING IN ARROW POINTING UP AND RIGHT" . 10664)
+ ("MEASURED ANGLE WITH OPEN ARM ENDING IN ARROW POINTING UP AND LEFT" . 10665)
+ ("MEASURED ANGLE WITH OPEN ARM ENDING IN ARROW POINTING DOWN AND RIGHT" . 10666)
+ ("MEASURED ANGLE WITH OPEN ARM ENDING IN ARROW POINTING DOWN AND LEFT" . 10667)
+ ("MEASURED ANGLE WITH OPEN ARM ENDING IN ARROW POINTING RIGHT AND UP" . 10668)
+ ("MEASURED ANGLE WITH OPEN ARM ENDING IN ARROW POINTING LEFT AND UP" . 10669)
+ ("MEASURED ANGLE WITH OPEN ARM ENDING IN ARROW POINTING RIGHT AND DOWN" . 10670)
+ ("MEASURED ANGLE WITH OPEN ARM ENDING IN ARROW POINTING LEFT AND DOWN" . 10671)
+ ("REVERSED EMPTY SET" . 10672)
+ ("EMPTY SET WITH OVERBAR" . 10673)
+ ("EMPTY SET WITH SMALL CIRCLE ABOVE" . 10674)
+ ("EMPTY SET WITH RIGHT ARROW ABOVE" . 10675)
+ ("EMPTY SET WITH LEFT ARROW ABOVE" . 10676)
+ ("CIRCLE WITH HORIZONTAL BAR" . 10677)
+ ("CIRCLED VERTICAL BAR" . 10678)
+ ("CIRCLED PARALLEL" . 10679)
+ ("CIRCLED REVERSE SOLIDUS" . 10680)
+ ("CIRCLED PERPENDICULAR" . 10681)
+ ("CIRCLE DIVIDED BY HORIZONTAL BAR AND TOP HALF DIVIDED BY VERTICAL BAR" . 10682)
+ ("CIRCLE WITH SUPERIMPOSED X" . 10683)
+ ("CIRCLED ANTICLOCKWISE-ROTATED DIVISION SIGN" . 10684)
+ ("UP ARROW THROUGH CIRCLE" . 10685)
+ ("CIRCLED WHITE BULLET" . 10686)
+ ("CIRCLED BULLET" . 10687)
+ ("CIRCLED LESS-THAN" . 10688)
+ ("CIRCLED GREATER-THAN" . 10689)
+ ("CIRCLE WITH SMALL CIRCLE TO THE RIGHT" . 10690)
+ ("CIRCLE WITH TWO HORIZONTAL STROKES TO THE RIGHT" . 10691)
+ ("SQUARED RISING DIAGONAL SLASH" . 10692)
+ ("SQUARED FALLING DIAGONAL SLASH" . 10693)
+ ("SQUARED ASTERISK" . 10694)
+ ("SQUARED SMALL CIRCLE" . 10695)
+ ("SQUARED SQUARE" . 10696)
+ ("TWO JOINED SQUARES" . 10697)
+ ("TRIANGLE WITH DOT ABOVE" . 10698)
+ ("TRIANGLE WITH UNDERBAR" . 10699)
+ ("S IN TRIANGLE" . 10700)
+ ("TRIANGLE WITH SERIFS AT BOTTOM" . 10701)
+ ("RIGHT TRIANGLE ABOVE LEFT TRIANGLE" . 10702)
+ ("LEFT TRIANGLE BESIDE VERTICAL BAR" . 10703)
+ ("VERTICAL BAR BESIDE RIGHT TRIANGLE" . 10704)
+ ("BOWTIE WITH LEFT HALF BLACK" . 10705)
+ ("BOWTIE WITH RIGHT HALF BLACK" . 10706)
+ ("BLACK BOWTIE" . 10707)
+ ("TIMES WITH LEFT HALF BLACK" . 10708)
+ ("TIMES WITH RIGHT HALF BLACK" . 10709)
+ ("WHITE HOURGLASS" . 10710)
+ ("BLACK HOURGLASS" . 10711)
+ ("LEFT WIGGLY FENCE" . 10712)
+ ("RIGHT WIGGLY FENCE" . 10713)
+ ("LEFT DOUBLE WIGGLY FENCE" . 10714)
+ ("RIGHT DOUBLE WIGGLY FENCE" . 10715)
+ ("INCOMPLETE INFINITY" . 10716)
+ ("TIE OVER INFINITY" . 10717)
+ ("INFINITY NEGATED WITH VERTICAL BAR" . 10718)
+ ("DOUBLE-ENDED MULTIMAP" . 10719)
+ ("SQUARE WITH CONTOURED OUTLINE" . 10720)
+ ("INCREASES AS" . 10721)
+ ("SHUFFLE PRODUCT" . 10722)
+ ("EQUALS SIGN AND SLANTED PARALLEL" . 10723)
+ ("EQUALS SIGN AND SLANTED PARALLEL WITH TILDE ABOVE" . 10724)
+ ("IDENTICAL TO AND SLANTED PARALLEL" . 10725)
+ ("GLEICH STARK" . 10726)
+ ("THERMODYNAMIC" . 10727)
+ ("DOWN-POINTING TRIANGLE WITH LEFT HALF BLACK" . 10728)
+ ("DOWN-POINTING TRIANGLE WITH RIGHT HALF BLACK" . 10729)
+ ("BLACK DIAMOND WITH DOWN ARROW" . 10730)
+ ("BLACK LOZENGE" . 10731)
+ ("WHITE CIRCLE WITH DOWN ARROW" . 10732)
+ ("BLACK CIRCLE WITH DOWN ARROW" . 10733)
+ ("ERROR-BARRED WHITE SQUARE" . 10734)
+ ("ERROR-BARRED BLACK SQUARE" . 10735)
+ ("ERROR-BARRED WHITE DIAMOND" . 10736)
+ ("ERROR-BARRED BLACK DIAMOND" . 10737)
+ ("ERROR-BARRED WHITE CIRCLE" . 10738)
+ ("ERROR-BARRED BLACK CIRCLE" . 10739)
+ ("RULE-DELAYED" . 10740)
+ ("REVERSE SOLIDUS OPERATOR" . 10741)
+ ("SOLIDUS WITH OVERBAR" . 10742)
+ ("REVERSE SOLIDUS WITH HORIZONTAL STROKE" . 10743)
+ ("BIG SOLIDUS" . 10744)
+ ("BIG REVERSE SOLIDUS" . 10745)
+ ("DOUBLE PLUS" . 10746)
+ ("TRIPLE PLUS" . 10747)
+ ("LEFT-POINTING CURVED ANGLE BRACKET" . 10748)
+ ("RIGHT-POINTING CURVED ANGLE BRACKET" . 10749)
+ ("TINY" . 10750)
+ ("MINY" . 10751)
+ ("N-ARY CIRCLED DOT OPERATOR" . 10752)
+ ("N-ARY CIRCLED PLUS OPERATOR" . 10753)
+ ("N-ARY CIRCLED TIMES OPERATOR" . 10754)
+ ("N-ARY UNION OPERATOR WITH DOT" . 10755)
+ ("N-ARY UNION OPERATOR WITH PLUS" . 10756)
+ ("N-ARY SQUARE INTERSECTION OPERATOR" . 10757)
+ ("N-ARY SQUARE UNION OPERATOR" . 10758)
+ ("TWO LOGICAL AND OPERATOR" . 10759)
+ ("TWO LOGICAL OR OPERATOR" . 10760)
+ ("N-ARY TIMES OPERATOR" . 10761)
+ ("MODULO TWO SUM" . 10762)
+ ("SUMMATION WITH INTEGRAL" . 10763)
+ ("QUADRUPLE INTEGRAL OPERATOR" . 10764)
+ ("FINITE PART INTEGRAL" . 10765)
+ ("INTEGRAL WITH DOUBLE STROKE" . 10766)
+ ("INTEGRAL AVERAGE WITH SLASH" . 10767)
+ ("CIRCULATION FUNCTION" . 10768)
+ ("ANTICLOCKWISE INTEGRATION" . 10769)
+ ("LINE INTEGRATION WITH RECTANGULAR PATH AROUND POLE" . 10770)
+ ("LINE INTEGRATION WITH SEMICIRCULAR PATH AROUND POLE" . 10771)
+ ("LINE INTEGRATION NOT INCLUDING THE POLE" . 10772)
+ ("INTEGRAL AROUND A POINT OPERATOR" . 10773)
+ ("QUATERNION INTEGRAL OPERATOR" . 10774)
+ ("INTEGRAL WITH LEFTWARDS ARROW WITH HOOK" . 10775)
+ ("INTEGRAL WITH TIMES SIGN" . 10776)
+ ("INTEGRAL WITH INTERSECTION" . 10777)
+ ("INTEGRAL WITH UNION" . 10778)
+ ("INTEGRAL WITH OVERBAR" . 10779)
+ ("INTEGRAL WITH UNDERBAR" . 10780)
+ ("JOIN" . 10781)
+ ("LARGE LEFT TRIANGLE OPERATOR" . 10782)
+ ("Z NOTATION SCHEMA COMPOSITION" . 10783)
+ ("Z NOTATION SCHEMA PIPING" . 10784)
+ ("Z NOTATION SCHEMA PROJECTION" . 10785)
+ ("PLUS SIGN WITH SMALL CIRCLE ABOVE" . 10786)
+ ("PLUS SIGN WITH CIRCUMFLEX ACCENT ABOVE" . 10787)
+ ("PLUS SIGN WITH TILDE ABOVE" . 10788)
+ ("PLUS SIGN WITH DOT BELOW" . 10789)
+ ("PLUS SIGN WITH TILDE BELOW" . 10790)
+ ("PLUS SIGN WITH SUBSCRIPT TWO" . 10791)
+ ("PLUS SIGN WITH BLACK TRIANGLE" . 10792)
+ ("MINUS SIGN WITH COMMA ABOVE" . 10793)
+ ("MINUS SIGN WITH DOT BELOW" . 10794)
+ ("MINUS SIGN WITH FALLING DOTS" . 10795)
+ ("MINUS SIGN WITH RISING DOTS" . 10796)
+ ("PLUS SIGN IN LEFT HALF CIRCLE" . 10797)
+ ("PLUS SIGN IN RIGHT HALF CIRCLE" . 10798)
+ ("VECTOR OR CROSS PRODUCT" . 10799)
+ ("MULTIPLICATION SIGN WITH DOT ABOVE" . 10800)
+ ("MULTIPLICATION SIGN WITH UNDERBAR" . 10801)
+ ("SEMIDIRECT PRODUCT WITH BOTTOM CLOSED" . 10802)
+ ("SMASH PRODUCT" . 10803)
+ ("MULTIPLICATION SIGN IN LEFT HALF CIRCLE" . 10804)
+ ("MULTIPLICATION SIGN IN RIGHT HALF CIRCLE" . 10805)
+ ("CIRCLED MULTIPLICATION SIGN WITH CIRCUMFLEX ACCENT" . 10806)
+ ("MULTIPLICATION SIGN IN DOUBLE CIRCLE" . 10807)
+ ("CIRCLED DIVISION SIGN" . 10808)
+ ("PLUS SIGN IN TRIANGLE" . 10809)
+ ("MINUS SIGN IN TRIANGLE" . 10810)
+ ("MULTIPLICATION SIGN IN TRIANGLE" . 10811)
+ ("INTERIOR PRODUCT" . 10812)
+ ("RIGHTHAND INTERIOR PRODUCT" . 10813)
+ ("Z NOTATION RELATIONAL COMPOSITION" . 10814)
+ ("AMALGAMATION OR COPRODUCT" . 10815)
+ ("INTERSECTION WITH DOT" . 10816)
+ ("UNION WITH MINUS SIGN" . 10817)
+ ("UNION WITH OVERBAR" . 10818)
+ ("INTERSECTION WITH OVERBAR" . 10819)
+ ("INTERSECTION WITH LOGICAL AND" . 10820)
+ ("UNION WITH LOGICAL OR" . 10821)
+ ("UNION ABOVE INTERSECTION" . 10822)
+ ("INTERSECTION ABOVE UNION" . 10823)
+ ("UNION ABOVE BAR ABOVE INTERSECTION" . 10824)
+ ("INTERSECTION ABOVE BAR ABOVE UNION" . 10825)
+ ("UNION BESIDE AND JOINED WITH UNION" . 10826)
+ ("INTERSECTION BESIDE AND JOINED WITH INTERSECTION" . 10827)
+ ("CLOSED UNION WITH SERIFS" . 10828)
+ ("CLOSED INTERSECTION WITH SERIFS" . 10829)
+ ("DOUBLE SQUARE INTERSECTION" . 10830)
+ ("DOUBLE SQUARE UNION" . 10831)
+ ("CLOSED UNION WITH SERIFS AND SMASH PRODUCT" . 10832)
+ ("LOGICAL AND WITH DOT ABOVE" . 10833)
+ ("LOGICAL OR WITH DOT ABOVE" . 10834)
+ ("DOUBLE LOGICAL AND" . 10835)
+ ("DOUBLE LOGICAL OR" . 10836)
+ ("TWO INTERSECTING LOGICAL AND" . 10837)
+ ("TWO INTERSECTING LOGICAL OR" . 10838)
+ ("SLOPING LARGE OR" . 10839)
+ ("SLOPING LARGE AND" . 10840)
+ ("LOGICAL OR OVERLAPPING LOGICAL AND" . 10841)
+ ("LOGICAL AND WITH MIDDLE STEM" . 10842)
+ ("LOGICAL OR WITH MIDDLE STEM" . 10843)
+ ("LOGICAL AND WITH HORIZONTAL DASH" . 10844)
+ ("LOGICAL OR WITH HORIZONTAL DASH" . 10845)
+ ("LOGICAL AND WITH DOUBLE OVERBAR" . 10846)
+ ("LOGICAL AND WITH UNDERBAR" . 10847)
+ ("LOGICAL AND WITH DOUBLE UNDERBAR" . 10848)
+ ("SMALL VEE WITH UNDERBAR" . 10849)
+ ("LOGICAL OR WITH DOUBLE OVERBAR" . 10850)
+ ("LOGICAL OR WITH DOUBLE UNDERBAR" . 10851)
+ ("Z NOTATION DOMAIN ANTIRESTRICTION" . 10852)
+ ("Z NOTATION RANGE ANTIRESTRICTION" . 10853)
+ ("EQUALS SIGN WITH DOT BELOW" . 10854)
+ ("IDENTICAL WITH DOT ABOVE" . 10855)
+ ("TRIPLE HORIZONTAL BAR WITH DOUBLE VERTICAL STROKE" . 10856)
+ ("TRIPLE HORIZONTAL BAR WITH TRIPLE VERTICAL STROKE" . 10857)
+ ("TILDE OPERATOR WITH DOT ABOVE" . 10858)
+ ("TILDE OPERATOR WITH RISING DOTS" . 10859)
+ ("SIMILAR MINUS SIMILAR" . 10860)
+ ("CONGRUENT WITH DOT ABOVE" . 10861)
+ ("EQUALS WITH ASTERISK" . 10862)
+ ("ALMOST EQUAL TO WITH CIRCUMFLEX ACCENT" . 10863)
+ ("APPROXIMATELY EQUAL OR EQUAL TO" . 10864)
+ ("EQUALS SIGN ABOVE PLUS SIGN" . 10865)
+ ("PLUS SIGN ABOVE EQUALS SIGN" . 10866)
+ ("EQUALS SIGN ABOVE TILDE OPERATOR" . 10867)
+ ("DOUBLE COLON EQUAL" . 10868)
+ ("TWO CONSECUTIVE EQUALS SIGNS" . 10869)
+ ("THREE CONSECUTIVE EQUALS SIGNS" . 10870)
+ ("EQUALS SIGN WITH TWO DOTS ABOVE AND TWO DOTS BELOW" . 10871)
+ ("EQUIVALENT WITH FOUR DOTS ABOVE" . 10872)
+ ("LESS-THAN WITH CIRCLE INSIDE" . 10873)
+ ("GREATER-THAN WITH CIRCLE INSIDE" . 10874)
+ ("LESS-THAN WITH QUESTION MARK ABOVE" . 10875)
+ ("GREATER-THAN WITH QUESTION MARK ABOVE" . 10876)
+ ("LESS-THAN OR SLANTED EQUAL TO" . 10877)
+ ("GREATER-THAN OR SLANTED EQUAL TO" . 10878)
+ ("LESS-THAN OR SLANTED EQUAL TO WITH DOT INSIDE" . 10879)
+ ("GREATER-THAN OR SLANTED EQUAL TO WITH DOT INSIDE" . 10880)
+ ("LESS-THAN OR SLANTED EQUAL TO WITH DOT ABOVE" . 10881)
+ ("GREATER-THAN OR SLANTED EQUAL TO WITH DOT ABOVE" . 10882)
+ ("LESS-THAN OR SLANTED EQUAL TO WITH DOT ABOVE RIGHT" . 10883)
+ ("GREATER-THAN OR SLANTED EQUAL TO WITH DOT ABOVE LEFT" . 10884)
+ ("LESS-THAN OR APPROXIMATE" . 10885)
+ ("GREATER-THAN OR APPROXIMATE" . 10886)
+ ("LESS-THAN AND SINGLE-LINE NOT EQUAL TO" . 10887)
+ ("GREATER-THAN AND SINGLE-LINE NOT EQUAL TO" . 10888)
+ ("LESS-THAN AND NOT APPROXIMATE" . 10889)
+ ("GREATER-THAN AND NOT APPROXIMATE" . 10890)
+ ("LESS-THAN ABOVE DOUBLE-LINE EQUAL ABOVE GREATER-THAN" . 10891)
+ ("GREATER-THAN ABOVE DOUBLE-LINE EQUAL ABOVE LESS-THAN" . 10892)
+ ("LESS-THAN ABOVE SIMILAR OR EQUAL" . 10893)
+ ("GREATER-THAN ABOVE SIMILAR OR EQUAL" . 10894)
+ ("LESS-THAN ABOVE SIMILAR ABOVE GREATER-THAN" . 10895)
+ ("GREATER-THAN ABOVE SIMILAR ABOVE LESS-THAN" . 10896)
+ ("LESS-THAN ABOVE GREATER-THAN ABOVE DOUBLE-LINE EQUAL" . 10897)
+ ("GREATER-THAN ABOVE LESS-THAN ABOVE DOUBLE-LINE EQUAL" . 10898)
+ ("LESS-THAN ABOVE SLANTED EQUAL ABOVE GREATER-THAN ABOVE SLANTED EQUAL" . 10899)
+ ("GREATER-THAN ABOVE SLANTED EQUAL ABOVE LESS-THAN ABOVE SLANTED EQUAL" . 10900)
+ ("SLANTED EQUAL TO OR LESS-THAN" . 10901)
+ ("SLANTED EQUAL TO OR GREATER-THAN" . 10902)
+ ("SLANTED EQUAL TO OR LESS-THAN WITH DOT INSIDE" . 10903)
+ ("SLANTED EQUAL TO OR GREATER-THAN WITH DOT INSIDE" . 10904)
+ ("DOUBLE-LINE EQUAL TO OR LESS-THAN" . 10905)
+ ("DOUBLE-LINE EQUAL TO OR GREATER-THAN" . 10906)
+ ("DOUBLE-LINE SLANTED EQUAL TO OR LESS-THAN" . 10907)
+ ("DOUBLE-LINE SLANTED EQUAL TO OR GREATER-THAN" . 10908)
+ ("SIMILAR OR LESS-THAN" . 10909)
+ ("SIMILAR OR GREATER-THAN" . 10910)
+ ("SIMILAR ABOVE LESS-THAN ABOVE EQUALS SIGN" . 10911)
+ ("SIMILAR ABOVE GREATER-THAN ABOVE EQUALS SIGN" . 10912)
+ ("DOUBLE NESTED LESS-THAN" . 10913)
+ ("DOUBLE NESTED GREATER-THAN" . 10914)
+ ("DOUBLE NESTED LESS-THAN WITH UNDERBAR" . 10915)
+ ("GREATER-THAN OVERLAPPING LESS-THAN" . 10916)
+ ("GREATER-THAN BESIDE LESS-THAN" . 10917)
+ ("LESS-THAN CLOSED BY CURVE" . 10918)
+ ("GREATER-THAN CLOSED BY CURVE" . 10919)
+ ("LESS-THAN CLOSED BY CURVE ABOVE SLANTED EQUAL" . 10920)
+ ("GREATER-THAN CLOSED BY CURVE ABOVE SLANTED EQUAL" . 10921)
+ ("SMALLER THAN" . 10922)
+ ("LARGER THAN" . 10923)
+ ("SMALLER THAN OR EQUAL TO" . 10924)
+ ("LARGER THAN OR EQUAL TO" . 10925)
+ ("EQUALS SIGN WITH BUMPY ABOVE" . 10926)
+ ("PRECEDES ABOVE SINGLE-LINE EQUALS SIGN" . 10927)
+ ("SUCCEEDS ABOVE SINGLE-LINE EQUALS SIGN" . 10928)
+ ("PRECEDES ABOVE SINGLE-LINE NOT EQUAL TO" . 10929)
+ ("SUCCEEDS ABOVE SINGLE-LINE NOT EQUAL TO" . 10930)
+ ("PRECEDES ABOVE EQUALS SIGN" . 10931)
+ ("SUCCEEDS ABOVE EQUALS SIGN" . 10932)
+ ("PRECEDES ABOVE NOT EQUAL TO" . 10933)
+ ("SUCCEEDS ABOVE NOT EQUAL TO" . 10934)
+ ("PRECEDES ABOVE ALMOST EQUAL TO" . 10935)
+ ("SUCCEEDS ABOVE ALMOST EQUAL TO" . 10936)
+ ("PRECEDES ABOVE NOT ALMOST EQUAL TO" . 10937)
+ ("SUCCEEDS ABOVE NOT ALMOST EQUAL TO" . 10938)
+ ("DOUBLE PRECEDES" . 10939)
+ ("DOUBLE SUCCEEDS" . 10940)
+ ("SUBSET WITH DOT" . 10941)
+ ("SUPERSET WITH DOT" . 10942)
+ ("SUBSET WITH PLUS SIGN BELOW" . 10943)
+ ("SUPERSET WITH PLUS SIGN BELOW" . 10944)
+ ("SUBSET WITH MULTIPLICATION SIGN BELOW" . 10945)
+ ("SUPERSET WITH MULTIPLICATION SIGN BELOW" . 10946)
+ ("SUBSET OF OR EQUAL TO WITH DOT ABOVE" . 10947)
+ ("SUPERSET OF OR EQUAL TO WITH DOT ABOVE" . 10948)
+ ("SUBSET OF ABOVE EQUALS SIGN" . 10949)
+ ("SUPERSET OF ABOVE EQUALS SIGN" . 10950)
+ ("SUBSET OF ABOVE TILDE OPERATOR" . 10951)
+ ("SUPERSET OF ABOVE TILDE OPERATOR" . 10952)
+ ("SUBSET OF ABOVE ALMOST EQUAL TO" . 10953)
+ ("SUPERSET OF ABOVE ALMOST EQUAL TO" . 10954)
+ ("SUBSET OF ABOVE NOT EQUAL TO" . 10955)
+ ("SUPERSET OF ABOVE NOT EQUAL TO" . 10956)
+ ("SQUARE LEFT OPEN BOX OPERATOR" . 10957)
+ ("SQUARE RIGHT OPEN BOX OPERATOR" . 10958)
+ ("CLOSED SUBSET" . 10959)
+ ("CLOSED SUPERSET" . 10960)
+ ("CLOSED SUBSET OR EQUAL TO" . 10961)
+ ("CLOSED SUPERSET OR EQUAL TO" . 10962)
+ ("SUBSET ABOVE SUPERSET" . 10963)
+ ("SUPERSET ABOVE SUBSET" . 10964)
+ ("SUBSET ABOVE SUBSET" . 10965)
+ ("SUPERSET ABOVE SUPERSET" . 10966)
+ ("SUPERSET BESIDE SUBSET" . 10967)
+ ("SUPERSET BESIDE AND JOINED BY DASH WITH SUBSET" . 10968)
+ ("ELEMENT OF OPENING DOWNWARDS" . 10969)
+ ("PITCHFORK WITH TEE TOP" . 10970)
+ ("TRANSVERSAL INTERSECTION" . 10971)
+ ("FORKING" . 10972)
+ ("NONFORKING" . 10973)
+ ("SHORT LEFT TACK" . 10974)
+ ("SHORT DOWN TACK" . 10975)
+ ("SHORT UP TACK" . 10976)
+ ("PERPENDICULAR WITH S" . 10977)
+ ("VERTICAL BAR TRIPLE RIGHT TURNSTILE" . 10978)
+ ("DOUBLE VERTICAL BAR LEFT TURNSTILE" . 10979)
+ ("VERTICAL BAR DOUBLE LEFT TURNSTILE" . 10980)
+ ("DOUBLE VERTICAL BAR DOUBLE LEFT TURNSTILE" . 10981)
+ ("LONG DASH FROM LEFT MEMBER OF DOUBLE VERTICAL" . 10982)
+ ("SHORT DOWN TACK WITH OVERBAR" . 10983)
+ ("SHORT UP TACK WITH UNDERBAR" . 10984)
+ ("SHORT UP TACK ABOVE SHORT DOWN TACK" . 10985)
+ ("DOUBLE DOWN TACK" . 10986)
+ ("DOUBLE UP TACK" . 10987)
+ ("DOUBLE STROKE NOT SIGN" . 10988)
+ ("REVERSED DOUBLE STROKE NOT SIGN" . 10989)
+ ("DOES NOT DIVIDE WITH REVERSED NEGATION SLASH" . 10990)
+ ("VERTICAL LINE WITH CIRCLE ABOVE" . 10991)
+ ("VERTICAL LINE WITH CIRCLE BELOW" . 10992)
+ ("DOWN TACK WITH CIRCLE BELOW" . 10993)
+ ("PARALLEL WITH HORIZONTAL STROKE" . 10994)
+ ("PARALLEL WITH TILDE OPERATOR" . 10995)
+ ("TRIPLE VERTICAL BAR BINARY RELATION" . 10996)
+ ("TRIPLE VERTICAL BAR WITH HORIZONTAL STROKE" . 10997)
+ ("TRIPLE COLON OPERATOR" . 10998)
+ ("TRIPLE NESTED LESS-THAN" . 10999)
+ ("TRIPLE NESTED GREATER-THAN" . 11000)
+ ("DOUBLE-LINE SLANTED LESS-THAN OR EQUAL TO" . 11001)
+ ("DOUBLE-LINE SLANTED GREATER-THAN OR EQUAL TO" . 11002)
+ ("TRIPLE SOLIDUS BINARY RELATION" . 11003)
+ ("LARGE TRIPLE VERTICAL BAR OPERATOR" . 11004)
+ ("DOUBLE SOLIDUS OPERATOR" . 11005)
+ ("WHITE VERTICAL BAR" . 11006)
+ ("N-ARY WHITE VERTICAL BAR" . 11007)
+ ("CJK RADICAL REPEAT" . 11904)
+ ("CJK RADICAL CLIFF" . 11905)
+ ("CJK RADICAL SECOND ONE" . 11906)
+ ("CJK RADICAL SECOND TWO" . 11907)
+ ("CJK RADICAL SECOND THREE" . 11908)
+ ("CJK RADICAL PERSON" . 11909)
+ ("CJK RADICAL BOX" . 11910)
+ ("CJK RADICAL TABLE" . 11911)
+ ("CJK RADICAL KNIFE ONE" . 11912)
+ ("CJK RADICAL KNIFE TWO" . 11913)
+ ("CJK RADICAL DIVINATION" . 11914)
+ ("CJK RADICAL SEAL" . 11915)
+ ("CJK RADICAL SMALL ONE" . 11916)
+ ("CJK RADICAL SMALL TWO" . 11917)
+ ("CJK RADICAL LAME ONE" . 11918)
+ ("CJK RADICAL LAME TWO" . 11919)
+ ("CJK RADICAL LAME THREE" . 11920)
+ ("CJK RADICAL LAME FOUR" . 11921)
+ ("CJK RADICAL SNAKE" . 11922)
+ ("CJK RADICAL THREAD" . 11923)
+ ("CJK RADICAL SNOUT ONE" . 11924)
+ ("CJK RADICAL SNOUT TWO" . 11925)
+ ("CJK RADICAL HEART ONE" . 11926)
+ ("CJK RADICAL HEART TWO" . 11927)
+ ("CJK RADICAL HAND" . 11928)
+ ("CJK RADICAL RAP" . 11929)
+ ("CJK RADICAL CHOKE" . 11931)
+ ("CJK RADICAL SUN" . 11932)
+ ("CJK RADICAL MOON" . 11933)
+ ("CJK RADICAL DEATH" . 11934)
+ ("CJK RADICAL MOTHER" . 11935)
+ ("CJK RADICAL CIVILIAN" . 11936)
+ ("CJK RADICAL WATER ONE" . 11937)
+ ("CJK RADICAL WATER TWO" . 11938)
+ ("CJK RADICAL FIRE" . 11939)
+ ("CJK RADICAL PAW ONE" . 11940)
+ ("CJK RADICAL PAW TWO" . 11941)
+ ("CJK RADICAL SIMPLIFIED HALF TREE TRUNK" . 11942)
+ ("CJK RADICAL COW" . 11943)
+ ("CJK RADICAL DOG" . 11944)
+ ("CJK RADICAL JADE" . 11945)
+ ("CJK RADICAL BOLT OF CLOTH" . 11946)
+ ("CJK RADICAL EYE" . 11947)
+ ("CJK RADICAL SPIRIT ONE" . 11948)
+ ("CJK RADICAL SPIRIT TWO" . 11949)
+ ("CJK RADICAL BAMBOO" . 11950)
+ ("CJK RADICAL SILK" . 11951)
+ ("CJK RADICAL C-SIMPLIFIED SILK" . 11952)
+ ("CJK RADICAL NET ONE" . 11953)
+ ("CJK RADICAL NET TWO" . 11954)
+ ("CJK RADICAL NET THREE" . 11955)
+ ("CJK RADICAL NET FOUR" . 11956)
+ ("CJK RADICAL MESH" . 11957)
+ ("CJK RADICAL SHEEP" . 11958)
+ ("CJK RADICAL RAM" . 11959)
+ ("CJK RADICAL EWE" . 11960)
+ ("CJK RADICAL OLD" . 11961)
+ ("CJK RADICAL BRUSH ONE" . 11962)
+ ("CJK RADICAL BRUSH TWO" . 11963)
+ ("CJK RADICAL MEAT" . 11964)
+ ("CJK RADICAL MORTAR" . 11965)
+ ("CJK RADICAL GRASS ONE" . 11966)
+ ("CJK RADICAL GRASS TWO" . 11967)
+ ("CJK RADICAL GRASS THREE" . 11968)
+ ("CJK RADICAL TIGER" . 11969)
+ ("CJK RADICAL CLOTHES" . 11970)
+ ("CJK RADICAL WEST ONE" . 11971)
+ ("CJK RADICAL WEST TWO" . 11972)
+ ("CJK RADICAL C-SIMPLIFIED SEE" . 11973)
+ ("CJK RADICAL SIMPLIFIED HORN" . 11974)
+ ("CJK RADICAL HORN" . 11975)
+ ("CJK RADICAL C-SIMPLIFIED SPEECH" . 11976)
+ ("CJK RADICAL C-SIMPLIFIED SHELL" . 11977)
+ ("CJK RADICAL FOOT" . 11978)
+ ("CJK RADICAL C-SIMPLIFIED CART" . 11979)
+ ("CJK RADICAL SIMPLIFIED WALK" . 11980)
+ ("CJK RADICAL WALK ONE" . 11981)
+ ("CJK RADICAL WALK TWO" . 11982)
+ ("CJK RADICAL CITY" . 11983)
+ ("CJK RADICAL C-SIMPLIFIED GOLD" . 11984)
+ ("CJK RADICAL LONG ONE" . 11985)
+ ("CJK RADICAL LONG TWO" . 11986)
+ ("CJK RADICAL C-SIMPLIFIED LONG" . 11987)
+ ("CJK RADICAL C-SIMPLIFIED GATE" . 11988)
+ ("CJK RADICAL MOUND ONE" . 11989)
+ ("CJK RADICAL MOUND TWO" . 11990)
+ ("CJK RADICAL RAIN" . 11991)
+ ("CJK RADICAL BLUE" . 11992)
+ ("CJK RADICAL C-SIMPLIFIED TANNED LEATHER" . 11993)
+ ("CJK RADICAL C-SIMPLIFIED LEAF" . 11994)
+ ("CJK RADICAL C-SIMPLIFIED WIND" . 11995)
+ ("CJK RADICAL C-SIMPLIFIED FLY" . 11996)
+ ("CJK RADICAL EAT ONE" . 11997)
+ ("CJK RADICAL EAT TWO" . 11998)
+ ("CJK RADICAL EAT THREE" . 11999)
+ ("CJK RADICAL C-SIMPLIFIED EAT" . 12000)
+ ("CJK RADICAL HEAD" . 12001)
+ ("CJK RADICAL C-SIMPLIFIED HORSE" . 12002)
+ ("CJK RADICAL BONE" . 12003)
+ ("CJK RADICAL GHOST" . 12004)
+ ("CJK RADICAL C-SIMPLIFIED FISH" . 12005)
+ ("CJK RADICAL C-SIMPLIFIED BIRD" . 12006)
+ ("CJK RADICAL C-SIMPLIFIED SALT" . 12007)
+ ("CJK RADICAL SIMPLIFIED WHEAT" . 12008)
+ ("CJK RADICAL SIMPLIFIED YELLOW" . 12009)
+ ("CJK RADICAL C-SIMPLIFIED FROG" . 12010)
+ ("CJK RADICAL J-SIMPLIFIED EVEN" . 12011)
+ ("CJK RADICAL C-SIMPLIFIED EVEN" . 12012)
+ ("CJK RADICAL J-SIMPLIFIED TOOTH" . 12013)
+ ("CJK RADICAL C-SIMPLIFIED TOOTH" . 12014)
+ ("CJK RADICAL J-SIMPLIFIED DRAGON" . 12015)
+ ("CJK RADICAL C-SIMPLIFIED DRAGON" . 12016)
+ ("CJK RADICAL TURTLE" . 12017)
+ ("CJK RADICAL J-SIMPLIFIED TURTLE" . 12018)
+ ("CJK RADICAL C-SIMPLIFIED TURTLE" . 12019)
+ ("KANGXI RADICAL ONE" . 12032)
+ ("KANGXI RADICAL LINE" . 12033)
+ ("KANGXI RADICAL DOT" . 12034)
+ ("KANGXI RADICAL SLASH" . 12035)
+ ("KANGXI RADICAL SECOND" . 12036)
+ ("KANGXI RADICAL HOOK" . 12037)
+ ("KANGXI RADICAL TWO" . 12038)
+ ("KANGXI RADICAL LID" . 12039)
+ ("KANGXI RADICAL MAN" . 12040)
+ ("KANGXI RADICAL LEGS" . 12041)
+ ("KANGXI RADICAL ENTER" . 12042)
+ ("KANGXI RADICAL EIGHT" . 12043)
+ ("KANGXI RADICAL DOWN BOX" . 12044)
+ ("KANGXI RADICAL COVER" . 12045)
+ ("KANGXI RADICAL ICE" . 12046)
+ ("KANGXI RADICAL TABLE" . 12047)
+ ("KANGXI RADICAL OPEN BOX" . 12048)
+ ("KANGXI RADICAL KNIFE" . 12049)
+ ("KANGXI RADICAL POWER" . 12050)
+ ("KANGXI RADICAL WRAP" . 12051)
+ ("KANGXI RADICAL SPOON" . 12052)
+ ("KANGXI RADICAL RIGHT OPEN BOX" . 12053)
+ ("KANGXI RADICAL HIDING ENCLOSURE" . 12054)
+ ("KANGXI RADICAL TEN" . 12055)
+ ("KANGXI RADICAL DIVINATION" . 12056)
+ ("KANGXI RADICAL SEAL" . 12057)
+ ("KANGXI RADICAL CLIFF" . 12058)
+ ("KANGXI RADICAL PRIVATE" . 12059)
+ ("KANGXI RADICAL AGAIN" . 12060)
+ ("KANGXI RADICAL MOUTH" . 12061)
+ ("KANGXI RADICAL ENCLOSURE" . 12062)
+ ("KANGXI RADICAL EARTH" . 12063)
+ ("KANGXI RADICAL SCHOLAR" . 12064)
+ ("KANGXI RADICAL GO" . 12065)
+ ("KANGXI RADICAL GO SLOWLY" . 12066)
+ ("KANGXI RADICAL EVENING" . 12067)
+ ("KANGXI RADICAL BIG" . 12068)
+ ("KANGXI RADICAL WOMAN" . 12069)
+ ("KANGXI RADICAL CHILD" . 12070)
+ ("KANGXI RADICAL ROOF" . 12071)
+ ("KANGXI RADICAL INCH" . 12072)
+ ("KANGXI RADICAL SMALL" . 12073)
+ ("KANGXI RADICAL LAME" . 12074)
+ ("KANGXI RADICAL CORPSE" . 12075)
+ ("KANGXI RADICAL SPROUT" . 12076)
+ ("KANGXI RADICAL MOUNTAIN" . 12077)
+ ("KANGXI RADICAL RIVER" . 12078)
+ ("KANGXI RADICAL WORK" . 12079)
+ ("KANGXI RADICAL ONESELF" . 12080)
+ ("KANGXI RADICAL TURBAN" . 12081)
+ ("KANGXI RADICAL DRY" . 12082)
+ ("KANGXI RADICAL SHORT THREAD" . 12083)
+ ("KANGXI RADICAL DOTTED CLIFF" . 12084)
+ ("KANGXI RADICAL LONG STRIDE" . 12085)
+ ("KANGXI RADICAL TWO HANDS" . 12086)
+ ("KANGXI RADICAL SHOOT" . 12087)
+ ("KANGXI RADICAL BOW" . 12088)
+ ("KANGXI RADICAL SNOUT" . 12089)
+ ("KANGXI RADICAL BRISTLE" . 12090)
+ ("KANGXI RADICAL STEP" . 12091)
+ ("KANGXI RADICAL HEART" . 12092)
+ ("KANGXI RADICAL HALBERD" . 12093)
+ ("KANGXI RADICAL DOOR" . 12094)
+ ("KANGXI RADICAL HAND" . 12095)
+ ("KANGXI RADICAL BRANCH" . 12096)
+ ("KANGXI RADICAL RAP" . 12097)
+ ("KANGXI RADICAL SCRIPT" . 12098)
+ ("KANGXI RADICAL DIPPER" . 12099)
+ ("KANGXI RADICAL AXE" . 12100)
+ ("KANGXI RADICAL SQUARE" . 12101)
+ ("KANGXI RADICAL NOT" . 12102)
+ ("KANGXI RADICAL SUN" . 12103)
+ ("KANGXI RADICAL SAY" . 12104)
+ ("KANGXI RADICAL MOON" . 12105)
+ ("KANGXI RADICAL TREE" . 12106)
+ ("KANGXI RADICAL LACK" . 12107)
+ ("KANGXI RADICAL STOP" . 12108)
+ ("KANGXI RADICAL DEATH" . 12109)
+ ("KANGXI RADICAL WEAPON" . 12110)
+ ("KANGXI RADICAL DO NOT" . 12111)
+ ("KANGXI RADICAL COMPARE" . 12112)
+ ("KANGXI RADICAL FUR" . 12113)
+ ("KANGXI RADICAL CLAN" . 12114)
+ ("KANGXI RADICAL STEAM" . 12115)
+ ("KANGXI RADICAL WATER" . 12116)
+ ("KANGXI RADICAL FIRE" . 12117)
+ ("KANGXI RADICAL CLAW" . 12118)
+ ("KANGXI RADICAL FATHER" . 12119)
+ ("KANGXI RADICAL DOUBLE X" . 12120)
+ ("KANGXI RADICAL HALF TREE TRUNK" . 12121)
+ ("KANGXI RADICAL SLICE" . 12122)
+ ("KANGXI RADICAL FANG" . 12123)
+ ("KANGXI RADICAL COW" . 12124)
+ ("KANGXI RADICAL DOG" . 12125)
+ ("KANGXI RADICAL PROFOUND" . 12126)
+ ("KANGXI RADICAL JADE" . 12127)
+ ("KANGXI RADICAL MELON" . 12128)
+ ("KANGXI RADICAL TILE" . 12129)
+ ("KANGXI RADICAL SWEET" . 12130)
+ ("KANGXI RADICAL LIFE" . 12131)
+ ("KANGXI RADICAL USE" . 12132)
+ ("KANGXI RADICAL FIELD" . 12133)
+ ("KANGXI RADICAL BOLT OF CLOTH" . 12134)
+ ("KANGXI RADICAL SICKNESS" . 12135)
+ ("KANGXI RADICAL DOTTED TENT" . 12136)
+ ("KANGXI RADICAL WHITE" . 12137)
+ ("KANGXI RADICAL SKIN" . 12138)
+ ("KANGXI RADICAL DISH" . 12139)
+ ("KANGXI RADICAL EYE" . 12140)
+ ("KANGXI RADICAL SPEAR" . 12141)
+ ("KANGXI RADICAL ARROW" . 12142)
+ ("KANGXI RADICAL STONE" . 12143)
+ ("KANGXI RADICAL SPIRIT" . 12144)
+ ("KANGXI RADICAL TRACK" . 12145)
+ ("KANGXI RADICAL GRAIN" . 12146)
+ ("KANGXI RADICAL CAVE" . 12147)
+ ("KANGXI RADICAL STAND" . 12148)
+ ("KANGXI RADICAL BAMBOO" . 12149)
+ ("KANGXI RADICAL RICE" . 12150)
+ ("KANGXI RADICAL SILK" . 12151)
+ ("KANGXI RADICAL JAR" . 12152)
+ ("KANGXI RADICAL NET" . 12153)
+ ("KANGXI RADICAL SHEEP" . 12154)
+ ("KANGXI RADICAL FEATHER" . 12155)
+ ("KANGXI RADICAL OLD" . 12156)
+ ("KANGXI RADICAL AND" . 12157)
+ ("KANGXI RADICAL PLOW" . 12158)
+ ("KANGXI RADICAL EAR" . 12159)
+ ("KANGXI RADICAL BRUSH" . 12160)
+ ("KANGXI RADICAL MEAT" . 12161)
+ ("KANGXI RADICAL MINISTER" . 12162)
+ ("KANGXI RADICAL SELF" . 12163)
+ ("KANGXI RADICAL ARRIVE" . 12164)
+ ("KANGXI RADICAL MORTAR" . 12165)
+ ("KANGXI RADICAL TONGUE" . 12166)
+ ("KANGXI RADICAL OPPOSE" . 12167)
+ ("KANGXI RADICAL BOAT" . 12168)
+ ("KANGXI RADICAL STOPPING" . 12169)
+ ("KANGXI RADICAL COLOR" . 12170)
+ ("KANGXI RADICAL GRASS" . 12171)
+ ("KANGXI RADICAL TIGER" . 12172)
+ ("KANGXI RADICAL INSECT" . 12173)
+ ("KANGXI RADICAL BLOOD" . 12174)
+ ("KANGXI RADICAL WALK ENCLOSURE" . 12175)
+ ("KANGXI RADICAL CLOTHES" . 12176)
+ ("KANGXI RADICAL WEST" . 12177)
+ ("KANGXI RADICAL SEE" . 12178)
+ ("KANGXI RADICAL HORN" . 12179)
+ ("KANGXI RADICAL SPEECH" . 12180)
+ ("KANGXI RADICAL VALLEY" . 12181)
+ ("KANGXI RADICAL BEAN" . 12182)
+ ("KANGXI RADICAL PIG" . 12183)
+ ("KANGXI RADICAL BADGER" . 12184)
+ ("KANGXI RADICAL SHELL" . 12185)
+ ("KANGXI RADICAL RED" . 12186)
+ ("KANGXI RADICAL RUN" . 12187)
+ ("KANGXI RADICAL FOOT" . 12188)
+ ("KANGXI RADICAL BODY" . 12189)
+ ("KANGXI RADICAL CART" . 12190)
+ ("KANGXI RADICAL BITTER" . 12191)
+ ("KANGXI RADICAL MORNING" . 12192)
+ ("KANGXI RADICAL WALK" . 12193)
+ ("KANGXI RADICAL CITY" . 12194)
+ ("KANGXI RADICAL WINE" . 12195)
+ ("KANGXI RADICAL DISTINGUISH" . 12196)
+ ("KANGXI RADICAL VILLAGE" . 12197)
+ ("KANGXI RADICAL GOLD" . 12198)
+ ("KANGXI RADICAL LONG" . 12199)
+ ("KANGXI RADICAL GATE" . 12200)
+ ("KANGXI RADICAL MOUND" . 12201)
+ ("KANGXI RADICAL SLAVE" . 12202)
+ ("KANGXI RADICAL SHORT TAILED BIRD" . 12203)
+ ("KANGXI RADICAL RAIN" . 12204)
+ ("KANGXI RADICAL BLUE" . 12205)
+ ("KANGXI RADICAL WRONG" . 12206)
+ ("KANGXI RADICAL FACE" . 12207)
+ ("KANGXI RADICAL LEATHER" . 12208)
+ ("KANGXI RADICAL TANNED LEATHER" . 12209)
+ ("KANGXI RADICAL LEEK" . 12210)
+ ("KANGXI RADICAL SOUND" . 12211)
+ ("KANGXI RADICAL LEAF" . 12212)
+ ("KANGXI RADICAL WIND" . 12213)
+ ("KANGXI RADICAL FLY" . 12214)
+ ("KANGXI RADICAL EAT" . 12215)
+ ("KANGXI RADICAL HEAD" . 12216)
+ ("KANGXI RADICAL FRAGRANT" . 12217)
+ ("KANGXI RADICAL HORSE" . 12218)
+ ("KANGXI RADICAL BONE" . 12219)
+ ("KANGXI RADICAL TALL" . 12220)
+ ("KANGXI RADICAL HAIR" . 12221)
+ ("KANGXI RADICAL FIGHT" . 12222)
+ ("KANGXI RADICAL SACRIFICIAL WINE" . 12223)
+ ("KANGXI RADICAL CAULDRON" . 12224)
+ ("KANGXI RADICAL GHOST" . 12225)
+ ("KANGXI RADICAL FISH" . 12226)
+ ("KANGXI RADICAL BIRD" . 12227)
+ ("KANGXI RADICAL SALT" . 12228)
+ ("KANGXI RADICAL DEER" . 12229)
+ ("KANGXI RADICAL WHEAT" . 12230)
+ ("KANGXI RADICAL HEMP" . 12231)
+ ("KANGXI RADICAL YELLOW" . 12232)
+ ("KANGXI RADICAL MILLET" . 12233)
+ ("KANGXI RADICAL BLACK" . 12234)
+ ("KANGXI RADICAL EMBROIDERY" . 12235)
+ ("KANGXI RADICAL FROG" . 12236)
+ ("KANGXI RADICAL TRIPOD" . 12237)
+ ("KANGXI RADICAL DRUM" . 12238)
+ ("KANGXI RADICAL RAT" . 12239)
+ ("KANGXI RADICAL NOSE" . 12240)
+ ("KANGXI RADICAL EVEN" . 12241)
+ ("KANGXI RADICAL TOOTH" . 12242)
+ ("KANGXI RADICAL DRAGON" . 12243)
+ ("KANGXI RADICAL TURTLE" . 12244)
+ ("KANGXI RADICAL FLUTE" . 12245)
+ ("IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT" . 12272)
+ ("IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW" . 12273)
+ ("IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO MIDDLE AND RIGHT" . 12274)
+ ("IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO MIDDLE AND BELOW" . 12275)
+ ("IDEOGRAPHIC DESCRIPTION CHARACTER FULL SURROUND" . 12276)
+ ("IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM ABOVE" . 12277)
+ ("IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM BELOW" . 12278)
+ ("IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM LEFT" . 12279)
+ ("IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER LEFT" . 12280)
+ ("IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER RIGHT" . 12281)
+ ("IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM LOWER LEFT" . 12282)
+ ("IDEOGRAPHIC DESCRIPTION CHARACTER OVERLAID" . 12283)
+ ("IDEOGRAPHIC SPACE" . 12288)
+ ("IDEOGRAPHIC COMMA" . 12289)
+ ("IDEOGRAPHIC FULL STOP" . 12290)
+ ("DITTO MARK" . 12291)
+ ("JAPANESE INDUSTRIAL STANDARD SYMBOL" . 12292)
+ ("IDEOGRAPHIC ITERATION MARK" . 12293)
+ ("IDEOGRAPHIC CLOSING MARK" . 12294)
+ ("IDEOGRAPHIC NUMBER ZERO" . 12295)
+ ("LEFT ANGLE BRACKET" . 12296)
+ ("RIGHT ANGLE BRACKET" . 12297)
+ ("LEFT DOUBLE ANGLE BRACKET" . 12298)
+ ("RIGHT DOUBLE ANGLE BRACKET" . 12299)
+ ("LEFT CORNER BRACKET" . 12300)
+ ("RIGHT CORNER BRACKET" . 12301)
+ ("LEFT WHITE CORNER BRACKET" . 12302)
+ ("RIGHT WHITE CORNER BRACKET" . 12303)
+ ("LEFT BLACK LENTICULAR BRACKET" . 12304)
+ ("RIGHT BLACK LENTICULAR BRACKET" . 12305)
+ ("POSTAL MARK" . 12306)
+ ("GETA MARK" . 12307)
+ ("LEFT TORTOISE SHELL BRACKET" . 12308)
+ ("RIGHT TORTOISE SHELL BRACKET" . 12309)
+ ("LEFT WHITE LENTICULAR BRACKET" . 12310)
+ ("RIGHT WHITE LENTICULAR BRACKET" . 12311)
+ ("LEFT WHITE TORTOISE SHELL BRACKET" . 12312)
+ ("RIGHT WHITE TORTOISE SHELL BRACKET" . 12313)
+ ("LEFT WHITE SQUARE BRACKET" . 12314)
+ ("RIGHT WHITE SQUARE BRACKET" . 12315)
+ ("WAVE DASH" . 12316)
+ ("REVERSED DOUBLE PRIME QUOTATION MARK" . 12317)
+ ("DOUBLE PRIME QUOTATION MARK" . 12318)
+ ("LOW DOUBLE PRIME QUOTATION MARK" . 12319)
+ ("POSTAL MARK FACE" . 12320)
+ ("HANGZHOU NUMERAL ONE" . 12321)
+ ("HANGZHOU NUMERAL TWO" . 12322)
+ ("HANGZHOU NUMERAL THREE" . 12323)
+ ("HANGZHOU NUMERAL FOUR" . 12324)
+ ("HANGZHOU NUMERAL FIVE" . 12325)
+ ("HANGZHOU NUMERAL SIX" . 12326)
+ ("HANGZHOU NUMERAL SEVEN" . 12327)
+ ("HANGZHOU NUMERAL EIGHT" . 12328)
+ ("HANGZHOU NUMERAL NINE" . 12329)
+ ("IDEOGRAPHIC LEVEL TONE MARK" . 12330)
+ ("IDEOGRAPHIC RISING TONE MARK" . 12331)
+ ("IDEOGRAPHIC DEPARTING TONE MARK" . 12332)
+ ("IDEOGRAPHIC ENTERING TONE MARK" . 12333)
+ ("HANGUL SINGLE DOT TONE MARK" . 12334)
+ ("HANGUL DOUBLE DOT TONE MARK" . 12335)
+ ("WAVY DASH" . 12336)
+ ("VERTICAL KANA REPEAT MARK" . 12337)
+ ("VERTICAL KANA REPEAT WITH VOICED SOUND MARK" . 12338)
+ ("VERTICAL KANA REPEAT MARK UPPER HALF" . 12339)
+ ("VERTICAL KANA REPEAT WITH VOICED SOUND MARK UPPER HALF" . 12340)
+ ("VERTICAL KANA REPEAT MARK LOWER HALF" . 12341)
+ ("CIRCLED POSTAL MARK" . 12342)
+ ("IDEOGRAPHIC TELEGRAPH LINE FEED SEPARATOR SYMBOL" . 12343)
+ ("HANGZHOU NUMERAL TEN" . 12344)
+ ("HANGZHOU NUMERAL TWENTY" . 12345)
+ ("HANGZHOU NUMERAL THIRTY" . 12346)
+ ("VERTICAL IDEOGRAPHIC ITERATION MARK" . 12347)
+ ("MASU MARK" . 12348)
+ ("PART ALTERNATION MARK" . 12349)
+ ("IDEOGRAPHIC VARIATION INDICATOR" . 12350)
+ ("IDEOGRAPHIC HALF FILL SPACE" . 12351)
+ ("HIRAGANA LETTER SMALL A" . 12353)
+ ("HIRAGANA LETTER A" . 12354)
+ ("HIRAGANA LETTER SMALL I" . 12355)
+ ("HIRAGANA LETTER I" . 12356)
+ ("HIRAGANA LETTER SMALL U" . 12357)
+ ("HIRAGANA LETTER U" . 12358)
+ ("HIRAGANA LETTER SMALL E" . 12359)
+ ("HIRAGANA LETTER E" . 12360)
+ ("HIRAGANA LETTER SMALL O" . 12361)
+ ("HIRAGANA LETTER O" . 12362)
+ ("HIRAGANA LETTER KA" . 12363)
+ ("HIRAGANA LETTER GA" . 12364)
+ ("HIRAGANA LETTER KI" . 12365)
+ ("HIRAGANA LETTER GI" . 12366)
+ ("HIRAGANA LETTER KU" . 12367)
+ ("HIRAGANA LETTER GU" . 12368)
+ ("HIRAGANA LETTER KE" . 12369)
+ ("HIRAGANA LETTER GE" . 12370)
+ ("HIRAGANA LETTER KO" . 12371)
+ ("HIRAGANA LETTER GO" . 12372)
+ ("HIRAGANA LETTER SA" . 12373)
+ ("HIRAGANA LETTER ZA" . 12374)
+ ("HIRAGANA LETTER SI" . 12375)
+ ("HIRAGANA LETTER ZI" . 12376)
+ ("HIRAGANA LETTER SU" . 12377)
+ ("HIRAGANA LETTER ZU" . 12378)
+ ("HIRAGANA LETTER SE" . 12379)
+ ("HIRAGANA LETTER ZE" . 12380)
+ ("HIRAGANA LETTER SO" . 12381)
+ ("HIRAGANA LETTER ZO" . 12382)
+ ("HIRAGANA LETTER TA" . 12383)
+ ("HIRAGANA LETTER DA" . 12384)
+ ("HIRAGANA LETTER TI" . 12385)
+ ("HIRAGANA LETTER DI" . 12386)
+ ("HIRAGANA LETTER SMALL TU" . 12387)
+ ("HIRAGANA LETTER TU" . 12388)
+ ("HIRAGANA LETTER DU" . 12389)
+ ("HIRAGANA LETTER TE" . 12390)
+ ("HIRAGANA LETTER DE" . 12391)
+ ("HIRAGANA LETTER TO" . 12392)
+ ("HIRAGANA LETTER DO" . 12393)
+ ("HIRAGANA LETTER NA" . 12394)
+ ("HIRAGANA LETTER NI" . 12395)
+ ("HIRAGANA LETTER NU" . 12396)
+ ("HIRAGANA LETTER NE" . 12397)
+ ("HIRAGANA LETTER NO" . 12398)
+ ("HIRAGANA LETTER HA" . 12399)
+ ("HIRAGANA LETTER BA" . 12400)
+ ("HIRAGANA LETTER PA" . 12401)
+ ("HIRAGANA LETTER HI" . 12402)
+ ("HIRAGANA LETTER BI" . 12403)
+ ("HIRAGANA LETTER PI" . 12404)
+ ("HIRAGANA LETTER HU" . 12405)
+ ("HIRAGANA LETTER BU" . 12406)
+ ("HIRAGANA LETTER PU" . 12407)
+ ("HIRAGANA LETTER HE" . 12408)
+ ("HIRAGANA LETTER BE" . 12409)
+ ("HIRAGANA LETTER PE" . 12410)
+ ("HIRAGANA LETTER HO" . 12411)
+ ("HIRAGANA LETTER BO" . 12412)
+ ("HIRAGANA LETTER PO" . 12413)
+ ("HIRAGANA LETTER MA" . 12414)
+ ("HIRAGANA LETTER MI" . 12415)
+ ("HIRAGANA LETTER MU" . 12416)
+ ("HIRAGANA LETTER ME" . 12417)
+ ("HIRAGANA LETTER MO" . 12418)
+ ("HIRAGANA LETTER SMALL YA" . 12419)
+ ("HIRAGANA LETTER YA" . 12420)
+ ("HIRAGANA LETTER SMALL YU" . 12421)
+ ("HIRAGANA LETTER YU" . 12422)
+ ("HIRAGANA LETTER SMALL YO" . 12423)
+ ("HIRAGANA LETTER YO" . 12424)
+ ("HIRAGANA LETTER RA" . 12425)
+ ("HIRAGANA LETTER RI" . 12426)
+ ("HIRAGANA LETTER RU" . 12427)
+ ("HIRAGANA LETTER RE" . 12428)
+ ("HIRAGANA LETTER RO" . 12429)
+ ("HIRAGANA LETTER SMALL WA" . 12430)
+ ("HIRAGANA LETTER WA" . 12431)
+ ("HIRAGANA LETTER WI" . 12432)
+ ("HIRAGANA LETTER WE" . 12433)
+ ("HIRAGANA LETTER WO" . 12434)
+ ("HIRAGANA LETTER N" . 12435)
+ ("HIRAGANA LETTER VU" . 12436)
+ ("HIRAGANA LETTER SMALL KA" . 12437)
+ ("HIRAGANA LETTER SMALL KE" . 12438)
+ ("COMBINING KATAKANA-HIRAGANA VOICED SOUND MARK" . 12441)
+ ("COMBINING KATAKANA-HIRAGANA SEMI-VOICED SOUND MARK" . 12442)
+ ("KATAKANA-HIRAGANA VOICED SOUND MARK" . 12443)
+ ("KATAKANA-HIRAGANA SEMI-VOICED SOUND MARK" . 12444)
+ ("HIRAGANA ITERATION MARK" . 12445)
+ ("HIRAGANA VOICED ITERATION MARK" . 12446)
+ ("HIRAGANA DIGRAPH YORI" . 12447)
+ ("KATAKANA-HIRAGANA DOUBLE HYPHEN" . 12448)
+ ("KATAKANA LETTER SMALL A" . 12449)
+ ("KATAKANA LETTER A" . 12450)
+ ("KATAKANA LETTER SMALL I" . 12451)
+ ("KATAKANA LETTER I" . 12452)
+ ("KATAKANA LETTER SMALL U" . 12453)
+ ("KATAKANA LETTER U" . 12454)
+ ("KATAKANA LETTER SMALL E" . 12455)
+ ("KATAKANA LETTER E" . 12456)
+ ("KATAKANA LETTER SMALL O" . 12457)
+ ("KATAKANA LETTER O" . 12458)
+ ("KATAKANA LETTER KA" . 12459)
+ ("KATAKANA LETTER GA" . 12460)
+ ("KATAKANA LETTER KI" . 12461)
+ ("KATAKANA LETTER GI" . 12462)
+ ("KATAKANA LETTER KU" . 12463)
+ ("KATAKANA LETTER GU" . 12464)
+ ("KATAKANA LETTER KE" . 12465)
+ ("KATAKANA LETTER GE" . 12466)
+ ("KATAKANA LETTER KO" . 12467)
+ ("KATAKANA LETTER GO" . 12468)
+ ("KATAKANA LETTER SA" . 12469)
+ ("KATAKANA LETTER ZA" . 12470)
+ ("KATAKANA LETTER SI" . 12471)
+ ("KATAKANA LETTER ZI" . 12472)
+ ("KATAKANA LETTER SU" . 12473)
+ ("KATAKANA LETTER ZU" . 12474)
+ ("KATAKANA LETTER SE" . 12475)
+ ("KATAKANA LETTER ZE" . 12476)
+ ("KATAKANA LETTER SO" . 12477)
+ ("KATAKANA LETTER ZO" . 12478)
+ ("KATAKANA LETTER TA" . 12479)
+ ("KATAKANA LETTER DA" . 12480)
+ ("KATAKANA LETTER TI" . 12481)
+ ("KATAKANA LETTER DI" . 12482)
+ ("KATAKANA LETTER SMALL TU" . 12483)
+ ("KATAKANA LETTER TU" . 12484)
+ ("KATAKANA LETTER DU" . 12485)
+ ("KATAKANA LETTER TE" . 12486)
+ ("KATAKANA LETTER DE" . 12487)
+ ("KATAKANA LETTER TO" . 12488)
+ ("KATAKANA LETTER DO" . 12489)
+ ("KATAKANA LETTER NA" . 12490)
+ ("KATAKANA LETTER NI" . 12491)
+ ("KATAKANA LETTER NU" . 12492)
+ ("KATAKANA LETTER NE" . 12493)
+ ("KATAKANA LETTER NO" . 12494)
+ ("KATAKANA LETTER HA" . 12495)
+ ("KATAKANA LETTER BA" . 12496)
+ ("KATAKANA LETTER PA" . 12497)
+ ("KATAKANA LETTER HI" . 12498)
+ ("KATAKANA LETTER BI" . 12499)
+ ("KATAKANA LETTER PI" . 12500)
+ ("KATAKANA LETTER HU" . 12501)
+ ("KATAKANA LETTER BU" . 12502)
+ ("KATAKANA LETTER PU" . 12503)
+ ("KATAKANA LETTER HE" . 12504)
+ ("KATAKANA LETTER BE" . 12505)
+ ("KATAKANA LETTER PE" . 12506)
+ ("KATAKANA LETTER HO" . 12507)
+ ("KATAKANA LETTER BO" . 12508)
+ ("KATAKANA LETTER PO" . 12509)
+ ("KATAKANA LETTER MA" . 12510)
+ ("KATAKANA LETTER MI" . 12511)
+ ("KATAKANA LETTER MU" . 12512)
+ ("KATAKANA LETTER ME" . 12513)
+ ("KATAKANA LETTER MO" . 12514)
+ ("KATAKANA LETTER SMALL YA" . 12515)
+ ("KATAKANA LETTER YA" . 12516)
+ ("KATAKANA LETTER SMALL YU" . 12517)
+ ("KATAKANA LETTER YU" . 12518)
+ ("KATAKANA LETTER SMALL YO" . 12519)
+ ("KATAKANA LETTER YO" . 12520)
+ ("KATAKANA LETTER RA" . 12521)
+ ("KATAKANA LETTER RI" . 12522)
+ ("KATAKANA LETTER RU" . 12523)
+ ("KATAKANA LETTER RE" . 12524)
+ ("KATAKANA LETTER RO" . 12525)
+ ("KATAKANA LETTER SMALL WA" . 12526)
+ ("KATAKANA LETTER WA" . 12527)
+ ("KATAKANA LETTER WI" . 12528)
+ ("KATAKANA LETTER WE" . 12529)
+ ("KATAKANA LETTER WO" . 12530)
+ ("KATAKANA LETTER N" . 12531)
+ ("KATAKANA LETTER VU" . 12532)
+ ("KATAKANA LETTER SMALL KA" . 12533)
+ ("KATAKANA LETTER SMALL KE" . 12534)
+ ("KATAKANA LETTER VA" . 12535)
+ ("KATAKANA LETTER VI" . 12536)
+ ("KATAKANA LETTER VE" . 12537)
+ ("KATAKANA LETTER VO" . 12538)
+ ("KATAKANA MIDDLE DOT" . 12539)
+ ("KATAKANA-HIRAGANA PROLONGED SOUND MARK" . 12540)
+ ("KATAKANA ITERATION MARK" . 12541)
+ ("KATAKANA VOICED ITERATION MARK" . 12542)
+ ("KATAKANA DIGRAPH KOTO" . 12543)
+ ("BOPOMOFO LETTER B" . 12549)
+ ("BOPOMOFO LETTER P" . 12550)
+ ("BOPOMOFO LETTER M" . 12551)
+ ("BOPOMOFO LETTER F" . 12552)
+ ("BOPOMOFO LETTER D" . 12553)
+ ("BOPOMOFO LETTER T" . 12554)
+ ("BOPOMOFO LETTER N" . 12555)
+ ("BOPOMOFO LETTER L" . 12556)
+ ("BOPOMOFO LETTER G" . 12557)
+ ("BOPOMOFO LETTER K" . 12558)
+ ("BOPOMOFO LETTER H" . 12559)
+ ("BOPOMOFO LETTER J" . 12560)
+ ("BOPOMOFO LETTER Q" . 12561)
+ ("BOPOMOFO LETTER X" . 12562)
+ ("BOPOMOFO LETTER ZH" . 12563)
+ ("BOPOMOFO LETTER CH" . 12564)
+ ("BOPOMOFO LETTER SH" . 12565)
+ ("BOPOMOFO LETTER R" . 12566)
+ ("BOPOMOFO LETTER Z" . 12567)
+ ("BOPOMOFO LETTER C" . 12568)
+ ("BOPOMOFO LETTER S" . 12569)
+ ("BOPOMOFO LETTER A" . 12570)
+ ("BOPOMOFO LETTER O" . 12571)
+ ("BOPOMOFO LETTER E" . 12572)
+ ("BOPOMOFO LETTER EH" . 12573)
+ ("BOPOMOFO LETTER AI" . 12574)
+ ("BOPOMOFO LETTER EI" . 12575)
+ ("BOPOMOFO LETTER AU" . 12576)
+ ("BOPOMOFO LETTER OU" . 12577)
+ ("BOPOMOFO LETTER AN" . 12578)
+ ("BOPOMOFO LETTER EN" . 12579)
+ ("BOPOMOFO LETTER ANG" . 12580)
+ ("BOPOMOFO LETTER ENG" . 12581)
+ ("BOPOMOFO LETTER ER" . 12582)
+ ("BOPOMOFO LETTER I" . 12583)
+ ("BOPOMOFO LETTER U" . 12584)
+ ("BOPOMOFO LETTER IU" . 12585)
+ ("BOPOMOFO LETTER V" . 12586)
+ ("BOPOMOFO LETTER NG" . 12587)
+ ("BOPOMOFO LETTER GN" . 12588)
+ ("HANGUL LETTER KIYEOK" . 12593)
+ ("HANGUL LETTER SSANGKIYEOK" . 12594)
+ ("HANGUL LETTER KIYEOK-SIOS" . 12595)
+ ("HANGUL LETTER NIEUN" . 12596)
+ ("HANGUL LETTER NIEUN-CIEUC" . 12597)
+ ("HANGUL LETTER NIEUN-HIEUH" . 12598)
+ ("HANGUL LETTER TIKEUT" . 12599)
+ ("HANGUL LETTER SSANGTIKEUT" . 12600)
+ ("HANGUL LETTER RIEUL" . 12601)
+ ("HANGUL LETTER RIEUL-KIYEOK" . 12602)
+ ("HANGUL LETTER RIEUL-MIEUM" . 12603)
+ ("HANGUL LETTER RIEUL-PIEUP" . 12604)
+ ("HANGUL LETTER RIEUL-SIOS" . 12605)
+ ("HANGUL LETTER RIEUL-THIEUTH" . 12606)
+ ("HANGUL LETTER RIEUL-PHIEUPH" . 12607)
+ ("HANGUL LETTER RIEUL-HIEUH" . 12608)
+ ("HANGUL LETTER MIEUM" . 12609)
+ ("HANGUL LETTER PIEUP" . 12610)
+ ("HANGUL LETTER SSANGPIEUP" . 12611)
+ ("HANGUL LETTER PIEUP-SIOS" . 12612)
+ ("HANGUL LETTER SIOS" . 12613)
+ ("HANGUL LETTER SSANGSIOS" . 12614)
+ ("HANGUL LETTER IEUNG" . 12615)
+ ("HANGUL LETTER CIEUC" . 12616)
+ ("HANGUL LETTER SSANGCIEUC" . 12617)
+ ("HANGUL LETTER CHIEUCH" . 12618)
+ ("HANGUL LETTER KHIEUKH" . 12619)
+ ("HANGUL LETTER THIEUTH" . 12620)
+ ("HANGUL LETTER PHIEUPH" . 12621)
+ ("HANGUL LETTER HIEUH" . 12622)
+ ("HANGUL LETTER A" . 12623)
+ ("HANGUL LETTER AE" . 12624)
+ ("HANGUL LETTER YA" . 12625)
+ ("HANGUL LETTER YAE" . 12626)
+ ("HANGUL LETTER EO" . 12627)
+ ("HANGUL LETTER E" . 12628)
+ ("HANGUL LETTER YEO" . 12629)
+ ("HANGUL LETTER YE" . 12630)
+ ("HANGUL LETTER O" . 12631)
+ ("HANGUL LETTER WA" . 12632)
+ ("HANGUL LETTER WAE" . 12633)
+ ("HANGUL LETTER OE" . 12634)
+ ("HANGUL LETTER YO" . 12635)
+ ("HANGUL LETTER U" . 12636)
+ ("HANGUL LETTER WEO" . 12637)
+ ("HANGUL LETTER WE" . 12638)
+ ("HANGUL LETTER WI" . 12639)
+ ("HANGUL LETTER YU" . 12640)
+ ("HANGUL LETTER EU" . 12641)
+ ("HANGUL LETTER YI" . 12642)
+ ("HANGUL LETTER I" . 12643)
+ ("HANGUL FILLER" . 12644)
+ ("HANGUL LETTER SSANGNIEUN" . 12645)
+ ("HANGUL LETTER NIEUN-TIKEUT" . 12646)
+ ("HANGUL LETTER NIEUN-SIOS" . 12647)
+ ("HANGUL LETTER NIEUN-PANSIOS" . 12648)
+ ("HANGUL LETTER RIEUL-KIYEOK-SIOS" . 12649)
+ ("HANGUL LETTER RIEUL-TIKEUT" . 12650)
+ ("HANGUL LETTER RIEUL-PIEUP-SIOS" . 12651)
+ ("HANGUL LETTER RIEUL-PANSIOS" . 12652)
+ ("HANGUL LETTER RIEUL-YEORINHIEUH" . 12653)
+ ("HANGUL LETTER MIEUM-PIEUP" . 12654)
+ ("HANGUL LETTER MIEUM-SIOS" . 12655)
+ ("HANGUL LETTER MIEUM-PANSIOS" . 12656)
+ ("HANGUL LETTER KAPYEOUNMIEUM" . 12657)
+ ("HANGUL LETTER PIEUP-KIYEOK" . 12658)
+ ("HANGUL LETTER PIEUP-TIKEUT" . 12659)
+ ("HANGUL LETTER PIEUP-SIOS-KIYEOK" . 12660)
+ ("HANGUL LETTER PIEUP-SIOS-TIKEUT" . 12661)
+ ("HANGUL LETTER PIEUP-CIEUC" . 12662)
+ ("HANGUL LETTER PIEUP-THIEUTH" . 12663)
+ ("HANGUL LETTER KAPYEOUNPIEUP" . 12664)
+ ("HANGUL LETTER KAPYEOUNSSANGPIEUP" . 12665)
+ ("HANGUL LETTER SIOS-KIYEOK" . 12666)
+ ("HANGUL LETTER SIOS-NIEUN" . 12667)
+ ("HANGUL LETTER SIOS-TIKEUT" . 12668)
+ ("HANGUL LETTER SIOS-PIEUP" . 12669)
+ ("HANGUL LETTER SIOS-CIEUC" . 12670)
+ ("HANGUL LETTER PANSIOS" . 12671)
+ ("HANGUL LETTER SSANGIEUNG" . 12672)
+ ("HANGUL LETTER YESIEUNG" . 12673)
+ ("HANGUL LETTER YESIEUNG-SIOS" . 12674)
+ ("HANGUL LETTER YESIEUNG-PANSIOS" . 12675)
+ ("HANGUL LETTER KAPYEOUNPHIEUPH" . 12676)
+ ("HANGUL LETTER SSANGHIEUH" . 12677)
+ ("HANGUL LETTER YEORINHIEUH" . 12678)
+ ("HANGUL LETTER YO-YA" . 12679)
+ ("HANGUL LETTER YO-YAE" . 12680)
+ ("HANGUL LETTER YO-I" . 12681)
+ ("HANGUL LETTER YU-YEO" . 12682)
+ ("HANGUL LETTER YU-YE" . 12683)
+ ("HANGUL LETTER YU-I" . 12684)
+ ("HANGUL LETTER ARAEA" . 12685)
+ ("HANGUL LETTER ARAEAE" . 12686)
+ ("IDEOGRAPHIC ANNOTATION LINKING MARK" . 12688)
+ ("IDEOGRAPHIC ANNOTATION REVERSE MARK" . 12689)
+ ("IDEOGRAPHIC ANNOTATION ONE MARK" . 12690)
+ ("IDEOGRAPHIC ANNOTATION TWO MARK" . 12691)
+ ("IDEOGRAPHIC ANNOTATION THREE MARK" . 12692)
+ ("IDEOGRAPHIC ANNOTATION FOUR MARK" . 12693)
+ ("IDEOGRAPHIC ANNOTATION TOP MARK" . 12694)
+ ("IDEOGRAPHIC ANNOTATION MIDDLE MARK" . 12695)
+ ("IDEOGRAPHIC ANNOTATION BOTTOM MARK" . 12696)
+ ("IDEOGRAPHIC ANNOTATION FIRST MARK" . 12697)
+ ("IDEOGRAPHIC ANNOTATION SECOND MARK" . 12698)
+ ("IDEOGRAPHIC ANNOTATION THIRD MARK" . 12699)
+ ("IDEOGRAPHIC ANNOTATION FOURTH MARK" . 12700)
+ ("IDEOGRAPHIC ANNOTATION HEAVEN MARK" . 12701)
+ ("IDEOGRAPHIC ANNOTATION EARTH MARK" . 12702)
+ ("IDEOGRAPHIC ANNOTATION MAN MARK" . 12703)
+ ("BOPOMOFO LETTER BU" . 12704)
+ ("BOPOMOFO LETTER ZI" . 12705)
+ ("BOPOMOFO LETTER JI" . 12706)
+ ("BOPOMOFO LETTER GU" . 12707)
+ ("BOPOMOFO LETTER EE" . 12708)
+ ("BOPOMOFO LETTER ENN" . 12709)
+ ("BOPOMOFO LETTER OO" . 12710)
+ ("BOPOMOFO LETTER ONN" . 12711)
+ ("BOPOMOFO LETTER IR" . 12712)
+ ("BOPOMOFO LETTER ANN" . 12713)
+ ("BOPOMOFO LETTER INN" . 12714)
+ ("BOPOMOFO LETTER UNN" . 12715)
+ ("BOPOMOFO LETTER IM" . 12716)
+ ("BOPOMOFO LETTER NGG" . 12717)
+ ("BOPOMOFO LETTER AINN" . 12718)
+ ("BOPOMOFO LETTER AUNN" . 12719)
+ ("BOPOMOFO LETTER AM" . 12720)
+ ("BOPOMOFO LETTER OM" . 12721)
+ ("BOPOMOFO LETTER ONG" . 12722)
+ ("BOPOMOFO LETTER INNN" . 12723)
+ ("BOPOMOFO FINAL LETTER P" . 12724)
+ ("BOPOMOFO FINAL LETTER T" . 12725)
+ ("BOPOMOFO FINAL LETTER K" . 12726)
+ ("BOPOMOFO FINAL LETTER H" . 12727)
+ ("KATAKANA LETTER SMALL KU" . 12784)
+ ("KATAKANA LETTER SMALL SI" . 12785)
+ ("KATAKANA LETTER SMALL SU" . 12786)
+ ("KATAKANA LETTER SMALL TO" . 12787)
+ ("KATAKANA LETTER SMALL NU" . 12788)
+ ("KATAKANA LETTER SMALL HA" . 12789)
+ ("KATAKANA LETTER SMALL HI" . 12790)
+ ("KATAKANA LETTER SMALL HU" . 12791)
+ ("KATAKANA LETTER SMALL HE" . 12792)
+ ("KATAKANA LETTER SMALL HO" . 12793)
+ ("KATAKANA LETTER SMALL MU" . 12794)
+ ("KATAKANA LETTER SMALL RA" . 12795)
+ ("KATAKANA LETTER SMALL RI" . 12796)
+ ("KATAKANA LETTER SMALL RU" . 12797)
+ ("KATAKANA LETTER SMALL RE" . 12798)
+ ("KATAKANA LETTER SMALL RO" . 12799)
+ ("PARENTHESIZED HANGUL KIYEOK" . 12800)
+ ("PARENTHESIZED HANGUL NIEUN" . 12801)
+ ("PARENTHESIZED HANGUL TIKEUT" . 12802)
+ ("PARENTHESIZED HANGUL RIEUL" . 12803)
+ ("PARENTHESIZED HANGUL MIEUM" . 12804)
+ ("PARENTHESIZED HANGUL PIEUP" . 12805)
+ ("PARENTHESIZED HANGUL SIOS" . 12806)
+ ("PARENTHESIZED HANGUL IEUNG" . 12807)
+ ("PARENTHESIZED HANGUL CIEUC" . 12808)
+ ("PARENTHESIZED HANGUL CHIEUCH" . 12809)
+ ("PARENTHESIZED HANGUL KHIEUKH" . 12810)
+ ("PARENTHESIZED HANGUL THIEUTH" . 12811)
+ ("PARENTHESIZED HANGUL PHIEUPH" . 12812)
+ ("PARENTHESIZED HANGUL HIEUH" . 12813)
+ ("PARENTHESIZED HANGUL KIYEOK A" . 12814)
+ ("PARENTHESIZED HANGUL NIEUN A" . 12815)
+ ("PARENTHESIZED HANGUL TIKEUT A" . 12816)
+ ("PARENTHESIZED HANGUL RIEUL A" . 12817)
+ ("PARENTHESIZED HANGUL MIEUM A" . 12818)
+ ("PARENTHESIZED HANGUL PIEUP A" . 12819)
+ ("PARENTHESIZED HANGUL SIOS A" . 12820)
+ ("PARENTHESIZED HANGUL IEUNG A" . 12821)
+ ("PARENTHESIZED HANGUL CIEUC A" . 12822)
+ ("PARENTHESIZED HANGUL CHIEUCH A" . 12823)
+ ("PARENTHESIZED HANGUL KHIEUKH A" . 12824)
+ ("PARENTHESIZED HANGUL THIEUTH A" . 12825)
+ ("PARENTHESIZED HANGUL PHIEUPH A" . 12826)
+ ("PARENTHESIZED HANGUL HIEUH A" . 12827)
+ ("PARENTHESIZED HANGUL CIEUC U" . 12828)
+ ("PARENTHESIZED IDEOGRAPH ONE" . 12832)
+ ("PARENTHESIZED IDEOGRAPH TWO" . 12833)
+ ("PARENTHESIZED IDEOGRAPH THREE" . 12834)
+ ("PARENTHESIZED IDEOGRAPH FOUR" . 12835)
+ ("PARENTHESIZED IDEOGRAPH FIVE" . 12836)
+ ("PARENTHESIZED IDEOGRAPH SIX" . 12837)
+ ("PARENTHESIZED IDEOGRAPH SEVEN" . 12838)
+ ("PARENTHESIZED IDEOGRAPH EIGHT" . 12839)
+ ("PARENTHESIZED IDEOGRAPH NINE" . 12840)
+ ("PARENTHESIZED IDEOGRAPH TEN" . 12841)
+ ("PARENTHESIZED IDEOGRAPH MOON" . 12842)
+ ("PARENTHESIZED IDEOGRAPH FIRE" . 12843)
+ ("PARENTHESIZED IDEOGRAPH WATER" . 12844)
+ ("PARENTHESIZED IDEOGRAPH WOOD" . 12845)
+ ("PARENTHESIZED IDEOGRAPH METAL" . 12846)
+ ("PARENTHESIZED IDEOGRAPH EARTH" . 12847)
+ ("PARENTHESIZED IDEOGRAPH SUN" . 12848)
+ ("PARENTHESIZED IDEOGRAPH STOCK" . 12849)
+ ("PARENTHESIZED IDEOGRAPH HAVE" . 12850)
+ ("PARENTHESIZED IDEOGRAPH SOCIETY" . 12851)
+ ("PARENTHESIZED IDEOGRAPH NAME" . 12852)
+ ("PARENTHESIZED IDEOGRAPH SPECIAL" . 12853)
+ ("PARENTHESIZED IDEOGRAPH FINANCIAL" . 12854)
+ ("PARENTHESIZED IDEOGRAPH CONGRATULATION" . 12855)
+ ("PARENTHESIZED IDEOGRAPH LABOR" . 12856)
+ ("PARENTHESIZED IDEOGRAPH REPRESENT" . 12857)
+ ("PARENTHESIZED IDEOGRAPH CALL" . 12858)
+ ("PARENTHESIZED IDEOGRAPH STUDY" . 12859)
+ ("PARENTHESIZED IDEOGRAPH SUPERVISE" . 12860)
+ ("PARENTHESIZED IDEOGRAPH ENTERPRISE" . 12861)
+ ("PARENTHESIZED IDEOGRAPH RESOURCE" . 12862)
+ ("PARENTHESIZED IDEOGRAPH ALLIANCE" . 12863)
+ ("PARENTHESIZED IDEOGRAPH FESTIVAL" . 12864)
+ ("PARENTHESIZED IDEOGRAPH REST" . 12865)
+ ("PARENTHESIZED IDEOGRAPH SELF" . 12866)
+ ("PARENTHESIZED IDEOGRAPH REACH" . 12867)
+ ("CIRCLED NUMBER TWENTY ONE" . 12881)
+ ("CIRCLED NUMBER TWENTY TWO" . 12882)
+ ("CIRCLED NUMBER TWENTY THREE" . 12883)
+ ("CIRCLED NUMBER TWENTY FOUR" . 12884)
+ ("CIRCLED NUMBER TWENTY FIVE" . 12885)
+ ("CIRCLED NUMBER TWENTY SIX" . 12886)
+ ("CIRCLED NUMBER TWENTY SEVEN" . 12887)
+ ("CIRCLED NUMBER TWENTY EIGHT" . 12888)
+ ("CIRCLED NUMBER TWENTY NINE" . 12889)
+ ("CIRCLED NUMBER THIRTY" . 12890)
+ ("CIRCLED NUMBER THIRTY ONE" . 12891)
+ ("CIRCLED NUMBER THIRTY TWO" . 12892)
+ ("CIRCLED NUMBER THIRTY THREE" . 12893)
+ ("CIRCLED NUMBER THIRTY FOUR" . 12894)
+ ("CIRCLED NUMBER THIRTY FIVE" . 12895)
+ ("CIRCLED HANGUL KIYEOK" . 12896)
+ ("CIRCLED HANGUL NIEUN" . 12897)
+ ("CIRCLED HANGUL TIKEUT" . 12898)
+ ("CIRCLED HANGUL RIEUL" . 12899)
+ ("CIRCLED HANGUL MIEUM" . 12900)
+ ("CIRCLED HANGUL PIEUP" . 12901)
+ ("CIRCLED HANGUL SIOS" . 12902)
+ ("CIRCLED HANGUL IEUNG" . 12903)
+ ("CIRCLED HANGUL CIEUC" . 12904)
+ ("CIRCLED HANGUL CHIEUCH" . 12905)
+ ("CIRCLED HANGUL KHIEUKH" . 12906)
+ ("CIRCLED HANGUL THIEUTH" . 12907)
+ ("CIRCLED HANGUL PHIEUPH" . 12908)
+ ("CIRCLED HANGUL HIEUH" . 12909)
+ ("CIRCLED HANGUL KIYEOK A" . 12910)
+ ("CIRCLED HANGUL NIEUN A" . 12911)
+ ("CIRCLED HANGUL TIKEUT A" . 12912)
+ ("CIRCLED HANGUL RIEUL A" . 12913)
+ ("CIRCLED HANGUL MIEUM A" . 12914)
+ ("CIRCLED HANGUL PIEUP A" . 12915)
+ ("CIRCLED HANGUL SIOS A" . 12916)
+ ("CIRCLED HANGUL IEUNG A" . 12917)
+ ("CIRCLED HANGUL CIEUC A" . 12918)
+ ("CIRCLED HANGUL CHIEUCH A" . 12919)
+ ("CIRCLED HANGUL KHIEUKH A" . 12920)
+ ("CIRCLED HANGUL THIEUTH A" . 12921)
+ ("CIRCLED HANGUL PHIEUPH A" . 12922)
+ ("CIRCLED HANGUL HIEUH A" . 12923)
+ ("KOREAN STANDARD SYMBOL" . 12927)
+ ("CIRCLED IDEOGRAPH ONE" . 12928)
+ ("CIRCLED IDEOGRAPH TWO" . 12929)
+ ("CIRCLED IDEOGRAPH THREE" . 12930)
+ ("CIRCLED IDEOGRAPH FOUR" . 12931)
+ ("CIRCLED IDEOGRAPH FIVE" . 12932)
+ ("CIRCLED IDEOGRAPH SIX" . 12933)
+ ("CIRCLED IDEOGRAPH SEVEN" . 12934)
+ ("CIRCLED IDEOGRAPH EIGHT" . 12935)
+ ("CIRCLED IDEOGRAPH NINE" . 12936)
+ ("CIRCLED IDEOGRAPH TEN" . 12937)
+ ("CIRCLED IDEOGRAPH MOON" . 12938)
+ ("CIRCLED IDEOGRAPH FIRE" . 12939)
+ ("CIRCLED IDEOGRAPH WATER" . 12940)
+ ("CIRCLED IDEOGRAPH WOOD" . 12941)
+ ("CIRCLED IDEOGRAPH METAL" . 12942)
+ ("CIRCLED IDEOGRAPH EARTH" . 12943)
+ ("CIRCLED IDEOGRAPH SUN" . 12944)
+ ("CIRCLED IDEOGRAPH STOCK" . 12945)
+ ("CIRCLED IDEOGRAPH HAVE" . 12946)
+ ("CIRCLED IDEOGRAPH SOCIETY" . 12947)
+ ("CIRCLED IDEOGRAPH NAME" . 12948)
+ ("CIRCLED IDEOGRAPH SPECIAL" . 12949)
+ ("CIRCLED IDEOGRAPH FINANCIAL" . 12950)
+ ("CIRCLED IDEOGRAPH CONGRATULATION" . 12951)
+ ("CIRCLED IDEOGRAPH LABOR" . 12952)
+ ("CIRCLED IDEOGRAPH SECRET" . 12953)
+ ("CIRCLED IDEOGRAPH MALE" . 12954)
+ ("CIRCLED IDEOGRAPH FEMALE" . 12955)
+ ("CIRCLED IDEOGRAPH SUITABLE" . 12956)
+ ("CIRCLED IDEOGRAPH EXCELLENT" . 12957)
+ ("CIRCLED IDEOGRAPH PRINT" . 12958)
+ ("CIRCLED IDEOGRAPH ATTENTION" . 12959)
+ ("CIRCLED IDEOGRAPH ITEM" . 12960)
+ ("CIRCLED IDEOGRAPH REST" . 12961)
+ ("CIRCLED IDEOGRAPH COPY" . 12962)
+ ("CIRCLED IDEOGRAPH CORRECT" . 12963)
+ ("CIRCLED IDEOGRAPH HIGH" . 12964)
+ ("CIRCLED IDEOGRAPH CENTRE" . 12965)
+ ("CIRCLED IDEOGRAPH LOW" . 12966)
+ ("CIRCLED IDEOGRAPH LEFT" . 12967)
+ ("CIRCLED IDEOGRAPH RIGHT" . 12968)
+ ("CIRCLED IDEOGRAPH MEDICINE" . 12969)
+ ("CIRCLED IDEOGRAPH RELIGION" . 12970)
+ ("CIRCLED IDEOGRAPH STUDY" . 12971)
+ ("CIRCLED IDEOGRAPH SUPERVISE" . 12972)
+ ("CIRCLED IDEOGRAPH ENTERPRISE" . 12973)
+ ("CIRCLED IDEOGRAPH RESOURCE" . 12974)
+ ("CIRCLED IDEOGRAPH ALLIANCE" . 12975)
+ ("CIRCLED IDEOGRAPH NIGHT" . 12976)
+ ("CIRCLED NUMBER THIRTY SIX" . 12977)
+ ("CIRCLED NUMBER THIRTY SEVEN" . 12978)
+ ("CIRCLED NUMBER THIRTY EIGHT" . 12979)
+ ("CIRCLED NUMBER THIRTY NINE" . 12980)
+ ("CIRCLED NUMBER FORTY" . 12981)
+ ("CIRCLED NUMBER FORTY ONE" . 12982)
+ ("CIRCLED NUMBER FORTY TWO" . 12983)
+ ("CIRCLED NUMBER FORTY THREE" . 12984)
+ ("CIRCLED NUMBER FORTY FOUR" . 12985)
+ ("CIRCLED NUMBER FORTY FIVE" . 12986)
+ ("CIRCLED NUMBER FORTY SIX" . 12987)
+ ("CIRCLED NUMBER FORTY SEVEN" . 12988)
+ ("CIRCLED NUMBER FORTY EIGHT" . 12989)
+ ("CIRCLED NUMBER FORTY NINE" . 12990)
+ ("CIRCLED NUMBER FIFTY" . 12991)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR JANUARY" . 12992)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR FEBRUARY" . 12993)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR MARCH" . 12994)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR APRIL" . 12995)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR MAY" . 12996)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR JUNE" . 12997)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR JULY" . 12998)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR AUGUST" . 12999)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR SEPTEMBER" . 13000)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR OCTOBER" . 13001)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR NOVEMBER" . 13002)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DECEMBER" . 13003)
+ ("CIRCLED KATAKANA A" . 13008)
+ ("CIRCLED KATAKANA I" . 13009)
+ ("CIRCLED KATAKANA U" . 13010)
+ ("CIRCLED KATAKANA E" . 13011)
+ ("CIRCLED KATAKANA O" . 13012)
+ ("CIRCLED KATAKANA KA" . 13013)
+ ("CIRCLED KATAKANA KI" . 13014)
+ ("CIRCLED KATAKANA KU" . 13015)
+ ("CIRCLED KATAKANA KE" . 13016)
+ ("CIRCLED KATAKANA KO" . 13017)
+ ("CIRCLED KATAKANA SA" . 13018)
+ ("CIRCLED KATAKANA SI" . 13019)
+ ("CIRCLED KATAKANA SU" . 13020)
+ ("CIRCLED KATAKANA SE" . 13021)
+ ("CIRCLED KATAKANA SO" . 13022)
+ ("CIRCLED KATAKANA TA" . 13023)
+ ("CIRCLED KATAKANA TI" . 13024)
+ ("CIRCLED KATAKANA TU" . 13025)
+ ("CIRCLED KATAKANA TE" . 13026)
+ ("CIRCLED KATAKANA TO" . 13027)
+ ("CIRCLED KATAKANA NA" . 13028)
+ ("CIRCLED KATAKANA NI" . 13029)
+ ("CIRCLED KATAKANA NU" . 13030)
+ ("CIRCLED KATAKANA NE" . 13031)
+ ("CIRCLED KATAKANA NO" . 13032)
+ ("CIRCLED KATAKANA HA" . 13033)
+ ("CIRCLED KATAKANA HI" . 13034)
+ ("CIRCLED KATAKANA HU" . 13035)
+ ("CIRCLED KATAKANA HE" . 13036)
+ ("CIRCLED KATAKANA HO" . 13037)
+ ("CIRCLED KATAKANA MA" . 13038)
+ ("CIRCLED KATAKANA MI" . 13039)
+ ("CIRCLED KATAKANA MU" . 13040)
+ ("CIRCLED KATAKANA ME" . 13041)
+ ("CIRCLED KATAKANA MO" . 13042)
+ ("CIRCLED KATAKANA YA" . 13043)
+ ("CIRCLED KATAKANA YU" . 13044)
+ ("CIRCLED KATAKANA YO" . 13045)
+ ("CIRCLED KATAKANA RA" . 13046)
+ ("CIRCLED KATAKANA RI" . 13047)
+ ("CIRCLED KATAKANA RU" . 13048)
+ ("CIRCLED KATAKANA RE" . 13049)
+ ("CIRCLED KATAKANA RO" . 13050)
+ ("CIRCLED KATAKANA WA" . 13051)
+ ("CIRCLED KATAKANA WI" . 13052)
+ ("CIRCLED KATAKANA WE" . 13053)
+ ("CIRCLED KATAKANA WO" . 13054)
+ ("SQUARE APAATO" . 13056)
+ ("SQUARE ARUHUA" . 13057)
+ ("SQUARE ANPEA" . 13058)
+ ("SQUARE AARU" . 13059)
+ ("SQUARE ININGU" . 13060)
+ ("SQUARE INTI" . 13061)
+ ("SQUARE UON" . 13062)
+ ("SQUARE ESUKUUDO" . 13063)
+ ("SQUARE EEKAA" . 13064)
+ ("SQUARE ONSU" . 13065)
+ ("SQUARE OOMU" . 13066)
+ ("SQUARE KAIRI" . 13067)
+ ("SQUARE KARATTO" . 13068)
+ ("SQUARE KARORII" . 13069)
+ ("SQUARE GARON" . 13070)
+ ("SQUARE GANMA" . 13071)
+ ("SQUARE GIGA" . 13072)
+ ("SQUARE GINII" . 13073)
+ ("SQUARE KYURII" . 13074)
+ ("SQUARE GIRUDAA" . 13075)
+ ("SQUARE KIRO" . 13076)
+ ("SQUARE KIROGURAMU" . 13077)
+ ("SQUARE KIROMEETORU" . 13078)
+ ("SQUARE KIROWATTO" . 13079)
+ ("SQUARE GURAMU" . 13080)
+ ("SQUARE GURAMUTON" . 13081)
+ ("SQUARE KURUZEIRO" . 13082)
+ ("SQUARE KUROONE" . 13083)
+ ("SQUARE KEESU" . 13084)
+ ("SQUARE KORUNA" . 13085)
+ ("SQUARE KOOPO" . 13086)
+ ("SQUARE SAIKURU" . 13087)
+ ("SQUARE SANTIIMU" . 13088)
+ ("SQUARE SIRINGU" . 13089)
+ ("SQUARE SENTI" . 13090)
+ ("SQUARE SENTO" . 13091)
+ ("SQUARE DAASU" . 13092)
+ ("SQUARE DESI" . 13093)
+ ("SQUARE DORU" . 13094)
+ ("SQUARE TON" . 13095)
+ ("SQUARE NANO" . 13096)
+ ("SQUARE NOTTO" . 13097)
+ ("SQUARE HAITU" . 13098)
+ ("SQUARE PAASENTO" . 13099)
+ ("SQUARE PAATU" . 13100)
+ ("SQUARE BAARERU" . 13101)
+ ("SQUARE PIASUTORU" . 13102)
+ ("SQUARE PIKURU" . 13103)
+ ("SQUARE PIKO" . 13104)
+ ("SQUARE BIRU" . 13105)
+ ("SQUARE HUARADDO" . 13106)
+ ("SQUARE HUIITO" . 13107)
+ ("SQUARE BUSSYERU" . 13108)
+ ("SQUARE HURAN" . 13109)
+ ("SQUARE HEKUTAARU" . 13110)
+ ("SQUARE PESO" . 13111)
+ ("SQUARE PENIHI" . 13112)
+ ("SQUARE HERUTU" . 13113)
+ ("SQUARE PENSU" . 13114)
+ ("SQUARE PEEZI" . 13115)
+ ("SQUARE BEETA" . 13116)
+ ("SQUARE POINTO" . 13117)
+ ("SQUARE BORUTO" . 13118)
+ ("SQUARE HON" . 13119)
+ ("SQUARE PONDO" . 13120)
+ ("SQUARE HOORU" . 13121)
+ ("SQUARE HOON" . 13122)
+ ("SQUARE MAIKURO" . 13123)
+ ("SQUARE MAIRU" . 13124)
+ ("SQUARE MAHHA" . 13125)
+ ("SQUARE MARUKU" . 13126)
+ ("SQUARE MANSYON" . 13127)
+ ("SQUARE MIKURON" . 13128)
+ ("SQUARE MIRI" . 13129)
+ ("SQUARE MIRIBAARU" . 13130)
+ ("SQUARE MEGA" . 13131)
+ ("SQUARE MEGATON" . 13132)
+ ("SQUARE MEETORU" . 13133)
+ ("SQUARE YAADO" . 13134)
+ ("SQUARE YAARU" . 13135)
+ ("SQUARE YUAN" . 13136)
+ ("SQUARE RITTORU" . 13137)
+ ("SQUARE RIRA" . 13138)
+ ("SQUARE RUPII" . 13139)
+ ("SQUARE RUUBURU" . 13140)
+ ("SQUARE REMU" . 13141)
+ ("SQUARE RENTOGEN" . 13142)
+ ("SQUARE WATTO" . 13143)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR ZERO" . 13144)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR ONE" . 13145)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR TWO" . 13146)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR THREE" . 13147)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR FOUR" . 13148)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR FIVE" . 13149)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR SIX" . 13150)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR SEVEN" . 13151)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR EIGHT" . 13152)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR NINE" . 13153)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR TEN" . 13154)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR ELEVEN" . 13155)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR TWELVE" . 13156)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR THIRTEEN" . 13157)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR FOURTEEN" . 13158)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR FIFTEEN" . 13159)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR SIXTEEN" . 13160)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR SEVENTEEN" . 13161)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR EIGHTEEN" . 13162)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR NINETEEN" . 13163)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR TWENTY" . 13164)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR TWENTY-ONE" . 13165)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR TWENTY-TWO" . 13166)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR TWENTY-THREE" . 13167)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR TWENTY-FOUR" . 13168)
+ ("SQUARE HPA" . 13169)
+ ("SQUARE DA" . 13170)
+ ("SQUARE AU" . 13171)
+ ("SQUARE BAR" . 13172)
+ ("SQUARE OV" . 13173)
+ ("SQUARE PC" . 13174)
+ ("SQUARE ERA NAME HEISEI" . 13179)
+ ("SQUARE ERA NAME SYOUWA" . 13180)
+ ("SQUARE ERA NAME TAISYOU" . 13181)
+ ("SQUARE ERA NAME MEIZI" . 13182)
+ ("SQUARE CORPORATION" . 13183)
+ ("SQUARE PA AMPS" . 13184)
+ ("SQUARE NA" . 13185)
+ ("SQUARE MU A" . 13186)
+ ("SQUARE MA" . 13187)
+ ("SQUARE KA" . 13188)
+ ("SQUARE KB" . 13189)
+ ("SQUARE MB" . 13190)
+ ("SQUARE GB" . 13191)
+ ("SQUARE CAL" . 13192)
+ ("SQUARE KCAL" . 13193)
+ ("SQUARE PF" . 13194)
+ ("SQUARE NF" . 13195)
+ ("SQUARE MU F" . 13196)
+ ("SQUARE MU G" . 13197)
+ ("SQUARE MG" . 13198)
+ ("SQUARE KG" . 13199)
+ ("SQUARE HZ" . 13200)
+ ("SQUARE KHZ" . 13201)
+ ("SQUARE MHZ" . 13202)
+ ("SQUARE GHZ" . 13203)
+ ("SQUARE THZ" . 13204)
+ ("SQUARE MU L" . 13205)
+ ("SQUARE ML" . 13206)
+ ("SQUARE DL" . 13207)
+ ("SQUARE KL" . 13208)
+ ("SQUARE FM" . 13209)
+ ("SQUARE NM" . 13210)
+ ("SQUARE MU M" . 13211)
+ ("SQUARE MM" . 13212)
+ ("SQUARE CM" . 13213)
+ ("SQUARE KM" . 13214)
+ ("SQUARE MM SQUARED" . 13215)
+ ("SQUARE CM SQUARED" . 13216)
+ ("SQUARE M SQUARED" . 13217)
+ ("SQUARE KM SQUARED" . 13218)
+ ("SQUARE MM CUBED" . 13219)
+ ("SQUARE CM CUBED" . 13220)
+ ("SQUARE M CUBED" . 13221)
+ ("SQUARE KM CUBED" . 13222)
+ ("SQUARE M OVER S" . 13223)
+ ("SQUARE M OVER S SQUARED" . 13224)
+ ("SQUARE PA" . 13225)
+ ("SQUARE KPA" . 13226)
+ ("SQUARE MPA" . 13227)
+ ("SQUARE GPA" . 13228)
+ ("SQUARE RAD" . 13229)
+ ("SQUARE RAD OVER S" . 13230)
+ ("SQUARE RAD OVER S SQUARED" . 13231)
+ ("SQUARE PS" . 13232)
+ ("SQUARE NS" . 13233)
+ ("SQUARE MU S" . 13234)
+ ("SQUARE MS" . 13235)
+ ("SQUARE PV" . 13236)
+ ("SQUARE NV" . 13237)
+ ("SQUARE MU V" . 13238)
+ ("SQUARE MV" . 13239)
+ ("SQUARE KV" . 13240)
+ ("SQUARE MV MEGA" . 13241)
+ ("SQUARE PW" . 13242)
+ ("SQUARE NW" . 13243)
+ ("SQUARE MU W" . 13244)
+ ("SQUARE MW" . 13245)
+ ("SQUARE KW" . 13246)
+ ("SQUARE MW MEGA" . 13247)
+ ("SQUARE K OHM" . 13248)
+ ("SQUARE M OHM" . 13249)
+ ("SQUARE AM" . 13250)
+ ("SQUARE BQ" . 13251)
+ ("SQUARE CC" . 13252)
+ ("SQUARE CD" . 13253)
+ ("SQUARE C OVER KG" . 13254)
+ ("SQUARE CO" . 13255)
+ ("SQUARE DB" . 13256)
+ ("SQUARE GY" . 13257)
+ ("SQUARE HA" . 13258)
+ ("SQUARE HP" . 13259)
+ ("SQUARE IN" . 13260)
+ ("SQUARE KK" . 13261)
+ ("SQUARE KM CAPITAL" . 13262)
+ ("SQUARE KT" . 13263)
+ ("SQUARE LM" . 13264)
+ ("SQUARE LN" . 13265)
+ ("SQUARE LOG" . 13266)
+ ("SQUARE LX" . 13267)
+ ("SQUARE MB SMALL" . 13268)
+ ("SQUARE MIL" . 13269)
+ ("SQUARE MOL" . 13270)
+ ("SQUARE PH" . 13271)
+ ("SQUARE PM" . 13272)
+ ("SQUARE PPM" . 13273)
+ ("SQUARE PR" . 13274)
+ ("SQUARE SR" . 13275)
+ ("SQUARE SV" . 13276)
+ ("SQUARE WB" . 13277)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY ONE" . 13280)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY TWO" . 13281)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY THREE" . 13282)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY FOUR" . 13283)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY FIVE" . 13284)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY SIX" . 13285)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY SEVEN" . 13286)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY EIGHT" . 13287)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY NINE" . 13288)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY TEN" . 13289)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY ELEVEN" . 13290)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY TWELVE" . 13291)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY THIRTEEN" . 13292)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY FOURTEEN" . 13293)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY FIFTEEN" . 13294)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY SIXTEEN" . 13295)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY SEVENTEEN" . 13296)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY EIGHTEEN" . 13297)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY NINETEEN" . 13298)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY TWENTY" . 13299)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY TWENTY-ONE" . 13300)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY TWENTY-TWO" . 13301)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY TWENTY-THREE" . 13302)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY TWENTY-FOUR" . 13303)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY TWENTY-FIVE" . 13304)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY TWENTY-SIX" . 13305)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY TWENTY-SEVEN" . 13306)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY TWENTY-EIGHT" . 13307)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY TWENTY-NINE" . 13308)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY THIRTY" . 13309)
+ ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY THIRTY-ONE" . 13310)
+ ("YI SYLLABLE IT" . 40960)
+ ("YI SYLLABLE IX" . 40961)
+ ("YI SYLLABLE I" . 40962)
+ ("YI SYLLABLE IP" . 40963)
+ ("YI SYLLABLE IET" . 40964)
+ ("YI SYLLABLE IEX" . 40965)
+ ("YI SYLLABLE IE" . 40966)
+ ("YI SYLLABLE IEP" . 40967)
+ ("YI SYLLABLE AT" . 40968)
+ ("YI SYLLABLE AX" . 40969)
+ ("YI SYLLABLE A" . 40970)
+ ("YI SYLLABLE AP" . 40971)
+ ("YI SYLLABLE UOX" . 40972)
+ ("YI SYLLABLE UO" . 40973)
+ ("YI SYLLABLE UOP" . 40974)
+ ("YI SYLLABLE OT" . 40975)
+ ("YI SYLLABLE OX" . 40976)
+ ("YI SYLLABLE O" . 40977)
+ ("YI SYLLABLE OP" . 40978)
+ ("YI SYLLABLE EX" . 40979)
+ ("YI SYLLABLE E" . 40980)
+ ("YI SYLLABLE WU" . 40981)
+ ("YI SYLLABLE BIT" . 40982)
+ ("YI SYLLABLE BIX" . 40983)
+ ("YI SYLLABLE BI" . 40984)
+ ("YI SYLLABLE BIP" . 40985)
+ ("YI SYLLABLE BIET" . 40986)
+ ("YI SYLLABLE BIEX" . 40987)
+ ("YI SYLLABLE BIE" . 40988)
+ ("YI SYLLABLE BIEP" . 40989)
+ ("YI SYLLABLE BAT" . 40990)
+ ("YI SYLLABLE BAX" . 40991)
+ ("YI SYLLABLE BA" . 40992)
+ ("YI SYLLABLE BAP" . 40993)
+ ("YI SYLLABLE BUOX" . 40994)
+ ("YI SYLLABLE BUO" . 40995)
+ ("YI SYLLABLE BUOP" . 40996)
+ ("YI SYLLABLE BOT" . 40997)
+ ("YI SYLLABLE BOX" . 40998)
+ ("YI SYLLABLE BO" . 40999)
+ ("YI SYLLABLE BOP" . 41000)
+ ("YI SYLLABLE BEX" . 41001)
+ ("YI SYLLABLE BE" . 41002)
+ ("YI SYLLABLE BEP" . 41003)
+ ("YI SYLLABLE BUT" . 41004)
+ ("YI SYLLABLE BUX" . 41005)
+ ("YI SYLLABLE BU" . 41006)
+ ("YI SYLLABLE BUP" . 41007)
+ ("YI SYLLABLE BURX" . 41008)
+ ("YI SYLLABLE BUR" . 41009)
+ ("YI SYLLABLE BYT" . 41010)
+ ("YI SYLLABLE BYX" . 41011)
+ ("YI SYLLABLE BY" . 41012)
+ ("YI SYLLABLE BYP" . 41013)
+ ("YI SYLLABLE BYRX" . 41014)
+ ("YI SYLLABLE BYR" . 41015)
+ ("YI SYLLABLE PIT" . 41016)
+ ("YI SYLLABLE PIX" . 41017)
+ ("YI SYLLABLE PI" . 41018)
+ ("YI SYLLABLE PIP" . 41019)
+ ("YI SYLLABLE PIEX" . 41020)
+ ("YI SYLLABLE PIE" . 41021)
+ ("YI SYLLABLE PIEP" . 41022)
+ ("YI SYLLABLE PAT" . 41023)
+ ("YI SYLLABLE PAX" . 41024)
+ ("YI SYLLABLE PA" . 41025)
+ ("YI SYLLABLE PAP" . 41026)
+ ("YI SYLLABLE PUOX" . 41027)
+ ("YI SYLLABLE PUO" . 41028)
+ ("YI SYLLABLE PUOP" . 41029)
+ ("YI SYLLABLE POT" . 41030)
+ ("YI SYLLABLE POX" . 41031)
+ ("YI SYLLABLE PO" . 41032)
+ ("YI SYLLABLE POP" . 41033)
+ ("YI SYLLABLE PUT" . 41034)
+ ("YI SYLLABLE PUX" . 41035)
+ ("YI SYLLABLE PU" . 41036)
+ ("YI SYLLABLE PUP" . 41037)
+ ("YI SYLLABLE PURX" . 41038)
+ ("YI SYLLABLE PUR" . 41039)
+ ("YI SYLLABLE PYT" . 41040)
+ ("YI SYLLABLE PYX" . 41041)
+ ("YI SYLLABLE PY" . 41042)
+ ("YI SYLLABLE PYP" . 41043)
+ ("YI SYLLABLE PYRX" . 41044)
+ ("YI SYLLABLE PYR" . 41045)
+ ("YI SYLLABLE BBIT" . 41046)
+ ("YI SYLLABLE BBIX" . 41047)
+ ("YI SYLLABLE BBI" . 41048)
+ ("YI SYLLABLE BBIP" . 41049)
+ ("YI SYLLABLE BBIET" . 41050)
+ ("YI SYLLABLE BBIEX" . 41051)
+ ("YI SYLLABLE BBIE" . 41052)
+ ("YI SYLLABLE BBIEP" . 41053)
+ ("YI SYLLABLE BBAT" . 41054)
+ ("YI SYLLABLE BBAX" . 41055)
+ ("YI SYLLABLE BBA" . 41056)
+ ("YI SYLLABLE BBAP" . 41057)
+ ("YI SYLLABLE BBUOX" . 41058)
+ ("YI SYLLABLE BBUO" . 41059)
+ ("YI SYLLABLE BBUOP" . 41060)
+ ("YI SYLLABLE BBOT" . 41061)
+ ("YI SYLLABLE BBOX" . 41062)
+ ("YI SYLLABLE BBO" . 41063)
+ ("YI SYLLABLE BBOP" . 41064)
+ ("YI SYLLABLE BBEX" . 41065)
+ ("YI SYLLABLE BBE" . 41066)
+ ("YI SYLLABLE BBEP" . 41067)
+ ("YI SYLLABLE BBUT" . 41068)
+ ("YI SYLLABLE BBUX" . 41069)
+ ("YI SYLLABLE BBU" . 41070)
+ ("YI SYLLABLE BBUP" . 41071)
+ ("YI SYLLABLE BBURX" . 41072)
+ ("YI SYLLABLE BBUR" . 41073)
+ ("YI SYLLABLE BBYT" . 41074)
+ ("YI SYLLABLE BBYX" . 41075)
+ ("YI SYLLABLE BBY" . 41076)
+ ("YI SYLLABLE BBYP" . 41077)
+ ("YI SYLLABLE NBIT" . 41078)
+ ("YI SYLLABLE NBIX" . 41079)
+ ("YI SYLLABLE NBI" . 41080)
+ ("YI SYLLABLE NBIP" . 41081)
+ ("YI SYLLABLE NBIEX" . 41082)
+ ("YI SYLLABLE NBIE" . 41083)
+ ("YI SYLLABLE NBIEP" . 41084)
+ ("YI SYLLABLE NBAT" . 41085)
+ ("YI SYLLABLE NBAX" . 41086)
+ ("YI SYLLABLE NBA" . 41087)
+ ("YI SYLLABLE NBAP" . 41088)
+ ("YI SYLLABLE NBOT" . 41089)
+ ("YI SYLLABLE NBOX" . 41090)
+ ("YI SYLLABLE NBO" . 41091)
+ ("YI SYLLABLE NBOP" . 41092)
+ ("YI SYLLABLE NBUT" . 41093)
+ ("YI SYLLABLE NBUX" . 41094)
+ ("YI SYLLABLE NBU" . 41095)
+ ("YI SYLLABLE NBUP" . 41096)
+ ("YI SYLLABLE NBURX" . 41097)
+ ("YI SYLLABLE NBUR" . 41098)
+ ("YI SYLLABLE NBYT" . 41099)
+ ("YI SYLLABLE NBYX" . 41100)
+ ("YI SYLLABLE NBY" . 41101)
+ ("YI SYLLABLE NBYP" . 41102)
+ ("YI SYLLABLE NBYRX" . 41103)
+ ("YI SYLLABLE NBYR" . 41104)
+ ("YI SYLLABLE HMIT" . 41105)
+ ("YI SYLLABLE HMIX" . 41106)
+ ("YI SYLLABLE HMI" . 41107)
+ ("YI SYLLABLE HMIP" . 41108)
+ ("YI SYLLABLE HMIEX" . 41109)
+ ("YI SYLLABLE HMIE" . 41110)
+ ("YI SYLLABLE HMIEP" . 41111)
+ ("YI SYLLABLE HMAT" . 41112)
+ ("YI SYLLABLE HMAX" . 41113)
+ ("YI SYLLABLE HMA" . 41114)
+ ("YI SYLLABLE HMAP" . 41115)
+ ("YI SYLLABLE HMUOX" . 41116)
+ ("YI SYLLABLE HMUO" . 41117)
+ ("YI SYLLABLE HMUOP" . 41118)
+ ("YI SYLLABLE HMOT" . 41119)
+ ("YI SYLLABLE HMOX" . 41120)
+ ("YI SYLLABLE HMO" . 41121)
+ ("YI SYLLABLE HMOP" . 41122)
+ ("YI SYLLABLE HMUT" . 41123)
+ ("YI SYLLABLE HMUX" . 41124)
+ ("YI SYLLABLE HMU" . 41125)
+ ("YI SYLLABLE HMUP" . 41126)
+ ("YI SYLLABLE HMURX" . 41127)
+ ("YI SYLLABLE HMUR" . 41128)
+ ("YI SYLLABLE HMYX" . 41129)
+ ("YI SYLLABLE HMY" . 41130)
+ ("YI SYLLABLE HMYP" . 41131)
+ ("YI SYLLABLE HMYRX" . 41132)
+ ("YI SYLLABLE HMYR" . 41133)
+ ("YI SYLLABLE MIT" . 41134)
+ ("YI SYLLABLE MIX" . 41135)
+ ("YI SYLLABLE MI" . 41136)
+ ("YI SYLLABLE MIP" . 41137)
+ ("YI SYLLABLE MIEX" . 41138)
+ ("YI SYLLABLE MIE" . 41139)
+ ("YI SYLLABLE MIEP" . 41140)
+ ("YI SYLLABLE MAT" . 41141)
+ ("YI SYLLABLE MAX" . 41142)
+ ("YI SYLLABLE MA" . 41143)
+ ("YI SYLLABLE MAP" . 41144)
+ ("YI SYLLABLE MUOT" . 41145)
+ ("YI SYLLABLE MUOX" . 41146)
+ ("YI SYLLABLE MUO" . 41147)
+ ("YI SYLLABLE MUOP" . 41148)
+ ("YI SYLLABLE MOT" . 41149)
+ ("YI SYLLABLE MOX" . 41150)
+ ("YI SYLLABLE MO" . 41151)
+ ("YI SYLLABLE MOP" . 41152)
+ ("YI SYLLABLE MEX" . 41153)
+ ("YI SYLLABLE ME" . 41154)
+ ("YI SYLLABLE MUT" . 41155)
+ ("YI SYLLABLE MUX" . 41156)
+ ("YI SYLLABLE MU" . 41157)
+ ("YI SYLLABLE MUP" . 41158)
+ ("YI SYLLABLE MURX" . 41159)
+ ("YI SYLLABLE MUR" . 41160)
+ ("YI SYLLABLE MYT" . 41161)
+ ("YI SYLLABLE MYX" . 41162)
+ ("YI SYLLABLE MY" . 41163)
+ ("YI SYLLABLE MYP" . 41164)
+ ("YI SYLLABLE FIT" . 41165)
+ ("YI SYLLABLE FIX" . 41166)
+ ("YI SYLLABLE FI" . 41167)
+ ("YI SYLLABLE FIP" . 41168)
+ ("YI SYLLABLE FAT" . 41169)
+ ("YI SYLLABLE FAX" . 41170)
+ ("YI SYLLABLE FA" . 41171)
+ ("YI SYLLABLE FAP" . 41172)
+ ("YI SYLLABLE FOX" . 41173)
+ ("YI SYLLABLE FO" . 41174)
+ ("YI SYLLABLE FOP" . 41175)
+ ("YI SYLLABLE FUT" . 41176)
+ ("YI SYLLABLE FUX" . 41177)
+ ("YI SYLLABLE FU" . 41178)
+ ("YI SYLLABLE FUP" . 41179)
+ ("YI SYLLABLE FURX" . 41180)
+ ("YI SYLLABLE FUR" . 41181)
+ ("YI SYLLABLE FYT" . 41182)
+ ("YI SYLLABLE FYX" . 41183)
+ ("YI SYLLABLE FY" . 41184)
+ ("YI SYLLABLE FYP" . 41185)
+ ("YI SYLLABLE VIT" . 41186)
+ ("YI SYLLABLE VIX" . 41187)
+ ("YI SYLLABLE VI" . 41188)
+ ("YI SYLLABLE VIP" . 41189)
+ ("YI SYLLABLE VIET" . 41190)
+ ("YI SYLLABLE VIEX" . 41191)
+ ("YI SYLLABLE VIE" . 41192)
+ ("YI SYLLABLE VIEP" . 41193)
+ ("YI SYLLABLE VAT" . 41194)
+ ("YI SYLLABLE VAX" . 41195)
+ ("YI SYLLABLE VA" . 41196)
+ ("YI SYLLABLE VAP" . 41197)
+ ("YI SYLLABLE VOT" . 41198)
+ ("YI SYLLABLE VOX" . 41199)
+ ("YI SYLLABLE VO" . 41200)
+ ("YI SYLLABLE VOP" . 41201)
+ ("YI SYLLABLE VEX" . 41202)
+ ("YI SYLLABLE VEP" . 41203)
+ ("YI SYLLABLE VUT" . 41204)
+ ("YI SYLLABLE VUX" . 41205)
+ ("YI SYLLABLE VU" . 41206)
+ ("YI SYLLABLE VUP" . 41207)
+ ("YI SYLLABLE VURX" . 41208)
+ ("YI SYLLABLE VUR" . 41209)
+ ("YI SYLLABLE VYT" . 41210)
+ ("YI SYLLABLE VYX" . 41211)
+ ("YI SYLLABLE VY" . 41212)
+ ("YI SYLLABLE VYP" . 41213)
+ ("YI SYLLABLE VYRX" . 41214)
+ ("YI SYLLABLE VYR" . 41215)
+ ("YI SYLLABLE DIT" . 41216)
+ ("YI SYLLABLE DIX" . 41217)
+ ("YI SYLLABLE DI" . 41218)
+ ("YI SYLLABLE DIP" . 41219)
+ ("YI SYLLABLE DIEX" . 41220)
+ ("YI SYLLABLE DIE" . 41221)
+ ("YI SYLLABLE DIEP" . 41222)
+ ("YI SYLLABLE DAT" . 41223)
+ ("YI SYLLABLE DAX" . 41224)
+ ("YI SYLLABLE DA" . 41225)
+ ("YI SYLLABLE DAP" . 41226)
+ ("YI SYLLABLE DUOX" . 41227)
+ ("YI SYLLABLE DUO" . 41228)
+ ("YI SYLLABLE DOT" . 41229)
+ ("YI SYLLABLE DOX" . 41230)
+ ("YI SYLLABLE DO" . 41231)
+ ("YI SYLLABLE DOP" . 41232)
+ ("YI SYLLABLE DEX" . 41233)
+ ("YI SYLLABLE DE" . 41234)
+ ("YI SYLLABLE DEP" . 41235)
+ ("YI SYLLABLE DUT" . 41236)
+ ("YI SYLLABLE DUX" . 41237)
+ ("YI SYLLABLE DU" . 41238)
+ ("YI SYLLABLE DUP" . 41239)
+ ("YI SYLLABLE DURX" . 41240)
+ ("YI SYLLABLE DUR" . 41241)
+ ("YI SYLLABLE TIT" . 41242)
+ ("YI SYLLABLE TIX" . 41243)
+ ("YI SYLLABLE TI" . 41244)
+ ("YI SYLLABLE TIP" . 41245)
+ ("YI SYLLABLE TIEX" . 41246)
+ ("YI SYLLABLE TIE" . 41247)
+ ("YI SYLLABLE TIEP" . 41248)
+ ("YI SYLLABLE TAT" . 41249)
+ ("YI SYLLABLE TAX" . 41250)
+ ("YI SYLLABLE TA" . 41251)
+ ("YI SYLLABLE TAP" . 41252)
+ ("YI SYLLABLE TUOT" . 41253)
+ ("YI SYLLABLE TUOX" . 41254)
+ ("YI SYLLABLE TUO" . 41255)
+ ("YI SYLLABLE TUOP" . 41256)
+ ("YI SYLLABLE TOT" . 41257)
+ ("YI SYLLABLE TOX" . 41258)
+ ("YI SYLLABLE TO" . 41259)
+ ("YI SYLLABLE TOP" . 41260)
+ ("YI SYLLABLE TEX" . 41261)
+ ("YI SYLLABLE TE" . 41262)
+ ("YI SYLLABLE TEP" . 41263)
+ ("YI SYLLABLE TUT" . 41264)
+ ("YI SYLLABLE TUX" . 41265)
+ ("YI SYLLABLE TU" . 41266)
+ ("YI SYLLABLE TUP" . 41267)
+ ("YI SYLLABLE TURX" . 41268)
+ ("YI SYLLABLE TUR" . 41269)
+ ("YI SYLLABLE DDIT" . 41270)
+ ("YI SYLLABLE DDIX" . 41271)
+ ("YI SYLLABLE DDI" . 41272)
+ ("YI SYLLABLE DDIP" . 41273)
+ ("YI SYLLABLE DDIEX" . 41274)
+ ("YI SYLLABLE DDIE" . 41275)
+ ("YI SYLLABLE DDIEP" . 41276)
+ ("YI SYLLABLE DDAT" . 41277)
+ ("YI SYLLABLE DDAX" . 41278)
+ ("YI SYLLABLE DDA" . 41279)
+ ("YI SYLLABLE DDAP" . 41280)
+ ("YI SYLLABLE DDUOX" . 41281)
+ ("YI SYLLABLE DDUO" . 41282)
+ ("YI SYLLABLE DDUOP" . 41283)
+ ("YI SYLLABLE DDOT" . 41284)
+ ("YI SYLLABLE DDOX" . 41285)
+ ("YI SYLLABLE DDO" . 41286)
+ ("YI SYLLABLE DDOP" . 41287)
+ ("YI SYLLABLE DDEX" . 41288)
+ ("YI SYLLABLE DDE" . 41289)
+ ("YI SYLLABLE DDEP" . 41290)
+ ("YI SYLLABLE DDUT" . 41291)
+ ("YI SYLLABLE DDUX" . 41292)
+ ("YI SYLLABLE DDU" . 41293)
+ ("YI SYLLABLE DDUP" . 41294)
+ ("YI SYLLABLE DDURX" . 41295)
+ ("YI SYLLABLE DDUR" . 41296)
+ ("YI SYLLABLE NDIT" . 41297)
+ ("YI SYLLABLE NDIX" . 41298)
+ ("YI SYLLABLE NDI" . 41299)
+ ("YI SYLLABLE NDIP" . 41300)
+ ("YI SYLLABLE NDIEX" . 41301)
+ ("YI SYLLABLE NDIE" . 41302)
+ ("YI SYLLABLE NDAT" . 41303)
+ ("YI SYLLABLE NDAX" . 41304)
+ ("YI SYLLABLE NDA" . 41305)
+ ("YI SYLLABLE NDAP" . 41306)
+ ("YI SYLLABLE NDOT" . 41307)
+ ("YI SYLLABLE NDOX" . 41308)
+ ("YI SYLLABLE NDO" . 41309)
+ ("YI SYLLABLE NDOP" . 41310)
+ ("YI SYLLABLE NDEX" . 41311)
+ ("YI SYLLABLE NDE" . 41312)
+ ("YI SYLLABLE NDEP" . 41313)
+ ("YI SYLLABLE NDUT" . 41314)
+ ("YI SYLLABLE NDUX" . 41315)
+ ("YI SYLLABLE NDU" . 41316)
+ ("YI SYLLABLE NDUP" . 41317)
+ ("YI SYLLABLE NDURX" . 41318)
+ ("YI SYLLABLE NDUR" . 41319)
+ ("YI SYLLABLE HNIT" . 41320)
+ ("YI SYLLABLE HNIX" . 41321)
+ ("YI SYLLABLE HNI" . 41322)
+ ("YI SYLLABLE HNIP" . 41323)
+ ("YI SYLLABLE HNIET" . 41324)
+ ("YI SYLLABLE HNIEX" . 41325)
+ ("YI SYLLABLE HNIE" . 41326)
+ ("YI SYLLABLE HNIEP" . 41327)
+ ("YI SYLLABLE HNAT" . 41328)
+ ("YI SYLLABLE HNAX" . 41329)
+ ("YI SYLLABLE HNA" . 41330)
+ ("YI SYLLABLE HNAP" . 41331)
+ ("YI SYLLABLE HNUOX" . 41332)
+ ("YI SYLLABLE HNUO" . 41333)
+ ("YI SYLLABLE HNOT" . 41334)
+ ("YI SYLLABLE HNOX" . 41335)
+ ("YI SYLLABLE HNOP" . 41336)
+ ("YI SYLLABLE HNEX" . 41337)
+ ("YI SYLLABLE HNE" . 41338)
+ ("YI SYLLABLE HNEP" . 41339)
+ ("YI SYLLABLE HNUT" . 41340)
+ ("YI SYLLABLE NIT" . 41341)
+ ("YI SYLLABLE NIX" . 41342)
+ ("YI SYLLABLE NI" . 41343)
+ ("YI SYLLABLE NIP" . 41344)
+ ("YI SYLLABLE NIEX" . 41345)
+ ("YI SYLLABLE NIE" . 41346)
+ ("YI SYLLABLE NIEP" . 41347)
+ ("YI SYLLABLE NAX" . 41348)
+ ("YI SYLLABLE NA" . 41349)
+ ("YI SYLLABLE NAP" . 41350)
+ ("YI SYLLABLE NUOX" . 41351)
+ ("YI SYLLABLE NUO" . 41352)
+ ("YI SYLLABLE NUOP" . 41353)
+ ("YI SYLLABLE NOT" . 41354)
+ ("YI SYLLABLE NOX" . 41355)
+ ("YI SYLLABLE NO" . 41356)
+ ("YI SYLLABLE NOP" . 41357)
+ ("YI SYLLABLE NEX" . 41358)
+ ("YI SYLLABLE NE" . 41359)
+ ("YI SYLLABLE NEP" . 41360)
+ ("YI SYLLABLE NUT" . 41361)
+ ("YI SYLLABLE NUX" . 41362)
+ ("YI SYLLABLE NU" . 41363)
+ ("YI SYLLABLE NUP" . 41364)
+ ("YI SYLLABLE NURX" . 41365)
+ ("YI SYLLABLE NUR" . 41366)
+ ("YI SYLLABLE HLIT" . 41367)
+ ("YI SYLLABLE HLIX" . 41368)
+ ("YI SYLLABLE HLI" . 41369)
+ ("YI SYLLABLE HLIP" . 41370)
+ ("YI SYLLABLE HLIEX" . 41371)
+ ("YI SYLLABLE HLIE" . 41372)
+ ("YI SYLLABLE HLIEP" . 41373)
+ ("YI SYLLABLE HLAT" . 41374)
+ ("YI SYLLABLE HLAX" . 41375)
+ ("YI SYLLABLE HLA" . 41376)
+ ("YI SYLLABLE HLAP" . 41377)
+ ("YI SYLLABLE HLUOX" . 41378)
+ ("YI SYLLABLE HLUO" . 41379)
+ ("YI SYLLABLE HLUOP" . 41380)
+ ("YI SYLLABLE HLOX" . 41381)
+ ("YI SYLLABLE HLO" . 41382)
+ ("YI SYLLABLE HLOP" . 41383)
+ ("YI SYLLABLE HLEX" . 41384)
+ ("YI SYLLABLE HLE" . 41385)
+ ("YI SYLLABLE HLEP" . 41386)
+ ("YI SYLLABLE HLUT" . 41387)
+ ("YI SYLLABLE HLUX" . 41388)
+ ("YI SYLLABLE HLU" . 41389)
+ ("YI SYLLABLE HLUP" . 41390)
+ ("YI SYLLABLE HLURX" . 41391)
+ ("YI SYLLABLE HLUR" . 41392)
+ ("YI SYLLABLE HLYT" . 41393)
+ ("YI SYLLABLE HLYX" . 41394)
+ ("YI SYLLABLE HLY" . 41395)
+ ("YI SYLLABLE HLYP" . 41396)
+ ("YI SYLLABLE HLYRX" . 41397)
+ ("YI SYLLABLE HLYR" . 41398)
+ ("YI SYLLABLE LIT" . 41399)
+ ("YI SYLLABLE LIX" . 41400)
+ ("YI SYLLABLE LI" . 41401)
+ ("YI SYLLABLE LIP" . 41402)
+ ("YI SYLLABLE LIET" . 41403)
+ ("YI SYLLABLE LIEX" . 41404)
+ ("YI SYLLABLE LIE" . 41405)
+ ("YI SYLLABLE LIEP" . 41406)
+ ("YI SYLLABLE LAT" . 41407)
+ ("YI SYLLABLE LAX" . 41408)
+ ("YI SYLLABLE LA" . 41409)
+ ("YI SYLLABLE LAP" . 41410)
+ ("YI SYLLABLE LUOT" . 41411)
+ ("YI SYLLABLE LUOX" . 41412)
+ ("YI SYLLABLE LUO" . 41413)
+ ("YI SYLLABLE LUOP" . 41414)
+ ("YI SYLLABLE LOT" . 41415)
+ ("YI SYLLABLE LOX" . 41416)
+ ("YI SYLLABLE LO" . 41417)
+ ("YI SYLLABLE LOP" . 41418)
+ ("YI SYLLABLE LEX" . 41419)
+ ("YI SYLLABLE LE" . 41420)
+ ("YI SYLLABLE LEP" . 41421)
+ ("YI SYLLABLE LUT" . 41422)
+ ("YI SYLLABLE LUX" . 41423)
+ ("YI SYLLABLE LU" . 41424)
+ ("YI SYLLABLE LUP" . 41425)
+ ("YI SYLLABLE LURX" . 41426)
+ ("YI SYLLABLE LUR" . 41427)
+ ("YI SYLLABLE LYT" . 41428)
+ ("YI SYLLABLE LYX" . 41429)
+ ("YI SYLLABLE LY" . 41430)
+ ("YI SYLLABLE LYP" . 41431)
+ ("YI SYLLABLE LYRX" . 41432)
+ ("YI SYLLABLE LYR" . 41433)
+ ("YI SYLLABLE GIT" . 41434)
+ ("YI SYLLABLE GIX" . 41435)
+ ("YI SYLLABLE GI" . 41436)
+ ("YI SYLLABLE GIP" . 41437)
+ ("YI SYLLABLE GIET" . 41438)
+ ("YI SYLLABLE GIEX" . 41439)
+ ("YI SYLLABLE GIE" . 41440)
+ ("YI SYLLABLE GIEP" . 41441)
+ ("YI SYLLABLE GAT" . 41442)
+ ("YI SYLLABLE GAX" . 41443)
+ ("YI SYLLABLE GA" . 41444)
+ ("YI SYLLABLE GAP" . 41445)
+ ("YI SYLLABLE GUOT" . 41446)
+ ("YI SYLLABLE GUOX" . 41447)
+ ("YI SYLLABLE GUO" . 41448)
+ ("YI SYLLABLE GUOP" . 41449)
+ ("YI SYLLABLE GOT" . 41450)
+ ("YI SYLLABLE GOX" . 41451)
+ ("YI SYLLABLE GO" . 41452)
+ ("YI SYLLABLE GOP" . 41453)
+ ("YI SYLLABLE GET" . 41454)
+ ("YI SYLLABLE GEX" . 41455)
+ ("YI SYLLABLE GE" . 41456)
+ ("YI SYLLABLE GEP" . 41457)
+ ("YI SYLLABLE GUT" . 41458)
+ ("YI SYLLABLE GUX" . 41459)
+ ("YI SYLLABLE GU" . 41460)
+ ("YI SYLLABLE GUP" . 41461)
+ ("YI SYLLABLE GURX" . 41462)
+ ("YI SYLLABLE GUR" . 41463)
+ ("YI SYLLABLE KIT" . 41464)
+ ("YI SYLLABLE KIX" . 41465)
+ ("YI SYLLABLE KI" . 41466)
+ ("YI SYLLABLE KIP" . 41467)
+ ("YI SYLLABLE KIEX" . 41468)
+ ("YI SYLLABLE KIE" . 41469)
+ ("YI SYLLABLE KIEP" . 41470)
+ ("YI SYLLABLE KAT" . 41471)
+ ("YI SYLLABLE KAX" . 41472)
+ ("YI SYLLABLE KA" . 41473)
+ ("YI SYLLABLE KAP" . 41474)
+ ("YI SYLLABLE KUOX" . 41475)
+ ("YI SYLLABLE KUO" . 41476)
+ ("YI SYLLABLE KUOP" . 41477)
+ ("YI SYLLABLE KOT" . 41478)
+ ("YI SYLLABLE KOX" . 41479)
+ ("YI SYLLABLE KO" . 41480)
+ ("YI SYLLABLE KOP" . 41481)
+ ("YI SYLLABLE KET" . 41482)
+ ("YI SYLLABLE KEX" . 41483)
+ ("YI SYLLABLE KE" . 41484)
+ ("YI SYLLABLE KEP" . 41485)
+ ("YI SYLLABLE KUT" . 41486)
+ ("YI SYLLABLE KUX" . 41487)
+ ("YI SYLLABLE KU" . 41488)
+ ("YI SYLLABLE KUP" . 41489)
+ ("YI SYLLABLE KURX" . 41490)
+ ("YI SYLLABLE KUR" . 41491)
+ ("YI SYLLABLE GGIT" . 41492)
+ ("YI SYLLABLE GGIX" . 41493)
+ ("YI SYLLABLE GGI" . 41494)
+ ("YI SYLLABLE GGIEX" . 41495)
+ ("YI SYLLABLE GGIE" . 41496)
+ ("YI SYLLABLE GGIEP" . 41497)
+ ("YI SYLLABLE GGAT" . 41498)
+ ("YI SYLLABLE GGAX" . 41499)
+ ("YI SYLLABLE GGA" . 41500)
+ ("YI SYLLABLE GGAP" . 41501)
+ ("YI SYLLABLE GGUOT" . 41502)
+ ("YI SYLLABLE GGUOX" . 41503)
+ ("YI SYLLABLE GGUO" . 41504)
+ ("YI SYLLABLE GGUOP" . 41505)
+ ("YI SYLLABLE GGOT" . 41506)
+ ("YI SYLLABLE GGOX" . 41507)
+ ("YI SYLLABLE GGO" . 41508)
+ ("YI SYLLABLE GGOP" . 41509)
+ ("YI SYLLABLE GGET" . 41510)
+ ("YI SYLLABLE GGEX" . 41511)
+ ("YI SYLLABLE GGE" . 41512)
+ ("YI SYLLABLE GGEP" . 41513)
+ ("YI SYLLABLE GGUT" . 41514)
+ ("YI SYLLABLE GGUX" . 41515)
+ ("YI SYLLABLE GGU" . 41516)
+ ("YI SYLLABLE GGUP" . 41517)
+ ("YI SYLLABLE GGURX" . 41518)
+ ("YI SYLLABLE GGUR" . 41519)
+ ("YI SYLLABLE MGIEX" . 41520)
+ ("YI SYLLABLE MGIE" . 41521)
+ ("YI SYLLABLE MGAT" . 41522)
+ ("YI SYLLABLE MGAX" . 41523)
+ ("YI SYLLABLE MGA" . 41524)
+ ("YI SYLLABLE MGAP" . 41525)
+ ("YI SYLLABLE MGUOX" . 41526)
+ ("YI SYLLABLE MGUO" . 41527)
+ ("YI SYLLABLE MGUOP" . 41528)
+ ("YI SYLLABLE MGOT" . 41529)
+ ("YI SYLLABLE MGOX" . 41530)
+ ("YI SYLLABLE MGO" . 41531)
+ ("YI SYLLABLE MGOP" . 41532)
+ ("YI SYLLABLE MGEX" . 41533)
+ ("YI SYLLABLE MGE" . 41534)
+ ("YI SYLLABLE MGEP" . 41535)
+ ("YI SYLLABLE MGUT" . 41536)
+ ("YI SYLLABLE MGUX" . 41537)
+ ("YI SYLLABLE MGU" . 41538)
+ ("YI SYLLABLE MGUP" . 41539)
+ ("YI SYLLABLE MGURX" . 41540)
+ ("YI SYLLABLE MGUR" . 41541)
+ ("YI SYLLABLE HXIT" . 41542)
+ ("YI SYLLABLE HXIX" . 41543)
+ ("YI SYLLABLE HXI" . 41544)
+ ("YI SYLLABLE HXIP" . 41545)
+ ("YI SYLLABLE HXIET" . 41546)
+ ("YI SYLLABLE HXIEX" . 41547)
+ ("YI SYLLABLE HXIE" . 41548)
+ ("YI SYLLABLE HXIEP" . 41549)
+ ("YI SYLLABLE HXAT" . 41550)
+ ("YI SYLLABLE HXAX" . 41551)
+ ("YI SYLLABLE HXA" . 41552)
+ ("YI SYLLABLE HXAP" . 41553)
+ ("YI SYLLABLE HXUOT" . 41554)
+ ("YI SYLLABLE HXUOX" . 41555)
+ ("YI SYLLABLE HXUO" . 41556)
+ ("YI SYLLABLE HXUOP" . 41557)
+ ("YI SYLLABLE HXOT" . 41558)
+ ("YI SYLLABLE HXOX" . 41559)
+ ("YI SYLLABLE HXO" . 41560)
+ ("YI SYLLABLE HXOP" . 41561)
+ ("YI SYLLABLE HXEX" . 41562)
+ ("YI SYLLABLE HXE" . 41563)
+ ("YI SYLLABLE HXEP" . 41564)
+ ("YI SYLLABLE NGIEX" . 41565)
+ ("YI SYLLABLE NGIE" . 41566)
+ ("YI SYLLABLE NGIEP" . 41567)
+ ("YI SYLLABLE NGAT" . 41568)
+ ("YI SYLLABLE NGAX" . 41569)
+ ("YI SYLLABLE NGA" . 41570)
+ ("YI SYLLABLE NGAP" . 41571)
+ ("YI SYLLABLE NGUOT" . 41572)
+ ("YI SYLLABLE NGUOX" . 41573)
+ ("YI SYLLABLE NGUO" . 41574)
+ ("YI SYLLABLE NGOT" . 41575)
+ ("YI SYLLABLE NGOX" . 41576)
+ ("YI SYLLABLE NGO" . 41577)
+ ("YI SYLLABLE NGOP" . 41578)
+ ("YI SYLLABLE NGEX" . 41579)
+ ("YI SYLLABLE NGE" . 41580)
+ ("YI SYLLABLE NGEP" . 41581)
+ ("YI SYLLABLE HIT" . 41582)
+ ("YI SYLLABLE HIEX" . 41583)
+ ("YI SYLLABLE HIE" . 41584)
+ ("YI SYLLABLE HAT" . 41585)
+ ("YI SYLLABLE HAX" . 41586)
+ ("YI SYLLABLE HA" . 41587)
+ ("YI SYLLABLE HAP" . 41588)
+ ("YI SYLLABLE HUOT" . 41589)
+ ("YI SYLLABLE HUOX" . 41590)
+ ("YI SYLLABLE HUO" . 41591)
+ ("YI SYLLABLE HUOP" . 41592)
+ ("YI SYLLABLE HOT" . 41593)
+ ("YI SYLLABLE HOX" . 41594)
+ ("YI SYLLABLE HO" . 41595)
+ ("YI SYLLABLE HOP" . 41596)
+ ("YI SYLLABLE HEX" . 41597)
+ ("YI SYLLABLE HE" . 41598)
+ ("YI SYLLABLE HEP" . 41599)
+ ("YI SYLLABLE WAT" . 41600)
+ ("YI SYLLABLE WAX" . 41601)
+ ("YI SYLLABLE WA" . 41602)
+ ("YI SYLLABLE WAP" . 41603)
+ ("YI SYLLABLE WUOX" . 41604)
+ ("YI SYLLABLE WUO" . 41605)
+ ("YI SYLLABLE WUOP" . 41606)
+ ("YI SYLLABLE WOX" . 41607)
+ ("YI SYLLABLE WO" . 41608)
+ ("YI SYLLABLE WOP" . 41609)
+ ("YI SYLLABLE WEX" . 41610)
+ ("YI SYLLABLE WE" . 41611)
+ ("YI SYLLABLE WEP" . 41612)
+ ("YI SYLLABLE ZIT" . 41613)
+ ("YI SYLLABLE ZIX" . 41614)
+ ("YI SYLLABLE ZI" . 41615)
+ ("YI SYLLABLE ZIP" . 41616)
+ ("YI SYLLABLE ZIEX" . 41617)
+ ("YI SYLLABLE ZIE" . 41618)
+ ("YI SYLLABLE ZIEP" . 41619)
+ ("YI SYLLABLE ZAT" . 41620)
+ ("YI SYLLABLE ZAX" . 41621)
+ ("YI SYLLABLE ZA" . 41622)
+ ("YI SYLLABLE ZAP" . 41623)
+ ("YI SYLLABLE ZUOX" . 41624)
+ ("YI SYLLABLE ZUO" . 41625)
+ ("YI SYLLABLE ZUOP" . 41626)
+ ("YI SYLLABLE ZOT" . 41627)
+ ("YI SYLLABLE ZOX" . 41628)
+ ("YI SYLLABLE ZO" . 41629)
+ ("YI SYLLABLE ZOP" . 41630)
+ ("YI SYLLABLE ZEX" . 41631)
+ ("YI SYLLABLE ZE" . 41632)
+ ("YI SYLLABLE ZEP" . 41633)
+ ("YI SYLLABLE ZUT" . 41634)
+ ("YI SYLLABLE ZUX" . 41635)
+ ("YI SYLLABLE ZU" . 41636)
+ ("YI SYLLABLE ZUP" . 41637)
+ ("YI SYLLABLE ZURX" . 41638)
+ ("YI SYLLABLE ZUR" . 41639)
+ ("YI SYLLABLE ZYT" . 41640)
+ ("YI SYLLABLE ZYX" . 41641)
+ ("YI SYLLABLE ZY" . 41642)
+ ("YI SYLLABLE ZYP" . 41643)
+ ("YI SYLLABLE ZYRX" . 41644)
+ ("YI SYLLABLE ZYR" . 41645)
+ ("YI SYLLABLE CIT" . 41646)
+ ("YI SYLLABLE CIX" . 41647)
+ ("YI SYLLABLE CI" . 41648)
+ ("YI SYLLABLE CIP" . 41649)
+ ("YI SYLLABLE CIET" . 41650)
+ ("YI SYLLABLE CIEX" . 41651)
+ ("YI SYLLABLE CIE" . 41652)
+ ("YI SYLLABLE CIEP" . 41653)
+ ("YI SYLLABLE CAT" . 41654)
+ ("YI SYLLABLE CAX" . 41655)
+ ("YI SYLLABLE CA" . 41656)
+ ("YI SYLLABLE CAP" . 41657)
+ ("YI SYLLABLE CUOX" . 41658)
+ ("YI SYLLABLE CUO" . 41659)
+ ("YI SYLLABLE CUOP" . 41660)
+ ("YI SYLLABLE COT" . 41661)
+ ("YI SYLLABLE COX" . 41662)
+ ("YI SYLLABLE CO" . 41663)
+ ("YI SYLLABLE COP" . 41664)
+ ("YI SYLLABLE CEX" . 41665)
+ ("YI SYLLABLE CE" . 41666)
+ ("YI SYLLABLE CEP" . 41667)
+ ("YI SYLLABLE CUT" . 41668)
+ ("YI SYLLABLE CUX" . 41669)
+ ("YI SYLLABLE CU" . 41670)
+ ("YI SYLLABLE CUP" . 41671)
+ ("YI SYLLABLE CURX" . 41672)
+ ("YI SYLLABLE CUR" . 41673)
+ ("YI SYLLABLE CYT" . 41674)
+ ("YI SYLLABLE CYX" . 41675)
+ ("YI SYLLABLE CY" . 41676)
+ ("YI SYLLABLE CYP" . 41677)
+ ("YI SYLLABLE CYRX" . 41678)
+ ("YI SYLLABLE CYR" . 41679)
+ ("YI SYLLABLE ZZIT" . 41680)
+ ("YI SYLLABLE ZZIX" . 41681)
+ ("YI SYLLABLE ZZI" . 41682)
+ ("YI SYLLABLE ZZIP" . 41683)
+ ("YI SYLLABLE ZZIET" . 41684)
+ ("YI SYLLABLE ZZIEX" . 41685)
+ ("YI SYLLABLE ZZIE" . 41686)
+ ("YI SYLLABLE ZZIEP" . 41687)
+ ("YI SYLLABLE ZZAT" . 41688)
+ ("YI SYLLABLE ZZAX" . 41689)
+ ("YI SYLLABLE ZZA" . 41690)
+ ("YI SYLLABLE ZZAP" . 41691)
+ ("YI SYLLABLE ZZOX" . 41692)
+ ("YI SYLLABLE ZZO" . 41693)
+ ("YI SYLLABLE ZZOP" . 41694)
+ ("YI SYLLABLE ZZEX" . 41695)
+ ("YI SYLLABLE ZZE" . 41696)
+ ("YI SYLLABLE ZZEP" . 41697)
+ ("YI SYLLABLE ZZUX" . 41698)
+ ("YI SYLLABLE ZZU" . 41699)
+ ("YI SYLLABLE ZZUP" . 41700)
+ ("YI SYLLABLE ZZURX" . 41701)
+ ("YI SYLLABLE ZZUR" . 41702)
+ ("YI SYLLABLE ZZYT" . 41703)
+ ("YI SYLLABLE ZZYX" . 41704)
+ ("YI SYLLABLE ZZY" . 41705)
+ ("YI SYLLABLE ZZYP" . 41706)
+ ("YI SYLLABLE ZZYRX" . 41707)
+ ("YI SYLLABLE ZZYR" . 41708)
+ ("YI SYLLABLE NZIT" . 41709)
+ ("YI SYLLABLE NZIX" . 41710)
+ ("YI SYLLABLE NZI" . 41711)
+ ("YI SYLLABLE NZIP" . 41712)
+ ("YI SYLLABLE NZIEX" . 41713)
+ ("YI SYLLABLE NZIE" . 41714)
+ ("YI SYLLABLE NZIEP" . 41715)
+ ("YI SYLLABLE NZAT" . 41716)
+ ("YI SYLLABLE NZAX" . 41717)
+ ("YI SYLLABLE NZA" . 41718)
+ ("YI SYLLABLE NZAP" . 41719)
+ ("YI SYLLABLE NZUOX" . 41720)
+ ("YI SYLLABLE NZUO" . 41721)
+ ("YI SYLLABLE NZOX" . 41722)
+ ("YI SYLLABLE NZOP" . 41723)
+ ("YI SYLLABLE NZEX" . 41724)
+ ("YI SYLLABLE NZE" . 41725)
+ ("YI SYLLABLE NZUX" . 41726)
+ ("YI SYLLABLE NZU" . 41727)
+ ("YI SYLLABLE NZUP" . 41728)
+ ("YI SYLLABLE NZURX" . 41729)
+ ("YI SYLLABLE NZUR" . 41730)
+ ("YI SYLLABLE NZYT" . 41731)
+ ("YI SYLLABLE NZYX" . 41732)
+ ("YI SYLLABLE NZY" . 41733)
+ ("YI SYLLABLE NZYP" . 41734)
+ ("YI SYLLABLE NZYRX" . 41735)
+ ("YI SYLLABLE NZYR" . 41736)
+ ("YI SYLLABLE SIT" . 41737)
+ ("YI SYLLABLE SIX" . 41738)
+ ("YI SYLLABLE SI" . 41739)
+ ("YI SYLLABLE SIP" . 41740)
+ ("YI SYLLABLE SIEX" . 41741)
+ ("YI SYLLABLE SIE" . 41742)
+ ("YI SYLLABLE SIEP" . 41743)
+ ("YI SYLLABLE SAT" . 41744)
+ ("YI SYLLABLE SAX" . 41745)
+ ("YI SYLLABLE SA" . 41746)
+ ("YI SYLLABLE SAP" . 41747)
+ ("YI SYLLABLE SUOX" . 41748)
+ ("YI SYLLABLE SUO" . 41749)
+ ("YI SYLLABLE SUOP" . 41750)
+ ("YI SYLLABLE SOT" . 41751)
+ ("YI SYLLABLE SOX" . 41752)
+ ("YI SYLLABLE SO" . 41753)
+ ("YI SYLLABLE SOP" . 41754)
+ ("YI SYLLABLE SEX" . 41755)
+ ("YI SYLLABLE SE" . 41756)
+ ("YI SYLLABLE SEP" . 41757)
+ ("YI SYLLABLE SUT" . 41758)
+ ("YI SYLLABLE SUX" . 41759)
+ ("YI SYLLABLE SU" . 41760)
+ ("YI SYLLABLE SUP" . 41761)
+ ("YI SYLLABLE SURX" . 41762)
+ ("YI SYLLABLE SUR" . 41763)
+ ("YI SYLLABLE SYT" . 41764)
+ ("YI SYLLABLE SYX" . 41765)
+ ("YI SYLLABLE SY" . 41766)
+ ("YI SYLLABLE SYP" . 41767)
+ ("YI SYLLABLE SYRX" . 41768)
+ ("YI SYLLABLE SYR" . 41769)
+ ("YI SYLLABLE SSIT" . 41770)
+ ("YI SYLLABLE SSIX" . 41771)
+ ("YI SYLLABLE SSI" . 41772)
+ ("YI SYLLABLE SSIP" . 41773)
+ ("YI SYLLABLE SSIEX" . 41774)
+ ("YI SYLLABLE SSIE" . 41775)
+ ("YI SYLLABLE SSIEP" . 41776)
+ ("YI SYLLABLE SSAT" . 41777)
+ ("YI SYLLABLE SSAX" . 41778)
+ ("YI SYLLABLE SSA" . 41779)
+ ("YI SYLLABLE SSAP" . 41780)
+ ("YI SYLLABLE SSOT" . 41781)
+ ("YI SYLLABLE SSOX" . 41782)
+ ("YI SYLLABLE SSO" . 41783)
+ ("YI SYLLABLE SSOP" . 41784)
+ ("YI SYLLABLE SSEX" . 41785)
+ ("YI SYLLABLE SSE" . 41786)
+ ("YI SYLLABLE SSEP" . 41787)
+ ("YI SYLLABLE SSUT" . 41788)
+ ("YI SYLLABLE SSUX" . 41789)
+ ("YI SYLLABLE SSU" . 41790)
+ ("YI SYLLABLE SSUP" . 41791)
+ ("YI SYLLABLE SSYT" . 41792)
+ ("YI SYLLABLE SSYX" . 41793)
+ ("YI SYLLABLE SSY" . 41794)
+ ("YI SYLLABLE SSYP" . 41795)
+ ("YI SYLLABLE SSYRX" . 41796)
+ ("YI SYLLABLE SSYR" . 41797)
+ ("YI SYLLABLE ZHAT" . 41798)
+ ("YI SYLLABLE ZHAX" . 41799)
+ ("YI SYLLABLE ZHA" . 41800)
+ ("YI SYLLABLE ZHAP" . 41801)
+ ("YI SYLLABLE ZHUOX" . 41802)
+ ("YI SYLLABLE ZHUO" . 41803)
+ ("YI SYLLABLE ZHUOP" . 41804)
+ ("YI SYLLABLE ZHOT" . 41805)
+ ("YI SYLLABLE ZHOX" . 41806)
+ ("YI SYLLABLE ZHO" . 41807)
+ ("YI SYLLABLE ZHOP" . 41808)
+ ("YI SYLLABLE ZHET" . 41809)
+ ("YI SYLLABLE ZHEX" . 41810)
+ ("YI SYLLABLE ZHE" . 41811)
+ ("YI SYLLABLE ZHEP" . 41812)
+ ("YI SYLLABLE ZHUT" . 41813)
+ ("YI SYLLABLE ZHUX" . 41814)
+ ("YI SYLLABLE ZHU" . 41815)
+ ("YI SYLLABLE ZHUP" . 41816)
+ ("YI SYLLABLE ZHURX" . 41817)
+ ("YI SYLLABLE ZHUR" . 41818)
+ ("YI SYLLABLE ZHYT" . 41819)
+ ("YI SYLLABLE ZHYX" . 41820)
+ ("YI SYLLABLE ZHY" . 41821)
+ ("YI SYLLABLE ZHYP" . 41822)
+ ("YI SYLLABLE ZHYRX" . 41823)
+ ("YI SYLLABLE ZHYR" . 41824)
+ ("YI SYLLABLE CHAT" . 41825)
+ ("YI SYLLABLE CHAX" . 41826)
+ ("YI SYLLABLE CHA" . 41827)
+ ("YI SYLLABLE CHAP" . 41828)
+ ("YI SYLLABLE CHUOT" . 41829)
+ ("YI SYLLABLE CHUOX" . 41830)
+ ("YI SYLLABLE CHUO" . 41831)
+ ("YI SYLLABLE CHUOP" . 41832)
+ ("YI SYLLABLE CHOT" . 41833)
+ ("YI SYLLABLE CHOX" . 41834)
+ ("YI SYLLABLE CHO" . 41835)
+ ("YI SYLLABLE CHOP" . 41836)
+ ("YI SYLLABLE CHET" . 41837)
+ ("YI SYLLABLE CHEX" . 41838)
+ ("YI SYLLABLE CHE" . 41839)
+ ("YI SYLLABLE CHEP" . 41840)
+ ("YI SYLLABLE CHUX" . 41841)
+ ("YI SYLLABLE CHU" . 41842)
+ ("YI SYLLABLE CHUP" . 41843)
+ ("YI SYLLABLE CHURX" . 41844)
+ ("YI SYLLABLE CHUR" . 41845)
+ ("YI SYLLABLE CHYT" . 41846)
+ ("YI SYLLABLE CHYX" . 41847)
+ ("YI SYLLABLE CHY" . 41848)
+ ("YI SYLLABLE CHYP" . 41849)
+ ("YI SYLLABLE CHYRX" . 41850)
+ ("YI SYLLABLE CHYR" . 41851)
+ ("YI SYLLABLE RRAX" . 41852)
+ ("YI SYLLABLE RRA" . 41853)
+ ("YI SYLLABLE RRUOX" . 41854)
+ ("YI SYLLABLE RRUO" . 41855)
+ ("YI SYLLABLE RROT" . 41856)
+ ("YI SYLLABLE RROX" . 41857)
+ ("YI SYLLABLE RRO" . 41858)
+ ("YI SYLLABLE RROP" . 41859)
+ ("YI SYLLABLE RRET" . 41860)
+ ("YI SYLLABLE RREX" . 41861)
+ ("YI SYLLABLE RRE" . 41862)
+ ("YI SYLLABLE RREP" . 41863)
+ ("YI SYLLABLE RRUT" . 41864)
+ ("YI SYLLABLE RRUX" . 41865)
+ ("YI SYLLABLE RRU" . 41866)
+ ("YI SYLLABLE RRUP" . 41867)
+ ("YI SYLLABLE RRURX" . 41868)
+ ("YI SYLLABLE RRUR" . 41869)
+ ("YI SYLLABLE RRYT" . 41870)
+ ("YI SYLLABLE RRYX" . 41871)
+ ("YI SYLLABLE RRY" . 41872)
+ ("YI SYLLABLE RRYP" . 41873)
+ ("YI SYLLABLE RRYRX" . 41874)
+ ("YI SYLLABLE RRYR" . 41875)
+ ("YI SYLLABLE NRAT" . 41876)
+ ("YI SYLLABLE NRAX" . 41877)
+ ("YI SYLLABLE NRA" . 41878)
+ ("YI SYLLABLE NRAP" . 41879)
+ ("YI SYLLABLE NROX" . 41880)
+ ("YI SYLLABLE NRO" . 41881)
+ ("YI SYLLABLE NROP" . 41882)
+ ("YI SYLLABLE NRET" . 41883)
+ ("YI SYLLABLE NREX" . 41884)
+ ("YI SYLLABLE NRE" . 41885)
+ ("YI SYLLABLE NREP" . 41886)
+ ("YI SYLLABLE NRUT" . 41887)
+ ("YI SYLLABLE NRUX" . 41888)
+ ("YI SYLLABLE NRU" . 41889)
+ ("YI SYLLABLE NRUP" . 41890)
+ ("YI SYLLABLE NRURX" . 41891)
+ ("YI SYLLABLE NRUR" . 41892)
+ ("YI SYLLABLE NRYT" . 41893)
+ ("YI SYLLABLE NRYX" . 41894)
+ ("YI SYLLABLE NRY" . 41895)
+ ("YI SYLLABLE NRYP" . 41896)
+ ("YI SYLLABLE NRYRX" . 41897)
+ ("YI SYLLABLE NRYR" . 41898)
+ ("YI SYLLABLE SHAT" . 41899)
+ ("YI SYLLABLE SHAX" . 41900)
+ ("YI SYLLABLE SHA" . 41901)
+ ("YI SYLLABLE SHAP" . 41902)
+ ("YI SYLLABLE SHUOX" . 41903)
+ ("YI SYLLABLE SHUO" . 41904)
+ ("YI SYLLABLE SHUOP" . 41905)
+ ("YI SYLLABLE SHOT" . 41906)
+ ("YI SYLLABLE SHOX" . 41907)
+ ("YI SYLLABLE SHO" . 41908)
+ ("YI SYLLABLE SHOP" . 41909)
+ ("YI SYLLABLE SHET" . 41910)
+ ("YI SYLLABLE SHEX" . 41911)
+ ("YI SYLLABLE SHE" . 41912)
+ ("YI SYLLABLE SHEP" . 41913)
+ ("YI SYLLABLE SHUT" . 41914)
+ ("YI SYLLABLE SHUX" . 41915)
+ ("YI SYLLABLE SHU" . 41916)
+ ("YI SYLLABLE SHUP" . 41917)
+ ("YI SYLLABLE SHURX" . 41918)
+ ("YI SYLLABLE SHUR" . 41919)
+ ("YI SYLLABLE SHYT" . 41920)
+ ("YI SYLLABLE SHYX" . 41921)
+ ("YI SYLLABLE SHY" . 41922)
+ ("YI SYLLABLE SHYP" . 41923)
+ ("YI SYLLABLE SHYRX" . 41924)
+ ("YI SYLLABLE SHYR" . 41925)
+ ("YI SYLLABLE RAT" . 41926)
+ ("YI SYLLABLE RAX" . 41927)
+ ("YI SYLLABLE RA" . 41928)
+ ("YI SYLLABLE RAP" . 41929)
+ ("YI SYLLABLE RUOX" . 41930)
+ ("YI SYLLABLE RUO" . 41931)
+ ("YI SYLLABLE RUOP" . 41932)
+ ("YI SYLLABLE ROT" . 41933)
+ ("YI SYLLABLE ROX" . 41934)
+ ("YI SYLLABLE RO" . 41935)
+ ("YI SYLLABLE ROP" . 41936)
+ ("YI SYLLABLE REX" . 41937)
+ ("YI SYLLABLE RE" . 41938)
+ ("YI SYLLABLE REP" . 41939)
+ ("YI SYLLABLE RUT" . 41940)
+ ("YI SYLLABLE RUX" . 41941)
+ ("YI SYLLABLE RU" . 41942)
+ ("YI SYLLABLE RUP" . 41943)
+ ("YI SYLLABLE RURX" . 41944)
+ ("YI SYLLABLE RUR" . 41945)
+ ("YI SYLLABLE RYT" . 41946)
+ ("YI SYLLABLE RYX" . 41947)
+ ("YI SYLLABLE RY" . 41948)
+ ("YI SYLLABLE RYP" . 41949)
+ ("YI SYLLABLE RYRX" . 41950)
+ ("YI SYLLABLE RYR" . 41951)
+ ("YI SYLLABLE JIT" . 41952)
+ ("YI SYLLABLE JIX" . 41953)
+ ("YI SYLLABLE JI" . 41954)
+ ("YI SYLLABLE JIP" . 41955)
+ ("YI SYLLABLE JIET" . 41956)
+ ("YI SYLLABLE JIEX" . 41957)
+ ("YI SYLLABLE JIE" . 41958)
+ ("YI SYLLABLE JIEP" . 41959)
+ ("YI SYLLABLE JUOT" . 41960)
+ ("YI SYLLABLE JUOX" . 41961)
+ ("YI SYLLABLE JUO" . 41962)
+ ("YI SYLLABLE JUOP" . 41963)
+ ("YI SYLLABLE JOT" . 41964)
+ ("YI SYLLABLE JOX" . 41965)
+ ("YI SYLLABLE JO" . 41966)
+ ("YI SYLLABLE JOP" . 41967)
+ ("YI SYLLABLE JUT" . 41968)
+ ("YI SYLLABLE JUX" . 41969)
+ ("YI SYLLABLE JU" . 41970)
+ ("YI SYLLABLE JUP" . 41971)
+ ("YI SYLLABLE JURX" . 41972)
+ ("YI SYLLABLE JUR" . 41973)
+ ("YI SYLLABLE JYT" . 41974)
+ ("YI SYLLABLE JYX" . 41975)
+ ("YI SYLLABLE JY" . 41976)
+ ("YI SYLLABLE JYP" . 41977)
+ ("YI SYLLABLE JYRX" . 41978)
+ ("YI SYLLABLE JYR" . 41979)
+ ("YI SYLLABLE QIT" . 41980)
+ ("YI SYLLABLE QIX" . 41981)
+ ("YI SYLLABLE QI" . 41982)
+ ("YI SYLLABLE QIP" . 41983)
+ ("YI SYLLABLE QIET" . 41984)
+ ("YI SYLLABLE QIEX" . 41985)
+ ("YI SYLLABLE QIE" . 41986)
+ ("YI SYLLABLE QIEP" . 41987)
+ ("YI SYLLABLE QUOT" . 41988)
+ ("YI SYLLABLE QUOX" . 41989)
+ ("YI SYLLABLE QUO" . 41990)
+ ("YI SYLLABLE QUOP" . 41991)
+ ("YI SYLLABLE QOT" . 41992)
+ ("YI SYLLABLE QOX" . 41993)
+ ("YI SYLLABLE QO" . 41994)
+ ("YI SYLLABLE QOP" . 41995)
+ ("YI SYLLABLE QUT" . 41996)
+ ("YI SYLLABLE QUX" . 41997)
+ ("YI SYLLABLE QU" . 41998)
+ ("YI SYLLABLE QUP" . 41999)
+ ("YI SYLLABLE QURX" . 42000)
+ ("YI SYLLABLE QUR" . 42001)
+ ("YI SYLLABLE QYT" . 42002)
+ ("YI SYLLABLE QYX" . 42003)
+ ("YI SYLLABLE QY" . 42004)
+ ("YI SYLLABLE QYP" . 42005)
+ ("YI SYLLABLE QYRX" . 42006)
+ ("YI SYLLABLE QYR" . 42007)
+ ("YI SYLLABLE JJIT" . 42008)
+ ("YI SYLLABLE JJIX" . 42009)
+ ("YI SYLLABLE JJI" . 42010)
+ ("YI SYLLABLE JJIP" . 42011)
+ ("YI SYLLABLE JJIET" . 42012)
+ ("YI SYLLABLE JJIEX" . 42013)
+ ("YI SYLLABLE JJIE" . 42014)
+ ("YI SYLLABLE JJIEP" . 42015)
+ ("YI SYLLABLE JJUOX" . 42016)
+ ("YI SYLLABLE JJUO" . 42017)
+ ("YI SYLLABLE JJUOP" . 42018)
+ ("YI SYLLABLE JJOT" . 42019)
+ ("YI SYLLABLE JJOX" . 42020)
+ ("YI SYLLABLE JJO" . 42021)
+ ("YI SYLLABLE JJOP" . 42022)
+ ("YI SYLLABLE JJUT" . 42023)
+ ("YI SYLLABLE JJUX" . 42024)
+ ("YI SYLLABLE JJU" . 42025)
+ ("YI SYLLABLE JJUP" . 42026)
+ ("YI SYLLABLE JJURX" . 42027)
+ ("YI SYLLABLE JJUR" . 42028)
+ ("YI SYLLABLE JJYT" . 42029)
+ ("YI SYLLABLE JJYX" . 42030)
+ ("YI SYLLABLE JJY" . 42031)
+ ("YI SYLLABLE JJYP" . 42032)
+ ("YI SYLLABLE NJIT" . 42033)
+ ("YI SYLLABLE NJIX" . 42034)
+ ("YI SYLLABLE NJI" . 42035)
+ ("YI SYLLABLE NJIP" . 42036)
+ ("YI SYLLABLE NJIET" . 42037)
+ ("YI SYLLABLE NJIEX" . 42038)
+ ("YI SYLLABLE NJIE" . 42039)
+ ("YI SYLLABLE NJIEP" . 42040)
+ ("YI SYLLABLE NJUOX" . 42041)
+ ("YI SYLLABLE NJUO" . 42042)
+ ("YI SYLLABLE NJOT" . 42043)
+ ("YI SYLLABLE NJOX" . 42044)
+ ("YI SYLLABLE NJO" . 42045)
+ ("YI SYLLABLE NJOP" . 42046)
+ ("YI SYLLABLE NJUX" . 42047)
+ ("YI SYLLABLE NJU" . 42048)
+ ("YI SYLLABLE NJUP" . 42049)
+ ("YI SYLLABLE NJURX" . 42050)
+ ("YI SYLLABLE NJUR" . 42051)
+ ("YI SYLLABLE NJYT" . 42052)
+ ("YI SYLLABLE NJYX" . 42053)
+ ("YI SYLLABLE NJY" . 42054)
+ ("YI SYLLABLE NJYP" . 42055)
+ ("YI SYLLABLE NJYRX" . 42056)
+ ("YI SYLLABLE NJYR" . 42057)
+ ("YI SYLLABLE NYIT" . 42058)
+ ("YI SYLLABLE NYIX" . 42059)
+ ("YI SYLLABLE NYI" . 42060)
+ ("YI SYLLABLE NYIP" . 42061)
+ ("YI SYLLABLE NYIET" . 42062)
+ ("YI SYLLABLE NYIEX" . 42063)
+ ("YI SYLLABLE NYIE" . 42064)
+ ("YI SYLLABLE NYIEP" . 42065)
+ ("YI SYLLABLE NYUOX" . 42066)
+ ("YI SYLLABLE NYUO" . 42067)
+ ("YI SYLLABLE NYUOP" . 42068)
+ ("YI SYLLABLE NYOT" . 42069)
+ ("YI SYLLABLE NYOX" . 42070)
+ ("YI SYLLABLE NYO" . 42071)
+ ("YI SYLLABLE NYOP" . 42072)
+ ("YI SYLLABLE NYUT" . 42073)
+ ("YI SYLLABLE NYUX" . 42074)
+ ("YI SYLLABLE NYU" . 42075)
+ ("YI SYLLABLE NYUP" . 42076)
+ ("YI SYLLABLE XIT" . 42077)
+ ("YI SYLLABLE XIX" . 42078)
+ ("YI SYLLABLE XI" . 42079)
+ ("YI SYLLABLE XIP" . 42080)
+ ("YI SYLLABLE XIET" . 42081)
+ ("YI SYLLABLE XIEX" . 42082)
+ ("YI SYLLABLE XIE" . 42083)
+ ("YI SYLLABLE XIEP" . 42084)
+ ("YI SYLLABLE XUOX" . 42085)
+ ("YI SYLLABLE XUO" . 42086)
+ ("YI SYLLABLE XOT" . 42087)
+ ("YI SYLLABLE XOX" . 42088)
+ ("YI SYLLABLE XO" . 42089)
+ ("YI SYLLABLE XOP" . 42090)
+ ("YI SYLLABLE XYT" . 42091)
+ ("YI SYLLABLE XYX" . 42092)
+ ("YI SYLLABLE XY" . 42093)
+ ("YI SYLLABLE XYP" . 42094)
+ ("YI SYLLABLE XYRX" . 42095)
+ ("YI SYLLABLE XYR" . 42096)
+ ("YI SYLLABLE YIT" . 42097)
+ ("YI SYLLABLE YIX" . 42098)
+ ("YI SYLLABLE YI" . 42099)
+ ("YI SYLLABLE YIP" . 42100)
+ ("YI SYLLABLE YIET" . 42101)
+ ("YI SYLLABLE YIEX" . 42102)
+ ("YI SYLLABLE YIE" . 42103)
+ ("YI SYLLABLE YIEP" . 42104)
+ ("YI SYLLABLE YUOT" . 42105)
+ ("YI SYLLABLE YUOX" . 42106)
+ ("YI SYLLABLE YUO" . 42107)
+ ("YI SYLLABLE YUOP" . 42108)
+ ("YI SYLLABLE YOT" . 42109)
+ ("YI SYLLABLE YOX" . 42110)
+ ("YI SYLLABLE YO" . 42111)
+ ("YI SYLLABLE YOP" . 42112)
+ ("YI SYLLABLE YUT" . 42113)
+ ("YI SYLLABLE YUX" . 42114)
+ ("YI SYLLABLE YU" . 42115)
+ ("YI SYLLABLE YUP" . 42116)
+ ("YI SYLLABLE YURX" . 42117)
+ ("YI SYLLABLE YUR" . 42118)
+ ("YI SYLLABLE YYT" . 42119)
+ ("YI SYLLABLE YYX" . 42120)
+ ("YI SYLLABLE YY" . 42121)
+ ("YI SYLLABLE YYP" . 42122)
+ ("YI SYLLABLE YYRX" . 42123)
+ ("YI SYLLABLE YYR" . 42124)
+ ("YI RADICAL QOT" . 42128)
+ ("YI RADICAL LI" . 42129)
+ ("YI RADICAL KIT" . 42130)
+ ("YI RADICAL NYIP" . 42131)
+ ("YI RADICAL CYP" . 42132)
+ ("YI RADICAL SSI" . 42133)
+ ("YI RADICAL GGOP" . 42134)
+ ("YI RADICAL GEP" . 42135)
+ ("YI RADICAL MI" . 42136)
+ ("YI RADICAL HXIT" . 42137)
+ ("YI RADICAL LYR" . 42138)
+ ("YI RADICAL BBUT" . 42139)
+ ("YI RADICAL MOP" . 42140)
+ ("YI RADICAL YO" . 42141)
+ ("YI RADICAL PUT" . 42142)
+ ("YI RADICAL HXUO" . 42143)
+ ("YI RADICAL TAT" . 42144)
+ ("YI RADICAL GA" . 42145)
+ ("YI RADICAL ZUP" . 42146)
+ ("YI RADICAL CYT" . 42147)
+ ("YI RADICAL DDUR" . 42148)
+ ("YI RADICAL BUR" . 42149)
+ ("YI RADICAL GGUO" . 42150)
+ ("YI RADICAL NYOP" . 42151)
+ ("YI RADICAL TU" . 42152)
+ ("YI RADICAL OP" . 42153)
+ ("YI RADICAL JJUT" . 42154)
+ ("YI RADICAL ZOT" . 42155)
+ ("YI RADICAL PYT" . 42156)
+ ("YI RADICAL HMO" . 42157)
+ ("YI RADICAL YIT" . 42158)
+ ("YI RADICAL VUR" . 42159)
+ ("YI RADICAL SHY" . 42160)
+ ("YI RADICAL VEP" . 42161)
+ ("YI RADICAL ZA" . 42162)
+ ("YI RADICAL JO" . 42163)
+ ("YI RADICAL NZUP" . 42164)
+ ("YI RADICAL JJY" . 42165)
+ ("YI RADICAL GOT" . 42166)
+ ("YI RADICAL JJIE" . 42167)
+ ("YI RADICAL WO" . 42168)
+ ("YI RADICAL DU" . 42169)
+ ("YI RADICAL SHUR" . 42170)
+ ("YI RADICAL LIE" . 42171)
+ ("YI RADICAL CY" . 42172)
+ ("YI RADICAL CUOP" . 42173)
+ ("YI RADICAL CIP" . 42174)
+ ("YI RADICAL HXOP" . 42175)
+ ("YI RADICAL SHAT" . 42176)
+ ("YI RADICAL ZUR" . 42177)
+ ("YI RADICAL SHOP" . 42178)
+ ("YI RADICAL CHE" . 42179)
+ ("YI RADICAL ZZIET" . 42180)
+ ("YI RADICAL NBIE" . 42181)
+ ("YI RADICAL KE" . 42182)
+ ("CJK COMPATIBILITY IDEOGRAPH-F900" . 63744)
+ ("CJK COMPATIBILITY IDEOGRAPH-F901" . 63745)
+ ("CJK COMPATIBILITY IDEOGRAPH-F902" . 63746)
+ ("CJK COMPATIBILITY IDEOGRAPH-F903" . 63747)
+ ("CJK COMPATIBILITY IDEOGRAPH-F904" . 63748)
+ ("CJK COMPATIBILITY IDEOGRAPH-F905" . 63749)
+ ("CJK COMPATIBILITY IDEOGRAPH-F906" . 63750)
+ ("CJK COMPATIBILITY IDEOGRAPH-F907" . 63751)
+ ("CJK COMPATIBILITY IDEOGRAPH-F908" . 63752)
+ ("CJK COMPATIBILITY IDEOGRAPH-F909" . 63753)
+ ("CJK COMPATIBILITY IDEOGRAPH-F90A" . 63754)
+ ("CJK COMPATIBILITY IDEOGRAPH-F90B" . 63755)
+ ("CJK COMPATIBILITY IDEOGRAPH-F90C" . 63756)
+ ("CJK COMPATIBILITY IDEOGRAPH-F90D" . 63757)
+ ("CJK COMPATIBILITY IDEOGRAPH-F90E" . 63758)
+ ("CJK COMPATIBILITY IDEOGRAPH-F90F" . 63759)
+ ("CJK COMPATIBILITY IDEOGRAPH-F910" . 63760)
+ ("CJK COMPATIBILITY IDEOGRAPH-F911" . 63761)
+ ("CJK COMPATIBILITY IDEOGRAPH-F912" . 63762)
+ ("CJK COMPATIBILITY IDEOGRAPH-F913" . 63763)
+ ("CJK COMPATIBILITY IDEOGRAPH-F914" . 63764)
+ ("CJK COMPATIBILITY IDEOGRAPH-F915" . 63765)
+ ("CJK COMPATIBILITY IDEOGRAPH-F916" . 63766)
+ ("CJK COMPATIBILITY IDEOGRAPH-F917" . 63767)
+ ("CJK COMPATIBILITY IDEOGRAPH-F918" . 63768)
+ ("CJK COMPATIBILITY IDEOGRAPH-F919" . 63769)
+ ("CJK COMPATIBILITY IDEOGRAPH-F91A" . 63770)
+ ("CJK COMPATIBILITY IDEOGRAPH-F91B" . 63771)
+ ("CJK COMPATIBILITY IDEOGRAPH-F91C" . 63772)
+ ("CJK COMPATIBILITY IDEOGRAPH-F91D" . 63773)
+ ("CJK COMPATIBILITY IDEOGRAPH-F91E" . 63774)
+ ("CJK COMPATIBILITY IDEOGRAPH-F91F" . 63775)
+ ("CJK COMPATIBILITY IDEOGRAPH-F920" . 63776)
+ ("CJK COMPATIBILITY IDEOGRAPH-F921" . 63777)
+ ("CJK COMPATIBILITY IDEOGRAPH-F922" . 63778)
+ ("CJK COMPATIBILITY IDEOGRAPH-F923" . 63779)
+ ("CJK COMPATIBILITY IDEOGRAPH-F924" . 63780)
+ ("CJK COMPATIBILITY IDEOGRAPH-F925" . 63781)
+ ("CJK COMPATIBILITY IDEOGRAPH-F926" . 63782)
+ ("CJK COMPATIBILITY IDEOGRAPH-F927" . 63783)
+ ("CJK COMPATIBILITY IDEOGRAPH-F928" . 63784)
+ ("CJK COMPATIBILITY IDEOGRAPH-F929" . 63785)
+ ("CJK COMPATIBILITY IDEOGRAPH-F92A" . 63786)
+ ("CJK COMPATIBILITY IDEOGRAPH-F92B" . 63787)
+ ("CJK COMPATIBILITY IDEOGRAPH-F92C" . 63788)
+ ("CJK COMPATIBILITY IDEOGRAPH-F92D" . 63789)
+ ("CJK COMPATIBILITY IDEOGRAPH-F92E" . 63790)
+ ("CJK COMPATIBILITY IDEOGRAPH-F92F" . 63791)
+ ("CJK COMPATIBILITY IDEOGRAPH-F930" . 63792)
+ ("CJK COMPATIBILITY IDEOGRAPH-F931" . 63793)
+ ("CJK COMPATIBILITY IDEOGRAPH-F932" . 63794)
+ ("CJK COMPATIBILITY IDEOGRAPH-F933" . 63795)
+ ("CJK COMPATIBILITY IDEOGRAPH-F934" . 63796)
+ ("CJK COMPATIBILITY IDEOGRAPH-F935" . 63797)
+ ("CJK COMPATIBILITY IDEOGRAPH-F936" . 63798)
+ ("CJK COMPATIBILITY IDEOGRAPH-F937" . 63799)
+ ("CJK COMPATIBILITY IDEOGRAPH-F938" . 63800)
+ ("CJK COMPATIBILITY IDEOGRAPH-F939" . 63801)
+ ("CJK COMPATIBILITY IDEOGRAPH-F93A" . 63802)
+ ("CJK COMPATIBILITY IDEOGRAPH-F93B" . 63803)
+ ("CJK COMPATIBILITY IDEOGRAPH-F93C" . 63804)
+ ("CJK COMPATIBILITY IDEOGRAPH-F93D" . 63805)
+ ("CJK COMPATIBILITY IDEOGRAPH-F93E" . 63806)
+ ("CJK COMPATIBILITY IDEOGRAPH-F93F" . 63807)
+ ("CJK COMPATIBILITY IDEOGRAPH-F940" . 63808)
+ ("CJK COMPATIBILITY IDEOGRAPH-F941" . 63809)
+ ("CJK COMPATIBILITY IDEOGRAPH-F942" . 63810)
+ ("CJK COMPATIBILITY IDEOGRAPH-F943" . 63811)
+ ("CJK COMPATIBILITY IDEOGRAPH-F944" . 63812)
+ ("CJK COMPATIBILITY IDEOGRAPH-F945" . 63813)
+ ("CJK COMPATIBILITY IDEOGRAPH-F946" . 63814)
+ ("CJK COMPATIBILITY IDEOGRAPH-F947" . 63815)
+ ("CJK COMPATIBILITY IDEOGRAPH-F948" . 63816)
+ ("CJK COMPATIBILITY IDEOGRAPH-F949" . 63817)
+ ("CJK COMPATIBILITY IDEOGRAPH-F94A" . 63818)
+ ("CJK COMPATIBILITY IDEOGRAPH-F94B" . 63819)
+ ("CJK COMPATIBILITY IDEOGRAPH-F94C" . 63820)
+ ("CJK COMPATIBILITY IDEOGRAPH-F94D" . 63821)
+ ("CJK COMPATIBILITY IDEOGRAPH-F94E" . 63822)
+ ("CJK COMPATIBILITY IDEOGRAPH-F94F" . 63823)
+ ("CJK COMPATIBILITY IDEOGRAPH-F950" . 63824)
+ ("CJK COMPATIBILITY IDEOGRAPH-F951" . 63825)
+ ("CJK COMPATIBILITY IDEOGRAPH-F952" . 63826)
+ ("CJK COMPATIBILITY IDEOGRAPH-F953" . 63827)
+ ("CJK COMPATIBILITY IDEOGRAPH-F954" . 63828)
+ ("CJK COMPATIBILITY IDEOGRAPH-F955" . 63829)
+ ("CJK COMPATIBILITY IDEOGRAPH-F956" . 63830)
+ ("CJK COMPATIBILITY IDEOGRAPH-F957" . 63831)
+ ("CJK COMPATIBILITY IDEOGRAPH-F958" . 63832)
+ ("CJK COMPATIBILITY IDEOGRAPH-F959" . 63833)
+ ("CJK COMPATIBILITY IDEOGRAPH-F95A" . 63834)
+ ("CJK COMPATIBILITY IDEOGRAPH-F95B" . 63835)
+ ("CJK COMPATIBILITY IDEOGRAPH-F95C" . 63836)
+ ("CJK COMPATIBILITY IDEOGRAPH-F95D" . 63837)
+ ("CJK COMPATIBILITY IDEOGRAPH-F95E" . 63838)
+ ("CJK COMPATIBILITY IDEOGRAPH-F95F" . 63839)
+ ("CJK COMPATIBILITY IDEOGRAPH-F960" . 63840)
+ ("CJK COMPATIBILITY IDEOGRAPH-F961" . 63841)
+ ("CJK COMPATIBILITY IDEOGRAPH-F962" . 63842)
+ ("CJK COMPATIBILITY IDEOGRAPH-F963" . 63843)
+ ("CJK COMPATIBILITY IDEOGRAPH-F964" . 63844)
+ ("CJK COMPATIBILITY IDEOGRAPH-F965" . 63845)
+ ("CJK COMPATIBILITY IDEOGRAPH-F966" . 63846)
+ ("CJK COMPATIBILITY IDEOGRAPH-F967" . 63847)
+ ("CJK COMPATIBILITY IDEOGRAPH-F968" . 63848)
+ ("CJK COMPATIBILITY IDEOGRAPH-F969" . 63849)
+ ("CJK COMPATIBILITY IDEOGRAPH-F96A" . 63850)
+ ("CJK COMPATIBILITY IDEOGRAPH-F96B" . 63851)
+ ("CJK COMPATIBILITY IDEOGRAPH-F96C" . 63852)
+ ("CJK COMPATIBILITY IDEOGRAPH-F96D" . 63853)
+ ("CJK COMPATIBILITY IDEOGRAPH-F96E" . 63854)
+ ("CJK COMPATIBILITY IDEOGRAPH-F96F" . 63855)
+ ("CJK COMPATIBILITY IDEOGRAPH-F970" . 63856)
+ ("CJK COMPATIBILITY IDEOGRAPH-F971" . 63857)
+ ("CJK COMPATIBILITY IDEOGRAPH-F972" . 63858)
+ ("CJK COMPATIBILITY IDEOGRAPH-F973" . 63859)
+ ("CJK COMPATIBILITY IDEOGRAPH-F974" . 63860)
+ ("CJK COMPATIBILITY IDEOGRAPH-F975" . 63861)
+ ("CJK COMPATIBILITY IDEOGRAPH-F976" . 63862)
+ ("CJK COMPATIBILITY IDEOGRAPH-F977" . 63863)
+ ("CJK COMPATIBILITY IDEOGRAPH-F978" . 63864)
+ ("CJK COMPATIBILITY IDEOGRAPH-F979" . 63865)
+ ("CJK COMPATIBILITY IDEOGRAPH-F97A" . 63866)
+ ("CJK COMPATIBILITY IDEOGRAPH-F97B" . 63867)
+ ("CJK COMPATIBILITY IDEOGRAPH-F97C" . 63868)
+ ("CJK COMPATIBILITY IDEOGRAPH-F97D" . 63869)
+ ("CJK COMPATIBILITY IDEOGRAPH-F97E" . 63870)
+ ("CJK COMPATIBILITY IDEOGRAPH-F97F" . 63871)
+ ("CJK COMPATIBILITY IDEOGRAPH-F980" . 63872)
+ ("CJK COMPATIBILITY IDEOGRAPH-F981" . 63873)
+ ("CJK COMPATIBILITY IDEOGRAPH-F982" . 63874)
+ ("CJK COMPATIBILITY IDEOGRAPH-F983" . 63875)
+ ("CJK COMPATIBILITY IDEOGRAPH-F984" . 63876)
+ ("CJK COMPATIBILITY IDEOGRAPH-F985" . 63877)
+ ("CJK COMPATIBILITY IDEOGRAPH-F986" . 63878)
+ ("CJK COMPATIBILITY IDEOGRAPH-F987" . 63879)
+ ("CJK COMPATIBILITY IDEOGRAPH-F988" . 63880)
+ ("CJK COMPATIBILITY IDEOGRAPH-F989" . 63881)
+ ("CJK COMPATIBILITY IDEOGRAPH-F98A" . 63882)
+ ("CJK COMPATIBILITY IDEOGRAPH-F98B" . 63883)
+ ("CJK COMPATIBILITY IDEOGRAPH-F98C" . 63884)
+ ("CJK COMPATIBILITY IDEOGRAPH-F98D" . 63885)
+ ("CJK COMPATIBILITY IDEOGRAPH-F98E" . 63886)
+ ("CJK COMPATIBILITY IDEOGRAPH-F98F" . 63887)
+ ("CJK COMPATIBILITY IDEOGRAPH-F990" . 63888)
+ ("CJK COMPATIBILITY IDEOGRAPH-F991" . 63889)
+ ("CJK COMPATIBILITY IDEOGRAPH-F992" . 63890)
+ ("CJK COMPATIBILITY IDEOGRAPH-F993" . 63891)
+ ("CJK COMPATIBILITY IDEOGRAPH-F994" . 63892)
+ ("CJK COMPATIBILITY IDEOGRAPH-F995" . 63893)
+ ("CJK COMPATIBILITY IDEOGRAPH-F996" . 63894)
+ ("CJK COMPATIBILITY IDEOGRAPH-F997" . 63895)
+ ("CJK COMPATIBILITY IDEOGRAPH-F998" . 63896)
+ ("CJK COMPATIBILITY IDEOGRAPH-F999" . 63897)
+ ("CJK COMPATIBILITY IDEOGRAPH-F99A" . 63898)
+ ("CJK COMPATIBILITY IDEOGRAPH-F99B" . 63899)
+ ("CJK COMPATIBILITY IDEOGRAPH-F99C" . 63900)
+ ("CJK COMPATIBILITY IDEOGRAPH-F99D" . 63901)
+ ("CJK COMPATIBILITY IDEOGRAPH-F99E" . 63902)
+ ("CJK COMPATIBILITY IDEOGRAPH-F99F" . 63903)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9A0" . 63904)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9A1" . 63905)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9A2" . 63906)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9A3" . 63907)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9A4" . 63908)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9A5" . 63909)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9A6" . 63910)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9A7" . 63911)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9A8" . 63912)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9A9" . 63913)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9AA" . 63914)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9AB" . 63915)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9AC" . 63916)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9AD" . 63917)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9AE" . 63918)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9AF" . 63919)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9B0" . 63920)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9B1" . 63921)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9B2" . 63922)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9B3" . 63923)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9B4" . 63924)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9B5" . 63925)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9B6" . 63926)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9B7" . 63927)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9B8" . 63928)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9B9" . 63929)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9BA" . 63930)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9BB" . 63931)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9BC" . 63932)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9BD" . 63933)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9BE" . 63934)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9BF" . 63935)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9C0" . 63936)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9C1" . 63937)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9C2" . 63938)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9C3" . 63939)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9C4" . 63940)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9C5" . 63941)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9C6" . 63942)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9C7" . 63943)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9C8" . 63944)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9C9" . 63945)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9CA" . 63946)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9CB" . 63947)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9CC" . 63948)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9CD" . 63949)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9CE" . 63950)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9CF" . 63951)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9D0" . 63952)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9D1" . 63953)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9D2" . 63954)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9D3" . 63955)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9D4" . 63956)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9D5" . 63957)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9D6" . 63958)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9D7" . 63959)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9D8" . 63960)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9D9" . 63961)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9DA" . 63962)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9DB" . 63963)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9DC" . 63964)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9DD" . 63965)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9DE" . 63966)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9DF" . 63967)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9E0" . 63968)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9E1" . 63969)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9E2" . 63970)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9E3" . 63971)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9E4" . 63972)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9E5" . 63973)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9E6" . 63974)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9E7" . 63975)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9E8" . 63976)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9E9" . 63977)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9EA" . 63978)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9EB" . 63979)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9EC" . 63980)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9ED" . 63981)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9EE" . 63982)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9EF" . 63983)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9F0" . 63984)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9F1" . 63985)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9F2" . 63986)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9F3" . 63987)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9F4" . 63988)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9F5" . 63989)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9F6" . 63990)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9F7" . 63991)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9F8" . 63992)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9F9" . 63993)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9FA" . 63994)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9FB" . 63995)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9FC" . 63996)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9FD" . 63997)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9FE" . 63998)
+ ("CJK COMPATIBILITY IDEOGRAPH-F9FF" . 63999)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA00" . 64000)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA01" . 64001)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA02" . 64002)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA03" . 64003)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA04" . 64004)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA05" . 64005)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA06" . 64006)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA07" . 64007)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA08" . 64008)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA09" . 64009)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA0A" . 64010)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA0B" . 64011)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA0C" . 64012)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA0D" . 64013)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA0E" . 64014)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA0F" . 64015)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA10" . 64016)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA11" . 64017)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA12" . 64018)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA13" . 64019)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA14" . 64020)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA15" . 64021)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA16" . 64022)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA17" . 64023)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA18" . 64024)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA19" . 64025)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA1A" . 64026)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA1B" . 64027)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA1C" . 64028)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA1D" . 64029)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA1E" . 64030)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA1F" . 64031)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA20" . 64032)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA21" . 64033)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA22" . 64034)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA23" . 64035)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA24" . 64036)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA25" . 64037)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA26" . 64038)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA27" . 64039)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA28" . 64040)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA29" . 64041)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA2A" . 64042)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA2B" . 64043)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA2C" . 64044)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA2D" . 64045)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA30" . 64048)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA31" . 64049)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA32" . 64050)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA33" . 64051)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA34" . 64052)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA35" . 64053)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA36" . 64054)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA37" . 64055)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA38" . 64056)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA39" . 64057)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA3A" . 64058)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA3B" . 64059)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA3C" . 64060)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA3D" . 64061)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA3E" . 64062)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA3F" . 64063)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA40" . 64064)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA41" . 64065)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA42" . 64066)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA43" . 64067)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA44" . 64068)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA45" . 64069)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA46" . 64070)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA47" . 64071)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA48" . 64072)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA49" . 64073)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA4A" . 64074)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA4B" . 64075)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA4C" . 64076)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA4D" . 64077)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA4E" . 64078)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA4F" . 64079)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA50" . 64080)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA51" . 64081)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA52" . 64082)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA53" . 64083)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA54" . 64084)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA55" . 64085)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA56" . 64086)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA57" . 64087)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA58" . 64088)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA59" . 64089)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA5A" . 64090)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA5B" . 64091)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA5C" . 64092)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA5D" . 64093)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA5E" . 64094)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA5F" . 64095)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA60" . 64096)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA61" . 64097)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA62" . 64098)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA63" . 64099)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA64" . 64100)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA65" . 64101)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA66" . 64102)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA67" . 64103)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA68" . 64104)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA69" . 64105)
+ ("CJK COMPATIBILITY IDEOGRAPH-FA6A" . 64106)
+ ("LATIN SMALL LIGATURE FF" . 64256)
+ ("LATIN SMALL LIGATURE FI" . 64257)
+ ("LATIN SMALL LIGATURE FL" . 64258)
+ ("LATIN SMALL LIGATURE FFI" . 64259)
+ ("LATIN SMALL LIGATURE FFL" . 64260)
+ ("LATIN SMALL LIGATURE LONG S T" . 64261)
+ ("LATIN SMALL LIGATURE ST" . 64262)
+ ("ARMENIAN SMALL LIGATURE MEN NOW" . 64275)
+ ("ARMENIAN SMALL LIGATURE MEN ECH" . 64276)
+ ("ARMENIAN SMALL LIGATURE MEN INI" . 64277)
+ ("ARMENIAN SMALL LIGATURE VEW NOW" . 64278)
+ ("ARMENIAN SMALL LIGATURE MEN XEH" . 64279)
+ ("HEBREW LETTER YOD WITH HIRIQ" . 64285)
+ ("HEBREW POINT JUDEO-SPANISH VARIKA" . 64286)
+ ("HEBREW LIGATURE YIDDISH YOD YOD PATAH" . 64287)
+ ("HEBREW LETTER ALTERNATIVE AYIN" . 64288)
+ ("HEBREW LETTER WIDE ALEF" . 64289)
+ ("HEBREW LETTER WIDE DALET" . 64290)
+ ("HEBREW LETTER WIDE HE" . 64291)
+ ("HEBREW LETTER WIDE KAF" . 64292)
+ ("HEBREW LETTER WIDE LAMED" . 64293)
+ ("HEBREW LETTER WIDE FINAL MEM" . 64294)
+ ("HEBREW LETTER WIDE RESH" . 64295)
+ ("HEBREW LETTER WIDE TAV" . 64296)
+ ("HEBREW LETTER ALTERNATIVE PLUS SIGN" . 64297)
+ ("HEBREW LETTER SHIN WITH SHIN DOT" . 64298)
+ ("HEBREW LETTER SHIN WITH SIN DOT" . 64299)
+ ("HEBREW LETTER SHIN WITH DAGESH AND SHIN DOT" . 64300)
+ ("HEBREW LETTER SHIN WITH DAGESH AND SIN DOT" . 64301)
+ ("HEBREW LETTER ALEF WITH PATAH" . 64302)
+ ("HEBREW LETTER ALEF WITH QAMATS" . 64303)
+ ("HEBREW LETTER ALEF WITH MAPIQ" . 64304)
+ ("HEBREW LETTER BET WITH DAGESH" . 64305)
+ ("HEBREW LETTER GIMEL WITH DAGESH" . 64306)
+ ("HEBREW LETTER DALET WITH DAGESH" . 64307)
+ ("HEBREW LETTER HE WITH MAPIQ" . 64308)
+ ("HEBREW LETTER VAV WITH DAGESH" . 64309)
+ ("HEBREW LETTER ZAYIN WITH DAGESH" . 64310)
+ ("HEBREW LETTER TET WITH DAGESH" . 64312)
+ ("HEBREW LETTER YOD WITH DAGESH" . 64313)
+ ("HEBREW LETTER FINAL KAF WITH DAGESH" . 64314)
+ ("HEBREW LETTER KAF WITH DAGESH" . 64315)
+ ("HEBREW LETTER LAMED WITH DAGESH" . 64316)
+ ("HEBREW LETTER MEM WITH DAGESH" . 64318)
+ ("HEBREW LETTER NUN WITH DAGESH" . 64320)
+ ("HEBREW LETTER SAMEKH WITH DAGESH" . 64321)
+ ("HEBREW LETTER FINAL PE WITH DAGESH" . 64323)
+ ("HEBREW LETTER PE WITH DAGESH" . 64324)
+ ("HEBREW LETTER TSADI WITH DAGESH" . 64326)
+ ("HEBREW LETTER QOF WITH DAGESH" . 64327)
+ ("HEBREW LETTER RESH WITH DAGESH" . 64328)
+ ("HEBREW LETTER SHIN WITH DAGESH" . 64329)
+ ("HEBREW LETTER TAV WITH DAGESH" . 64330)
+ ("HEBREW LETTER VAV WITH HOLAM" . 64331)
+ ("HEBREW LETTER BET WITH RAFE" . 64332)
+ ("HEBREW LETTER KAF WITH RAFE" . 64333)
+ ("HEBREW LETTER PE WITH RAFE" . 64334)
+ ("HEBREW LIGATURE ALEF LAMED" . 64335)
+ ("ARABIC LETTER ALEF WASLA ISOLATED FORM" . 64336)
+ ("ARABIC LETTER ALEF WASLA FINAL FORM" . 64337)
+ ("ARABIC LETTER BEEH ISOLATED FORM" . 64338)
+ ("ARABIC LETTER BEEH FINAL FORM" . 64339)
+ ("ARABIC LETTER BEEH INITIAL FORM" . 64340)
+ ("ARABIC LETTER BEEH MEDIAL FORM" . 64341)
+ ("ARABIC LETTER PEH ISOLATED FORM" . 64342)
+ ("ARABIC LETTER PEH FINAL FORM" . 64343)
+ ("ARABIC LETTER PEH INITIAL FORM" . 64344)
+ ("ARABIC LETTER PEH MEDIAL FORM" . 64345)
+ ("ARABIC LETTER BEHEH ISOLATED FORM" . 64346)
+ ("ARABIC LETTER BEHEH FINAL FORM" . 64347)
+ ("ARABIC LETTER BEHEH INITIAL FORM" . 64348)
+ ("ARABIC LETTER BEHEH MEDIAL FORM" . 64349)
+ ("ARABIC LETTER TTEHEH ISOLATED FORM" . 64350)
+ ("ARABIC LETTER TTEHEH FINAL FORM" . 64351)
+ ("ARABIC LETTER TTEHEH INITIAL FORM" . 64352)
+ ("ARABIC LETTER TTEHEH MEDIAL FORM" . 64353)
+ ("ARABIC LETTER TEHEH ISOLATED FORM" . 64354)
+ ("ARABIC LETTER TEHEH FINAL FORM" . 64355)
+ ("ARABIC LETTER TEHEH INITIAL FORM" . 64356)
+ ("ARABIC LETTER TEHEH MEDIAL FORM" . 64357)
+ ("ARABIC LETTER TTEH ISOLATED FORM" . 64358)
+ ("ARABIC LETTER TTEH FINAL FORM" . 64359)
+ ("ARABIC LETTER TTEH INITIAL FORM" . 64360)
+ ("ARABIC LETTER TTEH MEDIAL FORM" . 64361)
+ ("ARABIC LETTER VEH ISOLATED FORM" . 64362)
+ ("ARABIC LETTER VEH FINAL FORM" . 64363)
+ ("ARABIC LETTER VEH INITIAL FORM" . 64364)
+ ("ARABIC LETTER VEH MEDIAL FORM" . 64365)
+ ("ARABIC LETTER PEHEH ISOLATED FORM" . 64366)
+ ("ARABIC LETTER PEHEH FINAL FORM" . 64367)
+ ("ARABIC LETTER PEHEH INITIAL FORM" . 64368)
+ ("ARABIC LETTER PEHEH MEDIAL FORM" . 64369)
+ ("ARABIC LETTER DYEH ISOLATED FORM" . 64370)
+ ("ARABIC LETTER DYEH FINAL FORM" . 64371)
+ ("ARABIC LETTER DYEH INITIAL FORM" . 64372)
+ ("ARABIC LETTER DYEH MEDIAL FORM" . 64373)
+ ("ARABIC LETTER NYEH ISOLATED FORM" . 64374)
+ ("ARABIC LETTER NYEH FINAL FORM" . 64375)
+ ("ARABIC LETTER NYEH INITIAL FORM" . 64376)
+ ("ARABIC LETTER NYEH MEDIAL FORM" . 64377)
+ ("ARABIC LETTER TCHEH ISOLATED FORM" . 64378)
+ ("ARABIC LETTER TCHEH FINAL FORM" . 64379)
+ ("ARABIC LETTER TCHEH INITIAL FORM" . 64380)
+ ("ARABIC LETTER TCHEH MEDIAL FORM" . 64381)
+ ("ARABIC LETTER TCHEHEH ISOLATED FORM" . 64382)
+ ("ARABIC LETTER TCHEHEH FINAL FORM" . 64383)
+ ("ARABIC LETTER TCHEHEH INITIAL FORM" . 64384)
+ ("ARABIC LETTER TCHEHEH MEDIAL FORM" . 64385)
+ ("ARABIC LETTER DDAHAL ISOLATED FORM" . 64386)
+ ("ARABIC LETTER DDAHAL FINAL FORM" . 64387)
+ ("ARABIC LETTER DAHAL ISOLATED FORM" . 64388)
+ ("ARABIC LETTER DAHAL FINAL FORM" . 64389)
+ ("ARABIC LETTER DUL ISOLATED FORM" . 64390)
+ ("ARABIC LETTER DUL FINAL FORM" . 64391)
+ ("ARABIC LETTER DDAL ISOLATED FORM" . 64392)
+ ("ARABIC LETTER DDAL FINAL FORM" . 64393)
+ ("ARABIC LETTER JEH ISOLATED FORM" . 64394)
+ ("ARABIC LETTER JEH FINAL FORM" . 64395)
+ ("ARABIC LETTER RREH ISOLATED FORM" . 64396)
+ ("ARABIC LETTER RREH FINAL FORM" . 64397)
+ ("ARABIC LETTER KEHEH ISOLATED FORM" . 64398)
+ ("ARABIC LETTER KEHEH FINAL FORM" . 64399)
+ ("ARABIC LETTER KEHEH INITIAL FORM" . 64400)
+ ("ARABIC LETTER KEHEH MEDIAL FORM" . 64401)
+ ("ARABIC LETTER GAF ISOLATED FORM" . 64402)
+ ("ARABIC LETTER GAF FINAL FORM" . 64403)
+ ("ARABIC LETTER GAF INITIAL FORM" . 64404)
+ ("ARABIC LETTER GAF MEDIAL FORM" . 64405)
+ ("ARABIC LETTER GUEH ISOLATED FORM" . 64406)
+ ("ARABIC LETTER GUEH FINAL FORM" . 64407)
+ ("ARABIC LETTER GUEH INITIAL FORM" . 64408)
+ ("ARABIC LETTER GUEH MEDIAL FORM" . 64409)
+ ("ARABIC LETTER NGOEH ISOLATED FORM" . 64410)
+ ("ARABIC LETTER NGOEH FINAL FORM" . 64411)
+ ("ARABIC LETTER NGOEH INITIAL FORM" . 64412)
+ ("ARABIC LETTER NGOEH MEDIAL FORM" . 64413)
+ ("ARABIC LETTER NOON GHUNNA ISOLATED FORM" . 64414)
+ ("ARABIC LETTER NOON GHUNNA FINAL FORM" . 64415)
+ ("ARABIC LETTER RNOON ISOLATED FORM" . 64416)
+ ("ARABIC LETTER RNOON FINAL FORM" . 64417)
+ ("ARABIC LETTER RNOON INITIAL FORM" . 64418)
+ ("ARABIC LETTER RNOON MEDIAL FORM" . 64419)
+ ("ARABIC LETTER HEH WITH YEH ABOVE ISOLATED FORM" . 64420)
+ ("ARABIC LETTER HEH WITH YEH ABOVE FINAL FORM" . 64421)
+ ("ARABIC LETTER HEH GOAL ISOLATED FORM" . 64422)
+ ("ARABIC LETTER HEH GOAL FINAL FORM" . 64423)
+ ("ARABIC LETTER HEH GOAL INITIAL FORM" . 64424)
+ ("ARABIC LETTER HEH GOAL MEDIAL FORM" . 64425)
+ ("ARABIC LETTER HEH DOACHASHMEE ISOLATED FORM" . 64426)
+ ("ARABIC LETTER HEH DOACHASHMEE FINAL FORM" . 64427)
+ ("ARABIC LETTER HEH DOACHASHMEE INITIAL FORM" . 64428)
+ ("ARABIC LETTER HEH DOACHASHMEE MEDIAL FORM" . 64429)
+ ("ARABIC LETTER YEH BARREE ISOLATED FORM" . 64430)
+ ("ARABIC LETTER YEH BARREE FINAL FORM" . 64431)
+ ("ARABIC LETTER YEH BARREE WITH HAMZA ABOVE ISOLATED FORM" . 64432)
+ ("ARABIC LETTER YEH BARREE WITH HAMZA ABOVE FINAL FORM" . 64433)
+ ("ARABIC LETTER NG ISOLATED FORM" . 64467)
+ ("ARABIC LETTER NG FINAL FORM" . 64468)
+ ("ARABIC LETTER NG INITIAL FORM" . 64469)
+ ("ARABIC LETTER NG MEDIAL FORM" . 64470)
+ ("ARABIC LETTER U ISOLATED FORM" . 64471)
+ ("ARABIC LETTER U FINAL FORM" . 64472)
+ ("ARABIC LETTER OE ISOLATED FORM" . 64473)
+ ("ARABIC LETTER OE FINAL FORM" . 64474)
+ ("ARABIC LETTER YU ISOLATED FORM" . 64475)
+ ("ARABIC LETTER YU FINAL FORM" . 64476)
+ ("ARABIC LETTER U WITH HAMZA ABOVE ISOLATED FORM" . 64477)
+ ("ARABIC LETTER VE ISOLATED FORM" . 64478)
+ ("ARABIC LETTER VE FINAL FORM" . 64479)
+ ("ARABIC LETTER KIRGHIZ OE ISOLATED FORM" . 64480)
+ ("ARABIC LETTER KIRGHIZ OE FINAL FORM" . 64481)
+ ("ARABIC LETTER KIRGHIZ YU ISOLATED FORM" . 64482)
+ ("ARABIC LETTER KIRGHIZ YU FINAL FORM" . 64483)
+ ("ARABIC LETTER E ISOLATED FORM" . 64484)
+ ("ARABIC LETTER E FINAL FORM" . 64485)
+ ("ARABIC LETTER E INITIAL FORM" . 64486)
+ ("ARABIC LETTER E MEDIAL FORM" . 64487)
+ ("ARABIC LETTER UIGHUR KAZAKH KIRGHIZ ALEF MAKSURA INITIAL FORM" . 64488)
+ ("ARABIC LETTER UIGHUR KAZAKH KIRGHIZ ALEF MAKSURA MEDIAL FORM" . 64489)
+ ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH ALEF ISOLATED FORM" . 64490)
+ ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH ALEF FINAL FORM" . 64491)
+ ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH AE ISOLATED FORM" . 64492)
+ ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH AE FINAL FORM" . 64493)
+ ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH WAW ISOLATED FORM" . 64494)
+ ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH WAW FINAL FORM" . 64495)
+ ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH U ISOLATED FORM" . 64496)
+ ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH U FINAL FORM" . 64497)
+ ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH OE ISOLATED FORM" . 64498)
+ ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH OE FINAL FORM" . 64499)
+ ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH YU ISOLATED FORM" . 64500)
+ ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH YU FINAL FORM" . 64501)
+ ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH E ISOLATED FORM" . 64502)
+ ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH E FINAL FORM" . 64503)
+ ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH E INITIAL FORM" . 64504)
+ ("ARABIC LIGATURE UIGHUR KIRGHIZ YEH WITH HAMZA ABOVE WITH ALEF MAKSURA ISOLATED FORM" . 64505)
+ ("ARABIC LIGATURE UIGHUR KIRGHIZ YEH WITH HAMZA ABOVE WITH ALEF MAKSURA FINAL FORM" . 64506)
+ ("ARABIC LIGATURE UIGHUR KIRGHIZ YEH WITH HAMZA ABOVE WITH ALEF MAKSURA INITIAL FORM" . 64507)
+ ("ARABIC LETTER FARSI YEH ISOLATED FORM" . 64508)
+ ("ARABIC LETTER FARSI YEH FINAL FORM" . 64509)
+ ("ARABIC LETTER FARSI YEH INITIAL FORM" . 64510)
+ ("ARABIC LETTER FARSI YEH MEDIAL FORM" . 64511)
+ ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH JEEM ISOLATED FORM" . 64512)
+ ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH HAH ISOLATED FORM" . 64513)
+ ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH MEEM ISOLATED FORM" . 64514)
+ ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH ALEF MAKSURA ISOLATED FORM" . 64515)
+ ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH YEH ISOLATED FORM" . 64516)
+ ("ARABIC LIGATURE BEH WITH JEEM ISOLATED FORM" . 64517)
+ ("ARABIC LIGATURE BEH WITH HAH ISOLATED FORM" . 64518)
+ ("ARABIC LIGATURE BEH WITH KHAH ISOLATED FORM" . 64519)
+ ("ARABIC LIGATURE BEH WITH MEEM ISOLATED FORM" . 64520)
+ ("ARABIC LIGATURE BEH WITH ALEF MAKSURA ISOLATED FORM" . 64521)
+ ("ARABIC LIGATURE BEH WITH YEH ISOLATED FORM" . 64522)
+ ("ARABIC LIGATURE TEH WITH JEEM ISOLATED FORM" . 64523)
+ ("ARABIC LIGATURE TEH WITH HAH ISOLATED FORM" . 64524)
+ ("ARABIC LIGATURE TEH WITH KHAH ISOLATED FORM" . 64525)
+ ("ARABIC LIGATURE TEH WITH MEEM ISOLATED FORM" . 64526)
+ ("ARABIC LIGATURE TEH WITH ALEF MAKSURA ISOLATED FORM" . 64527)
+ ("ARABIC LIGATURE TEH WITH YEH ISOLATED FORM" . 64528)
+ ("ARABIC LIGATURE THEH WITH JEEM ISOLATED FORM" . 64529)
+ ("ARABIC LIGATURE THEH WITH MEEM ISOLATED FORM" . 64530)
+ ("ARABIC LIGATURE THEH WITH ALEF MAKSURA ISOLATED FORM" . 64531)
+ ("ARABIC LIGATURE THEH WITH YEH ISOLATED FORM" . 64532)
+ ("ARABIC LIGATURE JEEM WITH HAH ISOLATED FORM" . 64533)
+ ("ARABIC LIGATURE JEEM WITH MEEM ISOLATED FORM" . 64534)
+ ("ARABIC LIGATURE HAH WITH JEEM ISOLATED FORM" . 64535)
+ ("ARABIC LIGATURE HAH WITH MEEM ISOLATED FORM" . 64536)
+ ("ARABIC LIGATURE KHAH WITH JEEM ISOLATED FORM" . 64537)
+ ("ARABIC LIGATURE KHAH WITH HAH ISOLATED FORM" . 64538)
+ ("ARABIC LIGATURE KHAH WITH MEEM ISOLATED FORM" . 64539)
+ ("ARABIC LIGATURE SEEN WITH JEEM ISOLATED FORM" . 64540)
+ ("ARABIC LIGATURE SEEN WITH HAH ISOLATED FORM" . 64541)
+ ("ARABIC LIGATURE SEEN WITH KHAH ISOLATED FORM" . 64542)
+ ("ARABIC LIGATURE SEEN WITH MEEM ISOLATED FORM" . 64543)
+ ("ARABIC LIGATURE SAD WITH HAH ISOLATED FORM" . 64544)
+ ("ARABIC LIGATURE SAD WITH MEEM ISOLATED FORM" . 64545)
+ ("ARABIC LIGATURE DAD WITH JEEM ISOLATED FORM" . 64546)
+ ("ARABIC LIGATURE DAD WITH HAH ISOLATED FORM" . 64547)
+ ("ARABIC LIGATURE DAD WITH KHAH ISOLATED FORM" . 64548)
+ ("ARABIC LIGATURE DAD WITH MEEM ISOLATED FORM" . 64549)
+ ("ARABIC LIGATURE TAH WITH HAH ISOLATED FORM" . 64550)
+ ("ARABIC LIGATURE TAH WITH MEEM ISOLATED FORM" . 64551)
+ ("ARABIC LIGATURE ZAH WITH MEEM ISOLATED FORM" . 64552)
+ ("ARABIC LIGATURE AIN WITH JEEM ISOLATED FORM" . 64553)
+ ("ARABIC LIGATURE AIN WITH MEEM ISOLATED FORM" . 64554)
+ ("ARABIC LIGATURE GHAIN WITH JEEM ISOLATED FORM" . 64555)
+ ("ARABIC LIGATURE GHAIN WITH MEEM ISOLATED FORM" . 64556)
+ ("ARABIC LIGATURE FEH WITH JEEM ISOLATED FORM" . 64557)
+ ("ARABIC LIGATURE FEH WITH HAH ISOLATED FORM" . 64558)
+ ("ARABIC LIGATURE FEH WITH KHAH ISOLATED FORM" . 64559)
+ ("ARABIC LIGATURE FEH WITH MEEM ISOLATED FORM" . 64560)
+ ("ARABIC LIGATURE FEH WITH ALEF MAKSURA ISOLATED FORM" . 64561)
+ ("ARABIC LIGATURE FEH WITH YEH ISOLATED FORM" . 64562)
+ ("ARABIC LIGATURE QAF WITH HAH ISOLATED FORM" . 64563)
+ ("ARABIC LIGATURE QAF WITH MEEM ISOLATED FORM" . 64564)
+ ("ARABIC LIGATURE QAF WITH ALEF MAKSURA ISOLATED FORM" . 64565)
+ ("ARABIC LIGATURE QAF WITH YEH ISOLATED FORM" . 64566)
+ ("ARABIC LIGATURE KAF WITH ALEF ISOLATED FORM" . 64567)
+ ("ARABIC LIGATURE KAF WITH JEEM ISOLATED FORM" . 64568)
+ ("ARABIC LIGATURE KAF WITH HAH ISOLATED FORM" . 64569)
+ ("ARABIC LIGATURE KAF WITH KHAH ISOLATED FORM" . 64570)
+ ("ARABIC LIGATURE KAF WITH LAM ISOLATED FORM" . 64571)
+ ("ARABIC LIGATURE KAF WITH MEEM ISOLATED FORM" . 64572)
+ ("ARABIC LIGATURE KAF WITH ALEF MAKSURA ISOLATED FORM" . 64573)
+ ("ARABIC LIGATURE KAF WITH YEH ISOLATED FORM" . 64574)
+ ("ARABIC LIGATURE LAM WITH JEEM ISOLATED FORM" . 64575)
+ ("ARABIC LIGATURE LAM WITH HAH ISOLATED FORM" . 64576)
+ ("ARABIC LIGATURE LAM WITH KHAH ISOLATED FORM" . 64577)
+ ("ARABIC LIGATURE LAM WITH MEEM ISOLATED FORM" . 64578)
+ ("ARABIC LIGATURE LAM WITH ALEF MAKSURA ISOLATED FORM" . 64579)
+ ("ARABIC LIGATURE LAM WITH YEH ISOLATED FORM" . 64580)
+ ("ARABIC LIGATURE MEEM WITH JEEM ISOLATED FORM" . 64581)
+ ("ARABIC LIGATURE MEEM WITH HAH ISOLATED FORM" . 64582)
+ ("ARABIC LIGATURE MEEM WITH KHAH ISOLATED FORM" . 64583)
+ ("ARABIC LIGATURE MEEM WITH MEEM ISOLATED FORM" . 64584)
+ ("ARABIC LIGATURE MEEM WITH ALEF MAKSURA ISOLATED FORM" . 64585)
+ ("ARABIC LIGATURE MEEM WITH YEH ISOLATED FORM" . 64586)
+ ("ARABIC LIGATURE NOON WITH JEEM ISOLATED FORM" . 64587)
+ ("ARABIC LIGATURE NOON WITH HAH ISOLATED FORM" . 64588)
+ ("ARABIC LIGATURE NOON WITH KHAH ISOLATED FORM" . 64589)
+ ("ARABIC LIGATURE NOON WITH MEEM ISOLATED FORM" . 64590)
+ ("ARABIC LIGATURE NOON WITH ALEF MAKSURA ISOLATED FORM" . 64591)
+ ("ARABIC LIGATURE NOON WITH YEH ISOLATED FORM" . 64592)
+ ("ARABIC LIGATURE HEH WITH JEEM ISOLATED FORM" . 64593)
+ ("ARABIC LIGATURE HEH WITH MEEM ISOLATED FORM" . 64594)
+ ("ARABIC LIGATURE HEH WITH ALEF MAKSURA ISOLATED FORM" . 64595)
+ ("ARABIC LIGATURE HEH WITH YEH ISOLATED FORM" . 64596)
+ ("ARABIC LIGATURE YEH WITH JEEM ISOLATED FORM" . 64597)
+ ("ARABIC LIGATURE YEH WITH HAH ISOLATED FORM" . 64598)
+ ("ARABIC LIGATURE YEH WITH KHAH ISOLATED FORM" . 64599)
+ ("ARABIC LIGATURE YEH WITH MEEM ISOLATED FORM" . 64600)
+ ("ARABIC LIGATURE YEH WITH ALEF MAKSURA ISOLATED FORM" . 64601)
+ ("ARABIC LIGATURE YEH WITH YEH ISOLATED FORM" . 64602)
+ ("ARABIC LIGATURE THAL WITH SUPERSCRIPT ALEF ISOLATED FORM" . 64603)
+ ("ARABIC LIGATURE REH WITH SUPERSCRIPT ALEF ISOLATED FORM" . 64604)
+ ("ARABIC LIGATURE ALEF MAKSURA WITH SUPERSCRIPT ALEF ISOLATED FORM" . 64605)
+ ("ARABIC LIGATURE SHADDA WITH DAMMATAN ISOLATED FORM" . 64606)
+ ("ARABIC LIGATURE SHADDA WITH KASRATAN ISOLATED FORM" . 64607)
+ ("ARABIC LIGATURE SHADDA WITH FATHA ISOLATED FORM" . 64608)
+ ("ARABIC LIGATURE SHADDA WITH DAMMA ISOLATED FORM" . 64609)
+ ("ARABIC LIGATURE SHADDA WITH KASRA ISOLATED FORM" . 64610)
+ ("ARABIC LIGATURE SHADDA WITH SUPERSCRIPT ALEF ISOLATED FORM" . 64611)
+ ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH REH FINAL FORM" . 64612)
+ ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH ZAIN FINAL FORM" . 64613)
+ ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH MEEM FINAL FORM" . 64614)
+ ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH NOON FINAL FORM" . 64615)
+ ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH ALEF MAKSURA FINAL FORM" . 64616)
+ ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH YEH FINAL FORM" . 64617)
+ ("ARABIC LIGATURE BEH WITH REH FINAL FORM" . 64618)
+ ("ARABIC LIGATURE BEH WITH ZAIN FINAL FORM" . 64619)
+ ("ARABIC LIGATURE BEH WITH MEEM FINAL FORM" . 64620)
+ ("ARABIC LIGATURE BEH WITH NOON FINAL FORM" . 64621)
+ ("ARABIC LIGATURE BEH WITH ALEF MAKSURA FINAL FORM" . 64622)
+ ("ARABIC LIGATURE BEH WITH YEH FINAL FORM" . 64623)
+ ("ARABIC LIGATURE TEH WITH REH FINAL FORM" . 64624)
+ ("ARABIC LIGATURE TEH WITH ZAIN FINAL FORM" . 64625)
+ ("ARABIC LIGATURE TEH WITH MEEM FINAL FORM" . 64626)
+ ("ARABIC LIGATURE TEH WITH NOON FINAL FORM" . 64627)
+ ("ARABIC LIGATURE TEH WITH ALEF MAKSURA FINAL FORM" . 64628)
+ ("ARABIC LIGATURE TEH WITH YEH FINAL FORM" . 64629)
+ ("ARABIC LIGATURE THEH WITH REH FINAL FORM" . 64630)
+ ("ARABIC LIGATURE THEH WITH ZAIN FINAL FORM" . 64631)
+ ("ARABIC LIGATURE THEH WITH MEEM FINAL FORM" . 64632)
+ ("ARABIC LIGATURE THEH WITH NOON FINAL FORM" . 64633)
+ ("ARABIC LIGATURE THEH WITH ALEF MAKSURA FINAL FORM" . 64634)
+ ("ARABIC LIGATURE THEH WITH YEH FINAL FORM" . 64635)
+ ("ARABIC LIGATURE FEH WITH ALEF MAKSURA FINAL FORM" . 64636)
+ ("ARABIC LIGATURE FEH WITH YEH FINAL FORM" . 64637)
+ ("ARABIC LIGATURE QAF WITH ALEF MAKSURA FINAL FORM" . 64638)
+ ("ARABIC LIGATURE QAF WITH YEH FINAL FORM" . 64639)
+ ("ARABIC LIGATURE KAF WITH ALEF FINAL FORM" . 64640)
+ ("ARABIC LIGATURE KAF WITH LAM FINAL FORM" . 64641)
+ ("ARABIC LIGATURE KAF WITH MEEM FINAL FORM" . 64642)
+ ("ARABIC LIGATURE KAF WITH ALEF MAKSURA FINAL FORM" . 64643)
+ ("ARABIC LIGATURE KAF WITH YEH FINAL FORM" . 64644)
+ ("ARABIC LIGATURE LAM WITH MEEM FINAL FORM" . 64645)
+ ("ARABIC LIGATURE LAM WITH ALEF MAKSURA FINAL FORM" . 64646)
+ ("ARABIC LIGATURE LAM WITH YEH FINAL FORM" . 64647)
+ ("ARABIC LIGATURE MEEM WITH ALEF FINAL FORM" . 64648)
+ ("ARABIC LIGATURE MEEM WITH MEEM FINAL FORM" . 64649)
+ ("ARABIC LIGATURE NOON WITH REH FINAL FORM" . 64650)
+ ("ARABIC LIGATURE NOON WITH ZAIN FINAL FORM" . 64651)
+ ("ARABIC LIGATURE NOON WITH MEEM FINAL FORM" . 64652)
+ ("ARABIC LIGATURE NOON WITH NOON FINAL FORM" . 64653)
+ ("ARABIC LIGATURE NOON WITH ALEF MAKSURA FINAL FORM" . 64654)
+ ("ARABIC LIGATURE NOON WITH YEH FINAL FORM" . 64655)
+ ("ARABIC LIGATURE ALEF MAKSURA WITH SUPERSCRIPT ALEF FINAL FORM" . 64656)
+ ("ARABIC LIGATURE YEH WITH REH FINAL FORM" . 64657)
+ ("ARABIC LIGATURE YEH WITH ZAIN FINAL FORM" . 64658)
+ ("ARABIC LIGATURE YEH WITH MEEM FINAL FORM" . 64659)
+ ("ARABIC LIGATURE YEH WITH NOON FINAL FORM" . 64660)
+ ("ARABIC LIGATURE YEH WITH ALEF MAKSURA FINAL FORM" . 64661)
+ ("ARABIC LIGATURE YEH WITH YEH FINAL FORM" . 64662)
+ ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH JEEM INITIAL FORM" . 64663)
+ ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH HAH INITIAL FORM" . 64664)
+ ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH KHAH INITIAL FORM" . 64665)
+ ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH MEEM INITIAL FORM" . 64666)
+ ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH HEH INITIAL FORM" . 64667)
+ ("ARABIC LIGATURE BEH WITH JEEM INITIAL FORM" . 64668)
+ ("ARABIC LIGATURE BEH WITH HAH INITIAL FORM" . 64669)
+ ("ARABIC LIGATURE BEH WITH KHAH INITIAL FORM" . 64670)
+ ("ARABIC LIGATURE BEH WITH MEEM INITIAL FORM" . 64671)
+ ("ARABIC LIGATURE BEH WITH HEH INITIAL FORM" . 64672)
+ ("ARABIC LIGATURE TEH WITH JEEM INITIAL FORM" . 64673)
+ ("ARABIC LIGATURE TEH WITH HAH INITIAL FORM" . 64674)
+ ("ARABIC LIGATURE TEH WITH KHAH INITIAL FORM" . 64675)
+ ("ARABIC LIGATURE TEH WITH MEEM INITIAL FORM" . 64676)
+ ("ARABIC LIGATURE TEH WITH HEH INITIAL FORM" . 64677)
+ ("ARABIC LIGATURE THEH WITH MEEM INITIAL FORM" . 64678)
+ ("ARABIC LIGATURE JEEM WITH HAH INITIAL FORM" . 64679)
+ ("ARABIC LIGATURE JEEM WITH MEEM INITIAL FORM" . 64680)
+ ("ARABIC LIGATURE HAH WITH JEEM INITIAL FORM" . 64681)
+ ("ARABIC LIGATURE HAH WITH MEEM INITIAL FORM" . 64682)
+ ("ARABIC LIGATURE KHAH WITH JEEM INITIAL FORM" . 64683)
+ ("ARABIC LIGATURE KHAH WITH MEEM INITIAL FORM" . 64684)
+ ("ARABIC LIGATURE SEEN WITH JEEM INITIAL FORM" . 64685)
+ ("ARABIC LIGATURE SEEN WITH HAH INITIAL FORM" . 64686)
+ ("ARABIC LIGATURE SEEN WITH KHAH INITIAL FORM" . 64687)
+ ("ARABIC LIGATURE SEEN WITH MEEM INITIAL FORM" . 64688)
+ ("ARABIC LIGATURE SAD WITH HAH INITIAL FORM" . 64689)
+ ("ARABIC LIGATURE SAD WITH KHAH INITIAL FORM" . 64690)
+ ("ARABIC LIGATURE SAD WITH MEEM INITIAL FORM" . 64691)
+ ("ARABIC LIGATURE DAD WITH JEEM INITIAL FORM" . 64692)
+ ("ARABIC LIGATURE DAD WITH HAH INITIAL FORM" . 64693)
+ ("ARABIC LIGATURE DAD WITH KHAH INITIAL FORM" . 64694)
+ ("ARABIC LIGATURE DAD WITH MEEM INITIAL FORM" . 64695)
+ ("ARABIC LIGATURE TAH WITH HAH INITIAL FORM" . 64696)
+ ("ARABIC LIGATURE ZAH WITH MEEM INITIAL FORM" . 64697)
+ ("ARABIC LIGATURE AIN WITH JEEM INITIAL FORM" . 64698)
+ ("ARABIC LIGATURE AIN WITH MEEM INITIAL FORM" . 64699)
+ ("ARABIC LIGATURE GHAIN WITH JEEM INITIAL FORM" . 64700)
+ ("ARABIC LIGATURE GHAIN WITH MEEM INITIAL FORM" . 64701)
+ ("ARABIC LIGATURE FEH WITH JEEM INITIAL FORM" . 64702)
+ ("ARABIC LIGATURE FEH WITH HAH INITIAL FORM" . 64703)
+ ("ARABIC LIGATURE FEH WITH KHAH INITIAL FORM" . 64704)
+ ("ARABIC LIGATURE FEH WITH MEEM INITIAL FORM" . 64705)
+ ("ARABIC LIGATURE QAF WITH HAH INITIAL FORM" . 64706)
+ ("ARABIC LIGATURE QAF WITH MEEM INITIAL FORM" . 64707)
+ ("ARABIC LIGATURE KAF WITH JEEM INITIAL FORM" . 64708)
+ ("ARABIC LIGATURE KAF WITH HAH INITIAL FORM" . 64709)
+ ("ARABIC LIGATURE KAF WITH KHAH INITIAL FORM" . 64710)
+ ("ARABIC LIGATURE KAF WITH LAM INITIAL FORM" . 64711)
+ ("ARABIC LIGATURE KAF WITH MEEM INITIAL FORM" . 64712)
+ ("ARABIC LIGATURE LAM WITH JEEM INITIAL FORM" . 64713)
+ ("ARABIC LIGATURE LAM WITH HAH INITIAL FORM" . 64714)
+ ("ARABIC LIGATURE LAM WITH KHAH INITIAL FORM" . 64715)
+ ("ARABIC LIGATURE LAM WITH MEEM INITIAL FORM" . 64716)
+ ("ARABIC LIGATURE LAM WITH HEH INITIAL FORM" . 64717)
+ ("ARABIC LIGATURE MEEM WITH JEEM INITIAL FORM" . 64718)
+ ("ARABIC LIGATURE MEEM WITH HAH INITIAL FORM" . 64719)
+ ("ARABIC LIGATURE MEEM WITH KHAH INITIAL FORM" . 64720)
+ ("ARABIC LIGATURE MEEM WITH MEEM INITIAL FORM" . 64721)
+ ("ARABIC LIGATURE NOON WITH JEEM INITIAL FORM" . 64722)
+ ("ARABIC LIGATURE NOON WITH HAH INITIAL FORM" . 64723)
+ ("ARABIC LIGATURE NOON WITH KHAH INITIAL FORM" . 64724)
+ ("ARABIC LIGATURE NOON WITH MEEM INITIAL FORM" . 64725)
+ ("ARABIC LIGATURE NOON WITH HEH INITIAL FORM" . 64726)
+ ("ARABIC LIGATURE HEH WITH JEEM INITIAL FORM" . 64727)
+ ("ARABIC LIGATURE HEH WITH MEEM INITIAL FORM" . 64728)
+ ("ARABIC LIGATURE HEH WITH SUPERSCRIPT ALEF INITIAL FORM" . 64729)
+ ("ARABIC LIGATURE YEH WITH JEEM INITIAL FORM" . 64730)
+ ("ARABIC LIGATURE YEH WITH HAH INITIAL FORM" . 64731)
+ ("ARABIC LIGATURE YEH WITH KHAH INITIAL FORM" . 64732)
+ ("ARABIC LIGATURE YEH WITH MEEM INITIAL FORM" . 64733)
+ ("ARABIC LIGATURE YEH WITH HEH INITIAL FORM" . 64734)
+ ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH MEEM MEDIAL FORM" . 64735)
+ ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH HEH MEDIAL FORM" . 64736)
+ ("ARABIC LIGATURE BEH WITH MEEM MEDIAL FORM" . 64737)
+ ("ARABIC LIGATURE BEH WITH HEH MEDIAL FORM" . 64738)
+ ("ARABIC LIGATURE TEH WITH MEEM MEDIAL FORM" . 64739)
+ ("ARABIC LIGATURE TEH WITH HEH MEDIAL FORM" . 64740)
+ ("ARABIC LIGATURE THEH WITH MEEM MEDIAL FORM" . 64741)
+ ("ARABIC LIGATURE THEH WITH HEH MEDIAL FORM" . 64742)
+ ("ARABIC LIGATURE SEEN WITH MEEM MEDIAL FORM" . 64743)
+ ("ARABIC LIGATURE SEEN WITH HEH MEDIAL FORM" . 64744)
+ ("ARABIC LIGATURE SHEEN WITH MEEM MEDIAL FORM" . 64745)
+ ("ARABIC LIGATURE SHEEN WITH HEH MEDIAL FORM" . 64746)
+ ("ARABIC LIGATURE KAF WITH LAM MEDIAL FORM" . 64747)
+ ("ARABIC LIGATURE KAF WITH MEEM MEDIAL FORM" . 64748)
+ ("ARABIC LIGATURE LAM WITH MEEM MEDIAL FORM" . 64749)
+ ("ARABIC LIGATURE NOON WITH MEEM MEDIAL FORM" . 64750)
+ ("ARABIC LIGATURE NOON WITH HEH MEDIAL FORM" . 64751)
+ ("ARABIC LIGATURE YEH WITH MEEM MEDIAL FORM" . 64752)
+ ("ARABIC LIGATURE YEH WITH HEH MEDIAL FORM" . 64753)
+ ("ARABIC LIGATURE SHADDA WITH FATHA MEDIAL FORM" . 64754)
+ ("ARABIC LIGATURE SHADDA WITH DAMMA MEDIAL FORM" . 64755)
+ ("ARABIC LIGATURE SHADDA WITH KASRA MEDIAL FORM" . 64756)
+ ("ARABIC LIGATURE TAH WITH ALEF MAKSURA ISOLATED FORM" . 64757)
+ ("ARABIC LIGATURE TAH WITH YEH ISOLATED FORM" . 64758)
+ ("ARABIC LIGATURE AIN WITH ALEF MAKSURA ISOLATED FORM" . 64759)
+ ("ARABIC LIGATURE AIN WITH YEH ISOLATED FORM" . 64760)
+ ("ARABIC LIGATURE GHAIN WITH ALEF MAKSURA ISOLATED FORM" . 64761)
+ ("ARABIC LIGATURE GHAIN WITH YEH ISOLATED FORM" . 64762)
+ ("ARABIC LIGATURE SEEN WITH ALEF MAKSURA ISOLATED FORM" . 64763)
+ ("ARABIC LIGATURE SEEN WITH YEH ISOLATED FORM" . 64764)
+ ("ARABIC LIGATURE SHEEN WITH ALEF MAKSURA ISOLATED FORM" . 64765)
+ ("ARABIC LIGATURE SHEEN WITH YEH ISOLATED FORM" . 64766)
+ ("ARABIC LIGATURE HAH WITH ALEF MAKSURA ISOLATED FORM" . 64767)
+ ("ARABIC LIGATURE HAH WITH YEH ISOLATED FORM" . 64768)
+ ("ARABIC LIGATURE JEEM WITH ALEF MAKSURA ISOLATED FORM" . 64769)
+ ("ARABIC LIGATURE JEEM WITH YEH ISOLATED FORM" . 64770)
+ ("ARABIC LIGATURE KHAH WITH ALEF MAKSURA ISOLATED FORM" . 64771)
+ ("ARABIC LIGATURE KHAH WITH YEH ISOLATED FORM" . 64772)
+ ("ARABIC LIGATURE SAD WITH ALEF MAKSURA ISOLATED FORM" . 64773)
+ ("ARABIC LIGATURE SAD WITH YEH ISOLATED FORM" . 64774)
+ ("ARABIC LIGATURE DAD WITH ALEF MAKSURA ISOLATED FORM" . 64775)
+ ("ARABIC LIGATURE DAD WITH YEH ISOLATED FORM" . 64776)
+ ("ARABIC LIGATURE SHEEN WITH JEEM ISOLATED FORM" . 64777)
+ ("ARABIC LIGATURE SHEEN WITH HAH ISOLATED FORM" . 64778)
+ ("ARABIC LIGATURE SHEEN WITH KHAH ISOLATED FORM" . 64779)
+ ("ARABIC LIGATURE SHEEN WITH MEEM ISOLATED FORM" . 64780)
+ ("ARABIC LIGATURE SHEEN WITH REH ISOLATED FORM" . 64781)
+ ("ARABIC LIGATURE SEEN WITH REH ISOLATED FORM" . 64782)
+ ("ARABIC LIGATURE SAD WITH REH ISOLATED FORM" . 64783)
+ ("ARABIC LIGATURE DAD WITH REH ISOLATED FORM" . 64784)
+ ("ARABIC LIGATURE TAH WITH ALEF MAKSURA FINAL FORM" . 64785)
+ ("ARABIC LIGATURE TAH WITH YEH FINAL FORM" . 64786)
+ ("ARABIC LIGATURE AIN WITH ALEF MAKSURA FINAL FORM" . 64787)
+ ("ARABIC LIGATURE AIN WITH YEH FINAL FORM" . 64788)
+ ("ARABIC LIGATURE GHAIN WITH ALEF MAKSURA FINAL FORM" . 64789)
+ ("ARABIC LIGATURE GHAIN WITH YEH FINAL FORM" . 64790)
+ ("ARABIC LIGATURE SEEN WITH ALEF MAKSURA FINAL FORM" . 64791)
+ ("ARABIC LIGATURE SEEN WITH YEH FINAL FORM" . 64792)
+ ("ARABIC LIGATURE SHEEN WITH ALEF MAKSURA FINAL FORM" . 64793)
+ ("ARABIC LIGATURE SHEEN WITH YEH FINAL FORM" . 64794)
+ ("ARABIC LIGATURE HAH WITH ALEF MAKSURA FINAL FORM" . 64795)
+ ("ARABIC LIGATURE HAH WITH YEH FINAL FORM" . 64796)
+ ("ARABIC LIGATURE JEEM WITH ALEF MAKSURA FINAL FORM" . 64797)
+ ("ARABIC LIGATURE JEEM WITH YEH FINAL FORM" . 64798)
+ ("ARABIC LIGATURE KHAH WITH ALEF MAKSURA FINAL FORM" . 64799)
+ ("ARABIC LIGATURE KHAH WITH YEH FINAL FORM" . 64800)
+ ("ARABIC LIGATURE SAD WITH ALEF MAKSURA FINAL FORM" . 64801)
+ ("ARABIC LIGATURE SAD WITH YEH FINAL FORM" . 64802)
+ ("ARABIC LIGATURE DAD WITH ALEF MAKSURA FINAL FORM" . 64803)
+ ("ARABIC LIGATURE DAD WITH YEH FINAL FORM" . 64804)
+ ("ARABIC LIGATURE SHEEN WITH JEEM FINAL FORM" . 64805)
+ ("ARABIC LIGATURE SHEEN WITH HAH FINAL FORM" . 64806)
+ ("ARABIC LIGATURE SHEEN WITH KHAH FINAL FORM" . 64807)
+ ("ARABIC LIGATURE SHEEN WITH MEEM FINAL FORM" . 64808)
+ ("ARABIC LIGATURE SHEEN WITH REH FINAL FORM" . 64809)
+ ("ARABIC LIGATURE SEEN WITH REH FINAL FORM" . 64810)
+ ("ARABIC LIGATURE SAD WITH REH FINAL FORM" . 64811)
+ ("ARABIC LIGATURE DAD WITH REH FINAL FORM" . 64812)
+ ("ARABIC LIGATURE SHEEN WITH JEEM INITIAL FORM" . 64813)
+ ("ARABIC LIGATURE SHEEN WITH HAH INITIAL FORM" . 64814)
+ ("ARABIC LIGATURE SHEEN WITH KHAH INITIAL FORM" . 64815)
+ ("ARABIC LIGATURE SHEEN WITH MEEM INITIAL FORM" . 64816)
+ ("ARABIC LIGATURE SEEN WITH HEH INITIAL FORM" . 64817)
+ ("ARABIC LIGATURE SHEEN WITH HEH INITIAL FORM" . 64818)
+ ("ARABIC LIGATURE TAH WITH MEEM INITIAL FORM" . 64819)
+ ("ARABIC LIGATURE SEEN WITH JEEM MEDIAL FORM" . 64820)
+ ("ARABIC LIGATURE SEEN WITH HAH MEDIAL FORM" . 64821)
+ ("ARABIC LIGATURE SEEN WITH KHAH MEDIAL FORM" . 64822)
+ ("ARABIC LIGATURE SHEEN WITH JEEM MEDIAL FORM" . 64823)
+ ("ARABIC LIGATURE SHEEN WITH HAH MEDIAL FORM" . 64824)
+ ("ARABIC LIGATURE SHEEN WITH KHAH MEDIAL FORM" . 64825)
+ ("ARABIC LIGATURE TAH WITH MEEM MEDIAL FORM" . 64826)
+ ("ARABIC LIGATURE ZAH WITH MEEM MEDIAL FORM" . 64827)
+ ("ARABIC LIGATURE ALEF WITH FATHATAN FINAL FORM" . 64828)
+ ("ARABIC LIGATURE ALEF WITH FATHATAN ISOLATED FORM" . 64829)
+ ("ORNATE LEFT PARENTHESIS" . 64830)
+ ("ORNATE RIGHT PARENTHESIS" . 64831)
+ ("ARABIC LIGATURE TEH WITH JEEM WITH MEEM INITIAL FORM" . 64848)
+ ("ARABIC LIGATURE TEH WITH HAH WITH JEEM FINAL FORM" . 64849)
+ ("ARABIC LIGATURE TEH WITH HAH WITH JEEM INITIAL FORM" . 64850)
+ ("ARABIC LIGATURE TEH WITH HAH WITH MEEM INITIAL FORM" . 64851)
+ ("ARABIC LIGATURE TEH WITH KHAH WITH MEEM INITIAL FORM" . 64852)
+ ("ARABIC LIGATURE TEH WITH MEEM WITH JEEM INITIAL FORM" . 64853)
+ ("ARABIC LIGATURE TEH WITH MEEM WITH HAH INITIAL FORM" . 64854)
+ ("ARABIC LIGATURE TEH WITH MEEM WITH KHAH INITIAL FORM" . 64855)
+ ("ARABIC LIGATURE JEEM WITH MEEM WITH HAH FINAL FORM" . 64856)
+ ("ARABIC LIGATURE JEEM WITH MEEM WITH HAH INITIAL FORM" . 64857)
+ ("ARABIC LIGATURE HAH WITH MEEM WITH YEH FINAL FORM" . 64858)
+ ("ARABIC LIGATURE HAH WITH MEEM WITH ALEF MAKSURA FINAL FORM" . 64859)
+ ("ARABIC LIGATURE SEEN WITH HAH WITH JEEM INITIAL FORM" . 64860)
+ ("ARABIC LIGATURE SEEN WITH JEEM WITH HAH INITIAL FORM" . 64861)
+ ("ARABIC LIGATURE SEEN WITH JEEM WITH ALEF MAKSURA FINAL FORM" . 64862)
+ ("ARABIC LIGATURE SEEN WITH MEEM WITH HAH FINAL FORM" . 64863)
+ ("ARABIC LIGATURE SEEN WITH MEEM WITH HAH INITIAL FORM" . 64864)
+ ("ARABIC LIGATURE SEEN WITH MEEM WITH JEEM INITIAL FORM" . 64865)
+ ("ARABIC LIGATURE SEEN WITH MEEM WITH MEEM FINAL FORM" . 64866)
+ ("ARABIC LIGATURE SEEN WITH MEEM WITH MEEM INITIAL FORM" . 64867)
+ ("ARABIC LIGATURE SAD WITH HAH WITH HAH FINAL FORM" . 64868)
+ ("ARABIC LIGATURE SAD WITH HAH WITH HAH INITIAL FORM" . 64869)
+ ("ARABIC LIGATURE SAD WITH MEEM WITH MEEM FINAL FORM" . 64870)
+ ("ARABIC LIGATURE SHEEN WITH HAH WITH MEEM FINAL FORM" . 64871)
+ ("ARABIC LIGATURE SHEEN WITH HAH WITH MEEM INITIAL FORM" . 64872)
+ ("ARABIC LIGATURE SHEEN WITH JEEM WITH YEH FINAL FORM" . 64873)
+ ("ARABIC LIGATURE SHEEN WITH MEEM WITH KHAH FINAL FORM" . 64874)
+ ("ARABIC LIGATURE SHEEN WITH MEEM WITH KHAH INITIAL FORM" . 64875)
+ ("ARABIC LIGATURE SHEEN WITH MEEM WITH MEEM FINAL FORM" . 64876)
+ ("ARABIC LIGATURE SHEEN WITH MEEM WITH MEEM INITIAL FORM" . 64877)
+ ("ARABIC LIGATURE DAD WITH HAH WITH ALEF MAKSURA FINAL FORM" . 64878)
+ ("ARABIC LIGATURE DAD WITH KHAH WITH MEEM FINAL FORM" . 64879)
+ ("ARABIC LIGATURE DAD WITH KHAH WITH MEEM INITIAL FORM" . 64880)
+ ("ARABIC LIGATURE TAH WITH MEEM WITH HAH FINAL FORM" . 64881)
+ ("ARABIC LIGATURE TAH WITH MEEM WITH HAH INITIAL FORM" . 64882)
+ ("ARABIC LIGATURE TAH WITH MEEM WITH MEEM INITIAL FORM" . 64883)
+ ("ARABIC LIGATURE TAH WITH MEEM WITH YEH FINAL FORM" . 64884)
+ ("ARABIC LIGATURE AIN WITH JEEM WITH MEEM FINAL FORM" . 64885)
+ ("ARABIC LIGATURE AIN WITH MEEM WITH MEEM FINAL FORM" . 64886)
+ ("ARABIC LIGATURE AIN WITH MEEM WITH MEEM INITIAL FORM" . 64887)
+ ("ARABIC LIGATURE AIN WITH MEEM WITH ALEF MAKSURA FINAL FORM" . 64888)
+ ("ARABIC LIGATURE GHAIN WITH MEEM WITH MEEM FINAL FORM" . 64889)
+ ("ARABIC LIGATURE GHAIN WITH MEEM WITH YEH FINAL FORM" . 64890)
+ ("ARABIC LIGATURE GHAIN WITH MEEM WITH ALEF MAKSURA FINAL FORM" . 64891)
+ ("ARABIC LIGATURE FEH WITH KHAH WITH MEEM FINAL FORM" . 64892)
+ ("ARABIC LIGATURE FEH WITH KHAH WITH MEEM INITIAL FORM" . 64893)
+ ("ARABIC LIGATURE QAF WITH MEEM WITH HAH FINAL FORM" . 64894)
+ ("ARABIC LIGATURE QAF WITH MEEM WITH MEEM FINAL FORM" . 64895)
+ ("ARABIC LIGATURE LAM WITH HAH WITH MEEM FINAL FORM" . 64896)
+ ("ARABIC LIGATURE LAM WITH HAH WITH YEH FINAL FORM" . 64897)
+ ("ARABIC LIGATURE LAM WITH HAH WITH ALEF MAKSURA FINAL FORM" . 64898)
+ ("ARABIC LIGATURE LAM WITH JEEM WITH JEEM INITIAL FORM" . 64899)
+ ("ARABIC LIGATURE LAM WITH JEEM WITH JEEM FINAL FORM" . 64900)
+ ("ARABIC LIGATURE LAM WITH KHAH WITH MEEM FINAL FORM" . 64901)
+ ("ARABIC LIGATURE LAM WITH KHAH WITH MEEM INITIAL FORM" . 64902)
+ ("ARABIC LIGATURE LAM WITH MEEM WITH HAH FINAL FORM" . 64903)
+ ("ARABIC LIGATURE LAM WITH MEEM WITH HAH INITIAL FORM" . 64904)
+ ("ARABIC LIGATURE MEEM WITH HAH WITH JEEM INITIAL FORM" . 64905)
+ ("ARABIC LIGATURE MEEM WITH HAH WITH MEEM INITIAL FORM" . 64906)
+ ("ARABIC LIGATURE MEEM WITH HAH WITH YEH FINAL FORM" . 64907)
+ ("ARABIC LIGATURE MEEM WITH JEEM WITH HAH INITIAL FORM" . 64908)
+ ("ARABIC LIGATURE MEEM WITH JEEM WITH MEEM INITIAL FORM" . 64909)
+ ("ARABIC LIGATURE MEEM WITH KHAH WITH JEEM INITIAL FORM" . 64910)
+ ("ARABIC LIGATURE MEEM WITH KHAH WITH MEEM INITIAL FORM" . 64911)
+ ("ARABIC LIGATURE MEEM WITH JEEM WITH KHAH INITIAL FORM" . 64914)
+ ("ARABIC LIGATURE HEH WITH MEEM WITH JEEM INITIAL FORM" . 64915)
+ ("ARABIC LIGATURE HEH WITH MEEM WITH MEEM INITIAL FORM" . 64916)
+ ("ARABIC LIGATURE NOON WITH HAH WITH MEEM INITIAL FORM" . 64917)
+ ("ARABIC LIGATURE NOON WITH HAH WITH ALEF MAKSURA FINAL FORM" . 64918)
+ ("ARABIC LIGATURE NOON WITH JEEM WITH MEEM FINAL FORM" . 64919)
+ ("ARABIC LIGATURE NOON WITH JEEM WITH MEEM INITIAL FORM" . 64920)
+ ("ARABIC LIGATURE NOON WITH JEEM WITH ALEF MAKSURA FINAL FORM" . 64921)
+ ("ARABIC LIGATURE NOON WITH MEEM WITH YEH FINAL FORM" . 64922)
+ ("ARABIC LIGATURE NOON WITH MEEM WITH ALEF MAKSURA FINAL FORM" . 64923)
+ ("ARABIC LIGATURE YEH WITH MEEM WITH MEEM FINAL FORM" . 64924)
+ ("ARABIC LIGATURE YEH WITH MEEM WITH MEEM INITIAL FORM" . 64925)
+ ("ARABIC LIGATURE BEH WITH KHAH WITH YEH FINAL FORM" . 64926)
+ ("ARABIC LIGATURE TEH WITH JEEM WITH YEH FINAL FORM" . 64927)
+ ("ARABIC LIGATURE TEH WITH JEEM WITH ALEF MAKSURA FINAL FORM" . 64928)
+ ("ARABIC LIGATURE TEH WITH KHAH WITH YEH FINAL FORM" . 64929)
+ ("ARABIC LIGATURE TEH WITH KHAH WITH ALEF MAKSURA FINAL FORM" . 64930)
+ ("ARABIC LIGATURE TEH WITH MEEM WITH YEH FINAL FORM" . 64931)
+ ("ARABIC LIGATURE TEH WITH MEEM WITH ALEF MAKSURA FINAL FORM" . 64932)
+ ("ARABIC LIGATURE JEEM WITH MEEM WITH YEH FINAL FORM" . 64933)
+ ("ARABIC LIGATURE JEEM WITH HAH WITH ALEF MAKSURA FINAL FORM" . 64934)
+ ("ARABIC LIGATURE JEEM WITH MEEM WITH ALEF MAKSURA FINAL FORM" . 64935)
+ ("ARABIC LIGATURE SEEN WITH KHAH WITH ALEF MAKSURA FINAL FORM" . 64936)
+ ("ARABIC LIGATURE SAD WITH HAH WITH YEH FINAL FORM" . 64937)
+ ("ARABIC LIGATURE SHEEN WITH HAH WITH YEH FINAL FORM" . 64938)
+ ("ARABIC LIGATURE DAD WITH HAH WITH YEH FINAL FORM" . 64939)
+ ("ARABIC LIGATURE LAM WITH JEEM WITH YEH FINAL FORM" . 64940)
+ ("ARABIC LIGATURE LAM WITH MEEM WITH YEH FINAL FORM" . 64941)
+ ("ARABIC LIGATURE YEH WITH HAH WITH YEH FINAL FORM" . 64942)
+ ("ARABIC LIGATURE YEH WITH JEEM WITH YEH FINAL FORM" . 64943)
+ ("ARABIC LIGATURE YEH WITH MEEM WITH YEH FINAL FORM" . 64944)
+ ("ARABIC LIGATURE MEEM WITH MEEM WITH YEH FINAL FORM" . 64945)
+ ("ARABIC LIGATURE QAF WITH MEEM WITH YEH FINAL FORM" . 64946)
+ ("ARABIC LIGATURE NOON WITH HAH WITH YEH FINAL FORM" . 64947)
+ ("ARABIC LIGATURE QAF WITH MEEM WITH HAH INITIAL FORM" . 64948)
+ ("ARABIC LIGATURE LAM WITH HAH WITH MEEM INITIAL FORM" . 64949)
+ ("ARABIC LIGATURE AIN WITH MEEM WITH YEH FINAL FORM" . 64950)
+ ("ARABIC LIGATURE KAF WITH MEEM WITH YEH FINAL FORM" . 64951)
+ ("ARABIC LIGATURE NOON WITH JEEM WITH HAH INITIAL FORM" . 64952)
+ ("ARABIC LIGATURE MEEM WITH KHAH WITH YEH FINAL FORM" . 64953)
+ ("ARABIC LIGATURE LAM WITH JEEM WITH MEEM INITIAL FORM" . 64954)
+ ("ARABIC LIGATURE KAF WITH MEEM WITH MEEM FINAL FORM" . 64955)
+ ("ARABIC LIGATURE LAM WITH JEEM WITH MEEM FINAL FORM" . 64956)
+ ("ARABIC LIGATURE NOON WITH JEEM WITH HAH FINAL FORM" . 64957)
+ ("ARABIC LIGATURE JEEM WITH HAH WITH YEH FINAL FORM" . 64958)
+ ("ARABIC LIGATURE HAH WITH JEEM WITH YEH FINAL FORM" . 64959)
+ ("ARABIC LIGATURE MEEM WITH JEEM WITH YEH FINAL FORM" . 64960)
+ ("ARABIC LIGATURE FEH WITH MEEM WITH YEH FINAL FORM" . 64961)
+ ("ARABIC LIGATURE BEH WITH HAH WITH YEH FINAL FORM" . 64962)
+ ("ARABIC LIGATURE KAF WITH MEEM WITH MEEM INITIAL FORM" . 64963)
+ ("ARABIC LIGATURE AIN WITH JEEM WITH MEEM INITIAL FORM" . 64964)
+ ("ARABIC LIGATURE SAD WITH MEEM WITH MEEM INITIAL FORM" . 64965)
+ ("ARABIC LIGATURE SEEN WITH KHAH WITH YEH FINAL FORM" . 64966)
+ ("ARABIC LIGATURE NOON WITH JEEM WITH YEH FINAL FORM" . 64967)
+ ("ARABIC LIGATURE SALLA USED AS KORANIC STOP SIGN ISOLATED FORM" . 65008)
+ ("ARABIC LIGATURE QALA USED AS KORANIC STOP SIGN ISOLATED FORM" . 65009)
+ ("ARABIC LIGATURE ALLAH ISOLATED FORM" . 65010)
+ ("ARABIC LIGATURE AKBAR ISOLATED FORM" . 65011)
+ ("ARABIC LIGATURE MOHAMMAD ISOLATED FORM" . 65012)
+ ("ARABIC LIGATURE SALAM ISOLATED FORM" . 65013)
+ ("ARABIC LIGATURE RASOUL ISOLATED FORM" . 65014)
+ ("ARABIC LIGATURE ALAYHE ISOLATED FORM" . 65015)
+ ("ARABIC LIGATURE WASALLAM ISOLATED FORM" . 65016)
+ ("ARABIC LIGATURE SALLA ISOLATED FORM" . 65017)
+ ("ARABIC LIGATURE SALLALLAHOU ALAYHE WASALLAM" . 65018)
+ ("ARABIC LIGATURE JALLAJALALOUHOU" . 65019)
+ ("RIAL SIGN" . 65020)
+ ("VARIATION SELECTOR-1" . 65024)
+ ("VARIATION SELECTOR-2" . 65025)
+ ("VARIATION SELECTOR-3" . 65026)
+ ("VARIATION SELECTOR-4" . 65027)
+ ("VARIATION SELECTOR-5" . 65028)
+ ("VARIATION SELECTOR-6" . 65029)
+ ("VARIATION SELECTOR-7" . 65030)
+ ("VARIATION SELECTOR-8" . 65031)
+ ("VARIATION SELECTOR-9" . 65032)
+ ("VARIATION SELECTOR-10" . 65033)
+ ("VARIATION SELECTOR-11" . 65034)
+ ("VARIATION SELECTOR-12" . 65035)
+ ("VARIATION SELECTOR-13" . 65036)
+ ("VARIATION SELECTOR-14" . 65037)
+ ("VARIATION SELECTOR-15" . 65038)
+ ("VARIATION SELECTOR-16" . 65039)
+ ("COMBINING LIGATURE LEFT HALF" . 65056)
+ ("COMBINING LIGATURE RIGHT HALF" . 65057)
+ ("COMBINING DOUBLE TILDE LEFT HALF" . 65058)
+ ("COMBINING DOUBLE TILDE RIGHT HALF" . 65059)
+ ("PRESENTATION FORM FOR VERTICAL TWO DOT LEADER" . 65072)
+ ("PRESENTATION FORM FOR VERTICAL EM DASH" . 65073)
+ ("PRESENTATION FORM FOR VERTICAL EN DASH" . 65074)
+ ("PRESENTATION FORM FOR VERTICAL LOW LINE" . 65075)
+ ("PRESENTATION FORM FOR VERTICAL WAVY LOW LINE" . 65076)
+ ("PRESENTATION FORM FOR VERTICAL LEFT PARENTHESIS" . 65077)
+ ("PRESENTATION FORM FOR VERTICAL RIGHT PARENTHESIS" . 65078)
+ ("PRESENTATION FORM FOR VERTICAL LEFT CURLY BRACKET" . 65079)
+ ("PRESENTATION FORM FOR VERTICAL RIGHT CURLY BRACKET" . 65080)
+ ("PRESENTATION FORM FOR VERTICAL LEFT TORTOISE SHELL BRACKET" . 65081)
+ ("PRESENTATION FORM FOR VERTICAL RIGHT TORTOISE SHELL BRACKET" . 65082)
+ ("PRESENTATION FORM FOR VERTICAL LEFT BLACK LENTICULAR BRACKET" . 65083)
+ ("PRESENTATION FORM FOR VERTICAL RIGHT BLACK LENTICULAR BRACKET" . 65084)
+ ("PRESENTATION FORM FOR VERTICAL LEFT DOUBLE ANGLE BRACKET" . 65085)
+ ("PRESENTATION FORM FOR VERTICAL RIGHT DOUBLE ANGLE BRACKET" . 65086)
+ ("PRESENTATION FORM FOR VERTICAL LEFT ANGLE BRACKET" . 65087)
+ ("PRESENTATION FORM FOR VERTICAL RIGHT ANGLE BRACKET" . 65088)
+ ("PRESENTATION FORM FOR VERTICAL LEFT CORNER BRACKET" . 65089)
+ ("PRESENTATION FORM FOR VERTICAL RIGHT CORNER BRACKET" . 65090)
+ ("PRESENTATION FORM FOR VERTICAL LEFT WHITE CORNER BRACKET" . 65091)
+ ("PRESENTATION FORM FOR VERTICAL RIGHT WHITE CORNER BRACKET" . 65092)
+ ("SESAME DOT" . 65093)
+ ("WHITE SESAME DOT" . 65094)
+ ("DASHED OVERLINE" . 65097)
+ ("CENTRELINE OVERLINE" . 65098)
+ ("WAVY OVERLINE" . 65099)
+ ("DOUBLE WAVY OVERLINE" . 65100)
+ ("DASHED LOW LINE" . 65101)
+ ("CENTRELINE LOW LINE" . 65102)
+ ("WAVY LOW LINE" . 65103)
+ ("SMALL COMMA" . 65104)
+ ("SMALL IDEOGRAPHIC COMMA" . 65105)
+ ("SMALL FULL STOP" . 65106)
+ ("SMALL SEMICOLON" . 65108)
+ ("SMALL COLON" . 65109)
+ ("SMALL QUESTION MARK" . 65110)
+ ("SMALL EXCLAMATION MARK" . 65111)
+ ("SMALL EM DASH" . 65112)
+ ("SMALL LEFT PARENTHESIS" . 65113)
+ ("SMALL RIGHT PARENTHESIS" . 65114)
+ ("SMALL LEFT CURLY BRACKET" . 65115)
+ ("SMALL RIGHT CURLY BRACKET" . 65116)
+ ("SMALL LEFT TORTOISE SHELL BRACKET" . 65117)
+ ("SMALL RIGHT TORTOISE SHELL BRACKET" . 65118)
+ ("SMALL NUMBER SIGN" . 65119)
+ ("SMALL AMPERSAND" . 65120)
+ ("SMALL ASTERISK" . 65121)
+ ("SMALL PLUS SIGN" . 65122)
+ ("SMALL HYPHEN-MINUS" . 65123)
+ ("SMALL LESS-THAN SIGN" . 65124)
+ ("SMALL GREATER-THAN SIGN" . 65125)
+ ("SMALL EQUALS SIGN" . 65126)
+ ("SMALL REVERSE SOLIDUS" . 65128)
+ ("SMALL DOLLAR SIGN" . 65129)
+ ("SMALL PERCENT SIGN" . 65130)
+ ("SMALL COMMERCIAL AT" . 65131)
+ ("ARABIC FATHATAN ISOLATED FORM" . 65136)
+ ("ARABIC TATWEEL WITH FATHATAN ABOVE" . 65137)
+ ("ARABIC DAMMATAN ISOLATED FORM" . 65138)
+ ("ARABIC TAIL FRAGMENT" . 65139)
+ ("ARABIC KASRATAN ISOLATED FORM" . 65140)
+ ("ARABIC FATHA ISOLATED FORM" . 65142)
+ ("ARABIC FATHA MEDIAL FORM" . 65143)
+ ("ARABIC DAMMA ISOLATED FORM" . 65144)
+ ("ARABIC DAMMA MEDIAL FORM" . 65145)
+ ("ARABIC KASRA ISOLATED FORM" . 65146)
+ ("ARABIC KASRA MEDIAL FORM" . 65147)
+ ("ARABIC SHADDA ISOLATED FORM" . 65148)
+ ("ARABIC SHADDA MEDIAL FORM" . 65149)
+ ("ARABIC SUKUN ISOLATED FORM" . 65150)
+ ("ARABIC SUKUN MEDIAL FORM" . 65151)
+ ("ARABIC LETTER HAMZA ISOLATED FORM" . 65152)
+ ("ARABIC LETTER ALEF WITH MADDA ABOVE ISOLATED FORM" . 65153)
+ ("ARABIC LETTER ALEF WITH MADDA ABOVE FINAL FORM" . 65154)
+ ("ARABIC LETTER ALEF WITH HAMZA ABOVE ISOLATED FORM" . 65155)
+ ("ARABIC LETTER ALEF WITH HAMZA ABOVE FINAL FORM" . 65156)
+ ("ARABIC LETTER WAW WITH HAMZA ABOVE ISOLATED FORM" . 65157)
+ ("ARABIC LETTER WAW WITH HAMZA ABOVE FINAL FORM" . 65158)
+ ("ARABIC LETTER ALEF WITH HAMZA BELOW ISOLATED FORM" . 65159)
+ ("ARABIC LETTER ALEF WITH HAMZA BELOW FINAL FORM" . 65160)
+ ("ARABIC LETTER YEH WITH HAMZA ABOVE ISOLATED FORM" . 65161)
+ ("ARABIC LETTER YEH WITH HAMZA ABOVE FINAL FORM" . 65162)
+ ("ARABIC LETTER YEH WITH HAMZA ABOVE INITIAL FORM" . 65163)
+ ("ARABIC LETTER YEH WITH HAMZA ABOVE MEDIAL FORM" . 65164)
+ ("ARABIC LETTER ALEF ISOLATED FORM" . 65165)
+ ("ARABIC LETTER ALEF FINAL FORM" . 65166)
+ ("ARABIC LETTER BEH ISOLATED FORM" . 65167)
+ ("ARABIC LETTER BEH FINAL FORM" . 65168)
+ ("ARABIC LETTER BEH INITIAL FORM" . 65169)
+ ("ARABIC LETTER BEH MEDIAL FORM" . 65170)
+ ("ARABIC LETTER TEH MARBUTA ISOLATED FORM" . 65171)
+ ("ARABIC LETTER TEH MARBUTA FINAL FORM" . 65172)
+ ("ARABIC LETTER TEH ISOLATED FORM" . 65173)
+ ("ARABIC LETTER TEH FINAL FORM" . 65174)
+ ("ARABIC LETTER TEH INITIAL FORM" . 65175)
+ ("ARABIC LETTER TEH MEDIAL FORM" . 65176)
+ ("ARABIC LETTER THEH ISOLATED FORM" . 65177)
+ ("ARABIC LETTER THEH FINAL FORM" . 65178)
+ ("ARABIC LETTER THEH INITIAL FORM" . 65179)
+ ("ARABIC LETTER THEH MEDIAL FORM" . 65180)
+ ("ARABIC LETTER JEEM ISOLATED FORM" . 65181)
+ ("ARABIC LETTER JEEM FINAL FORM" . 65182)
+ ("ARABIC LETTER JEEM INITIAL FORM" . 65183)
+ ("ARABIC LETTER JEEM MEDIAL FORM" . 65184)
+ ("ARABIC LETTER HAH ISOLATED FORM" . 65185)
+ ("ARABIC LETTER HAH FINAL FORM" . 65186)
+ ("ARABIC LETTER HAH INITIAL FORM" . 65187)
+ ("ARABIC LETTER HAH MEDIAL FORM" . 65188)
+ ("ARABIC LETTER KHAH ISOLATED FORM" . 65189)
+ ("ARABIC LETTER KHAH FINAL FORM" . 65190)
+ ("ARABIC LETTER KHAH INITIAL FORM" . 65191)
+ ("ARABIC LETTER KHAH MEDIAL FORM" . 65192)
+ ("ARABIC LETTER DAL ISOLATED FORM" . 65193)
+ ("ARABIC LETTER DAL FINAL FORM" . 65194)
+ ("ARABIC LETTER THAL ISOLATED FORM" . 65195)
+ ("ARABIC LETTER THAL FINAL FORM" . 65196)
+ ("ARABIC LETTER REH ISOLATED FORM" . 65197)
+ ("ARABIC LETTER REH FINAL FORM" . 65198)
+ ("ARABIC LETTER ZAIN ISOLATED FORM" . 65199)
+ ("ARABIC LETTER ZAIN FINAL FORM" . 65200)
+ ("ARABIC LETTER SEEN ISOLATED FORM" . 65201)
+ ("ARABIC LETTER SEEN FINAL FORM" . 65202)
+ ("ARABIC LETTER SEEN INITIAL FORM" . 65203)
+ ("ARABIC LETTER SEEN MEDIAL FORM" . 65204)
+ ("ARABIC LETTER SHEEN ISOLATED FORM" . 65205)
+ ("ARABIC LETTER SHEEN FINAL FORM" . 65206)
+ ("ARABIC LETTER SHEEN INITIAL FORM" . 65207)
+ ("ARABIC LETTER SHEEN MEDIAL FORM" . 65208)
+ ("ARABIC LETTER SAD ISOLATED FORM" . 65209)
+ ("ARABIC LETTER SAD FINAL FORM" . 65210)
+ ("ARABIC LETTER SAD INITIAL FORM" . 65211)
+ ("ARABIC LETTER SAD MEDIAL FORM" . 65212)
+ ("ARABIC LETTER DAD ISOLATED FORM" . 65213)
+ ("ARABIC LETTER DAD FINAL FORM" . 65214)
+ ("ARABIC LETTER DAD INITIAL FORM" . 65215)
+ ("ARABIC LETTER DAD MEDIAL FORM" . 65216)
+ ("ARABIC LETTER TAH ISOLATED FORM" . 65217)
+ ("ARABIC LETTER TAH FINAL FORM" . 65218)
+ ("ARABIC LETTER TAH INITIAL FORM" . 65219)
+ ("ARABIC LETTER TAH MEDIAL FORM" . 65220)
+ ("ARABIC LETTER ZAH ISOLATED FORM" . 65221)
+ ("ARABIC LETTER ZAH FINAL FORM" . 65222)
+ ("ARABIC LETTER ZAH INITIAL FORM" . 65223)
+ ("ARABIC LETTER ZAH MEDIAL FORM" . 65224)
+ ("ARABIC LETTER AIN ISOLATED FORM" . 65225)
+ ("ARABIC LETTER AIN FINAL FORM" . 65226)
+ ("ARABIC LETTER AIN INITIAL FORM" . 65227)
+ ("ARABIC LETTER AIN MEDIAL FORM" . 65228)
+ ("ARABIC LETTER GHAIN ISOLATED FORM" . 65229)
+ ("ARABIC LETTER GHAIN FINAL FORM" . 65230)
+ ("ARABIC LETTER GHAIN INITIAL FORM" . 65231)
+ ("ARABIC LETTER GHAIN MEDIAL FORM" . 65232)
+ ("ARABIC LETTER FEH ISOLATED FORM" . 65233)
+ ("ARABIC LETTER FEH FINAL FORM" . 65234)
+ ("ARABIC LETTER FEH INITIAL FORM" . 65235)
+ ("ARABIC LETTER FEH MEDIAL FORM" . 65236)
+ ("ARABIC LETTER QAF ISOLATED FORM" . 65237)
+ ("ARABIC LETTER QAF FINAL FORM" . 65238)
+ ("ARABIC LETTER QAF INITIAL FORM" . 65239)
+ ("ARABIC LETTER QAF MEDIAL FORM" . 65240)
+ ("ARABIC LETTER KAF ISOLATED FORM" . 65241)
+ ("ARABIC LETTER KAF FINAL FORM" . 65242)
+ ("ARABIC LETTER KAF INITIAL FORM" . 65243)
+ ("ARABIC LETTER KAF MEDIAL FORM" . 65244)
+ ("ARABIC LETTER LAM ISOLATED FORM" . 65245)
+ ("ARABIC LETTER LAM FINAL FORM" . 65246)
+ ("ARABIC LETTER LAM INITIAL FORM" . 65247)
+ ("ARABIC LETTER LAM MEDIAL FORM" . 65248)
+ ("ARABIC LETTER MEEM ISOLATED FORM" . 65249)
+ ("ARABIC LETTER MEEM FINAL FORM" . 65250)
+ ("ARABIC LETTER MEEM INITIAL FORM" . 65251)
+ ("ARABIC LETTER MEEM MEDIAL FORM" . 65252)
+ ("ARABIC LETTER NOON ISOLATED FORM" . 65253)
+ ("ARABIC LETTER NOON FINAL FORM" . 65254)
+ ("ARABIC LETTER NOON INITIAL FORM" . 65255)
+ ("ARABIC LETTER NOON MEDIAL FORM" . 65256)
+ ("ARABIC LETTER HEH ISOLATED FORM" . 65257)
+ ("ARABIC LETTER HEH FINAL FORM" . 65258)
+ ("ARABIC LETTER HEH INITIAL FORM" . 65259)
+ ("ARABIC LETTER HEH MEDIAL FORM" . 65260)
+ ("ARABIC LETTER WAW ISOLATED FORM" . 65261)
+ ("ARABIC LETTER WAW FINAL FORM" . 65262)
+ ("ARABIC LETTER ALEF MAKSURA ISOLATED FORM" . 65263)
+ ("ARABIC LETTER ALEF MAKSURA FINAL FORM" . 65264)
+ ("ARABIC LETTER YEH ISOLATED FORM" . 65265)
+ ("ARABIC LETTER YEH FINAL FORM" . 65266)
+ ("ARABIC LETTER YEH INITIAL FORM" . 65267)
+ ("ARABIC LETTER YEH MEDIAL FORM" . 65268)
+ ("ARABIC LIGATURE LAM WITH ALEF WITH MADDA ABOVE ISOLATED FORM" . 65269)
+ ("ARABIC LIGATURE LAM WITH ALEF WITH MADDA ABOVE FINAL FORM" . 65270)
+ ("ARABIC LIGATURE LAM WITH ALEF WITH HAMZA ABOVE ISOLATED FORM" . 65271)
+ ("ARABIC LIGATURE LAM WITH ALEF WITH HAMZA ABOVE FINAL FORM" . 65272)
+ ("ARABIC LIGATURE LAM WITH ALEF WITH HAMZA BELOW ISOLATED FORM" . 65273)
+ ("ARABIC LIGATURE LAM WITH ALEF WITH HAMZA BELOW FINAL FORM" . 65274)
+ ("ARABIC LIGATURE LAM WITH ALEF ISOLATED FORM" . 65275)
+ ("ARABIC LIGATURE LAM WITH ALEF FINAL FORM" . 65276)
+ ("ZERO WIDTH NO-BREAK SPACE" . 65279)
+ ("FULLWIDTH EXCLAMATION MARK" . 65281)
+ ("FULLWIDTH QUOTATION MARK" . 65282)
+ ("FULLWIDTH NUMBER SIGN" . 65283)
+ ("FULLWIDTH DOLLAR SIGN" . 65284)
+ ("FULLWIDTH PERCENT SIGN" . 65285)
+ ("FULLWIDTH AMPERSAND" . 65286)
+ ("FULLWIDTH APOSTROPHE" . 65287)
+ ("FULLWIDTH LEFT PARENTHESIS" . 65288)
+ ("FULLWIDTH RIGHT PARENTHESIS" . 65289)
+ ("FULLWIDTH ASTERISK" . 65290)
+ ("FULLWIDTH PLUS SIGN" . 65291)
+ ("FULLWIDTH COMMA" . 65292)
+ ("FULLWIDTH HYPHEN-MINUS" . 65293)
+ ("FULLWIDTH FULL STOP" . 65294)
+ ("FULLWIDTH SOLIDUS" . 65295)
+ ("FULLWIDTH DIGIT ZERO" . 65296)
+ ("FULLWIDTH DIGIT ONE" . 65297)
+ ("FULLWIDTH DIGIT TWO" . 65298)
+ ("FULLWIDTH DIGIT THREE" . 65299)
+ ("FULLWIDTH DIGIT FOUR" . 65300)
+ ("FULLWIDTH DIGIT FIVE" . 65301)
+ ("FULLWIDTH DIGIT SIX" . 65302)
+ ("FULLWIDTH DIGIT SEVEN" . 65303)
+ ("FULLWIDTH DIGIT EIGHT" . 65304)
+ ("FULLWIDTH DIGIT NINE" . 65305)
+ ("FULLWIDTH COLON" . 65306)
+ ("FULLWIDTH SEMICOLON" . 65307)
+ ("FULLWIDTH LESS-THAN SIGN" . 65308)
+ ("FULLWIDTH EQUALS SIGN" . 65309)
+ ("FULLWIDTH GREATER-THAN SIGN" . 65310)
+ ("FULLWIDTH QUESTION MARK" . 65311)
+ ("FULLWIDTH COMMERCIAL AT" . 65312)
+ ("FULLWIDTH LATIN CAPITAL LETTER A" . 65313)
+ ("FULLWIDTH LATIN CAPITAL LETTER B" . 65314)
+ ("FULLWIDTH LATIN CAPITAL LETTER C" . 65315)
+ ("FULLWIDTH LATIN CAPITAL LETTER D" . 65316)
+ ("FULLWIDTH LATIN CAPITAL LETTER E" . 65317)
+ ("FULLWIDTH LATIN CAPITAL LETTER F" . 65318)
+ ("FULLWIDTH LATIN CAPITAL LETTER G" . 65319)
+ ("FULLWIDTH LATIN CAPITAL LETTER H" . 65320)
+ ("FULLWIDTH LATIN CAPITAL LETTER I" . 65321)
+ ("FULLWIDTH LATIN CAPITAL LETTER J" . 65322)
+ ("FULLWIDTH LATIN CAPITAL LETTER K" . 65323)
+ ("FULLWIDTH LATIN CAPITAL LETTER L" . 65324)
+ ("FULLWIDTH LATIN CAPITAL LETTER M" . 65325)
+ ("FULLWIDTH LATIN CAPITAL LETTER N" . 65326)
+ ("FULLWIDTH LATIN CAPITAL LETTER O" . 65327)
+ ("FULLWIDTH LATIN CAPITAL LETTER P" . 65328)
+ ("FULLWIDTH LATIN CAPITAL LETTER Q" . 65329)
+ ("FULLWIDTH LATIN CAPITAL LETTER R" . 65330)
+ ("FULLWIDTH LATIN CAPITAL LETTER S" . 65331)
+ ("FULLWIDTH LATIN CAPITAL LETTER T" . 65332)
+ ("FULLWIDTH LATIN CAPITAL LETTER U" . 65333)
+ ("FULLWIDTH LATIN CAPITAL LETTER V" . 65334)
+ ("FULLWIDTH LATIN CAPITAL LETTER W" . 65335)
+ ("FULLWIDTH LATIN CAPITAL LETTER X" . 65336)
+ ("FULLWIDTH LATIN CAPITAL LETTER Y" . 65337)
+ ("FULLWIDTH LATIN CAPITAL LETTER Z" . 65338)
+ ("FULLWIDTH LEFT SQUARE BRACKET" . 65339)
+ ("FULLWIDTH REVERSE SOLIDUS" . 65340)
+ ("FULLWIDTH RIGHT SQUARE BRACKET" . 65341)
+ ("FULLWIDTH CIRCUMFLEX ACCENT" . 65342)
+ ("FULLWIDTH LOW LINE" . 65343)
+ ("FULLWIDTH GRAVE ACCENT" . 65344)
+ ("FULLWIDTH LATIN SMALL LETTER A" . 65345)
+ ("FULLWIDTH LATIN SMALL LETTER B" . 65346)
+ ("FULLWIDTH LATIN SMALL LETTER C" . 65347)
+ ("FULLWIDTH LATIN SMALL LETTER D" . 65348)
+ ("FULLWIDTH LATIN SMALL LETTER E" . 65349)
+ ("FULLWIDTH LATIN SMALL LETTER F" . 65350)
+ ("FULLWIDTH LATIN SMALL LETTER G" . 65351)
+ ("FULLWIDTH LATIN SMALL LETTER H" . 65352)
+ ("FULLWIDTH LATIN SMALL LETTER I" . 65353)
+ ("FULLWIDTH LATIN SMALL LETTER J" . 65354)
+ ("FULLWIDTH LATIN SMALL LETTER K" . 65355)
+ ("FULLWIDTH LATIN SMALL LETTER L" . 65356)
+ ("FULLWIDTH LATIN SMALL LETTER M" . 65357)
+ ("FULLWIDTH LATIN SMALL LETTER N" . 65358)
+ ("FULLWIDTH LATIN SMALL LETTER O" . 65359)
+ ("FULLWIDTH LATIN SMALL LETTER P" . 65360)
+ ("FULLWIDTH LATIN SMALL LETTER Q" . 65361)
+ ("FULLWIDTH LATIN SMALL LETTER R" . 65362)
+ ("FULLWIDTH LATIN SMALL LETTER S" . 65363)
+ ("FULLWIDTH LATIN SMALL LETTER T" . 65364)
+ ("FULLWIDTH LATIN SMALL LETTER U" . 65365)
+ ("FULLWIDTH LATIN SMALL LETTER V" . 65366)
+ ("FULLWIDTH LATIN SMALL LETTER W" . 65367)
+ ("FULLWIDTH LATIN SMALL LETTER X" . 65368)
+ ("FULLWIDTH LATIN SMALL LETTER Y" . 65369)
+ ("FULLWIDTH LATIN SMALL LETTER Z" . 65370)
+ ("FULLWIDTH LEFT CURLY BRACKET" . 65371)
+ ("FULLWIDTH VERTICAL LINE" . 65372)
+ ("FULLWIDTH RIGHT CURLY BRACKET" . 65373)
+ ("FULLWIDTH TILDE" . 65374)
+ ("FULLWIDTH LEFT WHITE PARENTHESIS" . 65375)
+ ("FULLWIDTH RIGHT WHITE PARENTHESIS" . 65376)
+ ("HALFWIDTH IDEOGRAPHIC FULL STOP" . 65377)
+ ("HALFWIDTH LEFT CORNER BRACKET" . 65378)
+ ("HALFWIDTH RIGHT CORNER BRACKET" . 65379)
+ ("HALFWIDTH IDEOGRAPHIC COMMA" . 65380)
+ ("HALFWIDTH KATAKANA MIDDLE DOT" . 65381)
+ ("HALFWIDTH KATAKANA LETTER WO" . 65382)
+ ("HALFWIDTH KATAKANA LETTER SMALL A" . 65383)
+ ("HALFWIDTH KATAKANA LETTER SMALL I" . 65384)
+ ("HALFWIDTH KATAKANA LETTER SMALL U" . 65385)
+ ("HALFWIDTH KATAKANA LETTER SMALL E" . 65386)
+ ("HALFWIDTH KATAKANA LETTER SMALL O" . 65387)
+ ("HALFWIDTH KATAKANA LETTER SMALL YA" . 65388)
+ ("HALFWIDTH KATAKANA LETTER SMALL YU" . 65389)
+ ("HALFWIDTH KATAKANA LETTER SMALL YO" . 65390)
+ ("HALFWIDTH KATAKANA LETTER SMALL TU" . 65391)
+ ("HALFWIDTH KATAKANA-HIRAGANA PROLONGED SOUND MARK" . 65392)
+ ("HALFWIDTH KATAKANA LETTER A" . 65393)
+ ("HALFWIDTH KATAKANA LETTER I" . 65394)
+ ("HALFWIDTH KATAKANA LETTER U" . 65395)
+ ("HALFWIDTH KATAKANA LETTER E" . 65396)
+ ("HALFWIDTH KATAKANA LETTER O" . 65397)
+ ("HALFWIDTH KATAKANA LETTER KA" . 65398)
+ ("HALFWIDTH KATAKANA LETTER KI" . 65399)
+ ("HALFWIDTH KATAKANA LETTER KU" . 65400)
+ ("HALFWIDTH KATAKANA LETTER KE" . 65401)
+ ("HALFWIDTH KATAKANA LETTER KO" . 65402)
+ ("HALFWIDTH KATAKANA LETTER SA" . 65403)
+ ("HALFWIDTH KATAKANA LETTER SI" . 65404)
+ ("HALFWIDTH KATAKANA LETTER SU" . 65405)
+ ("HALFWIDTH KATAKANA LETTER SE" . 65406)
+ ("HALFWIDTH KATAKANA LETTER SO" . 65407)
+ ("HALFWIDTH KATAKANA LETTER TA" . 65408)
+ ("HALFWIDTH KATAKANA LETTER TI" . 65409)
+ ("HALFWIDTH KATAKANA LETTER TU" . 65410)
+ ("HALFWIDTH KATAKANA LETTER TE" . 65411)
+ ("HALFWIDTH KATAKANA LETTER TO" . 65412)
+ ("HALFWIDTH KATAKANA LETTER NA" . 65413)
+ ("HALFWIDTH KATAKANA LETTER NI" . 65414)
+ ("HALFWIDTH KATAKANA LETTER NU" . 65415)
+ ("HALFWIDTH KATAKANA LETTER NE" . 65416)
+ ("HALFWIDTH KATAKANA LETTER NO" . 65417)
+ ("HALFWIDTH KATAKANA LETTER HA" . 65418)
+ ("HALFWIDTH KATAKANA LETTER HI" . 65419)
+ ("HALFWIDTH KATAKANA LETTER HU" . 65420)
+ ("HALFWIDTH KATAKANA LETTER HE" . 65421)
+ ("HALFWIDTH KATAKANA LETTER HO" . 65422)
+ ("HALFWIDTH KATAKANA LETTER MA" . 65423)
+ ("HALFWIDTH KATAKANA LETTER MI" . 65424)
+ ("HALFWIDTH KATAKANA LETTER MU" . 65425)
+ ("HALFWIDTH KATAKANA LETTER ME" . 65426)
+ ("HALFWIDTH KATAKANA LETTER MO" . 65427)
+ ("HALFWIDTH KATAKANA LETTER YA" . 65428)
+ ("HALFWIDTH KATAKANA LETTER YU" . 65429)
+ ("HALFWIDTH KATAKANA LETTER YO" . 65430)
+ ("HALFWIDTH KATAKANA LETTER RA" . 65431)
+ ("HALFWIDTH KATAKANA LETTER RI" . 65432)
+ ("HALFWIDTH KATAKANA LETTER RU" . 65433)
+ ("HALFWIDTH KATAKANA LETTER RE" . 65434)
+ ("HALFWIDTH KATAKANA LETTER RO" . 65435)
+ ("HALFWIDTH KATAKANA LETTER WA" . 65436)
+ ("HALFWIDTH KATAKANA LETTER N" . 65437)
+ ("HALFWIDTH KATAKANA VOICED SOUND MARK" . 65438)
+ ("HALFWIDTH KATAKANA SEMI-VOICED SOUND MARK" . 65439)
+ ("HALFWIDTH HANGUL FILLER" . 65440)
+ ("HALFWIDTH HANGUL LETTER KIYEOK" . 65441)
+ ("HALFWIDTH HANGUL LETTER SSANGKIYEOK" . 65442)
+ ("HALFWIDTH HANGUL LETTER KIYEOK-SIOS" . 65443)
+ ("HALFWIDTH HANGUL LETTER NIEUN" . 65444)
+ ("HALFWIDTH HANGUL LETTER NIEUN-CIEUC" . 65445)
+ ("HALFWIDTH HANGUL LETTER NIEUN-HIEUH" . 65446)
+ ("HALFWIDTH HANGUL LETTER TIKEUT" . 65447)
+ ("HALFWIDTH HANGUL LETTER SSANGTIKEUT" . 65448)
+ ("HALFWIDTH HANGUL LETTER RIEUL" . 65449)
+ ("HALFWIDTH HANGUL LETTER RIEUL-KIYEOK" . 65450)
+ ("HALFWIDTH HANGUL LETTER RIEUL-MIEUM" . 65451)
+ ("HALFWIDTH HANGUL LETTER RIEUL-PIEUP" . 65452)
+ ("HALFWIDTH HANGUL LETTER RIEUL-SIOS" . 65453)
+ ("HALFWIDTH HANGUL LETTER RIEUL-THIEUTH" . 65454)
+ ("HALFWIDTH HANGUL LETTER RIEUL-PHIEUPH" . 65455)
+ ("HALFWIDTH HANGUL LETTER RIEUL-HIEUH" . 65456)
+ ("HALFWIDTH HANGUL LETTER MIEUM" . 65457)
+ ("HALFWIDTH HANGUL LETTER PIEUP" . 65458)
+ ("HALFWIDTH HANGUL LETTER SSANGPIEUP" . 65459)
+ ("HALFWIDTH HANGUL LETTER PIEUP-SIOS" . 65460)
+ ("HALFWIDTH HANGUL LETTER SIOS" . 65461)
+ ("HALFWIDTH HANGUL LETTER SSANGSIOS" . 65462)
+ ("HALFWIDTH HANGUL LETTER IEUNG" . 65463)
+ ("HALFWIDTH HANGUL LETTER CIEUC" . 65464)
+ ("HALFWIDTH HANGUL LETTER SSANGCIEUC" . 65465)
+ ("HALFWIDTH HANGUL LETTER CHIEUCH" . 65466)
+ ("HALFWIDTH HANGUL LETTER KHIEUKH" . 65467)
+ ("HALFWIDTH HANGUL LETTER THIEUTH" . 65468)
+ ("HALFWIDTH HANGUL LETTER PHIEUPH" . 65469)
+ ("HALFWIDTH HANGUL LETTER HIEUH" . 65470)
+ ("HALFWIDTH HANGUL LETTER A" . 65474)
+ ("HALFWIDTH HANGUL LETTER AE" . 65475)
+ ("HALFWIDTH HANGUL LETTER YA" . 65476)
+ ("HALFWIDTH HANGUL LETTER YAE" . 65477)
+ ("HALFWIDTH HANGUL LETTER EO" . 65478)
+ ("HALFWIDTH HANGUL LETTER E" . 65479)
+ ("HALFWIDTH HANGUL LETTER YEO" . 65482)
+ ("HALFWIDTH HANGUL LETTER YE" . 65483)
+ ("HALFWIDTH HANGUL LETTER O" . 65484)
+ ("HALFWIDTH HANGUL LETTER WA" . 65485)
+ ("HALFWIDTH HANGUL LETTER WAE" . 65486)
+ ("HALFWIDTH HANGUL LETTER OE" . 65487)
+ ("HALFWIDTH HANGUL LETTER YO" . 65490)
+ ("HALFWIDTH HANGUL LETTER U" . 65491)
+ ("HALFWIDTH HANGUL LETTER WEO" . 65492)
+ ("HALFWIDTH HANGUL LETTER WE" . 65493)
+ ("HALFWIDTH HANGUL LETTER WI" . 65494)
+ ("HALFWIDTH HANGUL LETTER YU" . 65495)
+ ("HALFWIDTH HANGUL LETTER EU" . 65498)
+ ("HALFWIDTH HANGUL LETTER YI" . 65499)
+ ("HALFWIDTH HANGUL LETTER I" . 65500)
+ ("FULLWIDTH CENT SIGN" . 65504)
+ ("FULLWIDTH POUND SIGN" . 65505)
+ ("FULLWIDTH NOT SIGN" . 65506)
+ ("FULLWIDTH MACRON" . 65507)
+ ("FULLWIDTH BROKEN BAR" . 65508)
+ ("FULLWIDTH YEN SIGN" . 65509)
+ ("FULLWIDTH WON SIGN" . 65510)
+ ("HALFWIDTH FORMS LIGHT VERTICAL" . 65512)
+ ("HALFWIDTH LEFTWARDS ARROW" . 65513)
+ ("HALFWIDTH UPWARDS ARROW" . 65514)
+ ("HALFWIDTH RIGHTWARDS ARROW" . 65515)
+ ("HALFWIDTH DOWNWARDS ARROW" . 65516)
+ ("HALFWIDTH BLACK SQUARE" . 65517)
+ ("HALFWIDTH WHITE CIRCLE" . 65518)
+ ("INTERLINEAR ANNOTATION ANCHOR" . 65529)
+ ("INTERLINEAR ANNOTATION SEPARATOR" . 65530)
+ ("INTERLINEAR ANNOTATION TERMINATOR" . 65531)
+ ("OBJECT REPLACEMENT CHARACTER" . 65532)
+ ("REPLACEMENT CHARACTER" . 65533)
+ ("OLD ITALIC LETTER A" . 66304)
+ ("OLD ITALIC LETTER BE" . 66305)
+ ("OLD ITALIC LETTER KE" . 66306)
+ ("OLD ITALIC LETTER DE" . 66307)
+ ("OLD ITALIC LETTER E" . 66308)
+ ("OLD ITALIC LETTER VE" . 66309)
+ ("OLD ITALIC LETTER ZE" . 66310)
+ ("OLD ITALIC LETTER HE" . 66311)
+ ("OLD ITALIC LETTER THE" . 66312)
+ ("OLD ITALIC LETTER I" . 66313)
+ ("OLD ITALIC LETTER KA" . 66314)
+ ("OLD ITALIC LETTER EL" . 66315)
+ ("OLD ITALIC LETTER EM" . 66316)
+ ("OLD ITALIC LETTER EN" . 66317)
+ ("OLD ITALIC LETTER ESH" . 66318)
+ ("OLD ITALIC LETTER O" . 66319)
+ ("OLD ITALIC LETTER PE" . 66320)
+ ("OLD ITALIC LETTER SHE" . 66321)
+ ("OLD ITALIC LETTER KU" . 66322)
+ ("OLD ITALIC LETTER ER" . 66323)
+ ("OLD ITALIC LETTER ES" . 66324)
+ ("OLD ITALIC LETTER TE" . 66325)
+ ("OLD ITALIC LETTER U" . 66326)
+ ("OLD ITALIC LETTER EKS" . 66327)
+ ("OLD ITALIC LETTER PHE" . 66328)
+ ("OLD ITALIC LETTER KHE" . 66329)
+ ("OLD ITALIC LETTER EF" . 66330)
+ ("OLD ITALIC LETTER ERS" . 66331)
+ ("OLD ITALIC LETTER CHE" . 66332)
+ ("OLD ITALIC LETTER II" . 66333)
+ ("OLD ITALIC LETTER UU" . 66334)
+ ("OLD ITALIC NUMERAL ONE" . 66336)
+ ("OLD ITALIC NUMERAL FIVE" . 66337)
+ ("OLD ITALIC NUMERAL TEN" . 66338)
+ ("OLD ITALIC NUMERAL FIFTY" . 66339)
+ ("GOTHIC LETTER AHSA" . 66352)
+ ("GOTHIC LETTER BAIRKAN" . 66353)
+ ("GOTHIC LETTER GIBA" . 66354)
+ ("GOTHIC LETTER DAGS" . 66355)
+ ("GOTHIC LETTER AIHVUS" . 66356)
+ ("GOTHIC LETTER QAIRTHRA" . 66357)
+ ("GOTHIC LETTER IUJA" . 66358)
+ ("GOTHIC LETTER HAGL" . 66359)
+ ("GOTHIC LETTER THIUTH" . 66360)
+ ("GOTHIC LETTER EIS" . 66361)
+ ("GOTHIC LETTER KUSMA" . 66362)
+ ("GOTHIC LETTER LAGUS" . 66363)
+ ("GOTHIC LETTER MANNA" . 66364)
+ ("GOTHIC LETTER NAUTHS" . 66365)
+ ("GOTHIC LETTER JER" . 66366)
+ ("GOTHIC LETTER URUS" . 66367)
+ ("GOTHIC LETTER PAIRTHRA" . 66368)
+ ("GOTHIC LETTER NINETY" . 66369)
+ ("GOTHIC LETTER RAIDA" . 66370)
+ ("GOTHIC LETTER SAUIL" . 66371)
+ ("GOTHIC LETTER TEIWS" . 66372)
+ ("GOTHIC LETTER WINJA" . 66373)
+ ("GOTHIC LETTER FAIHU" . 66374)
+ ("GOTHIC LETTER IGGWS" . 66375)
+ ("GOTHIC LETTER HWAIR" . 66376)
+ ("GOTHIC LETTER OTHAL" . 66377)
+ ("GOTHIC LETTER NINE HUNDRED" . 66378)
+ ("DESERET CAPITAL LETTER LONG I" . 66560)
+ ("DESERET CAPITAL LETTER LONG E" . 66561)
+ ("DESERET CAPITAL LETTER LONG A" . 66562)
+ ("DESERET CAPITAL LETTER LONG AH" . 66563)
+ ("DESERET CAPITAL LETTER LONG O" . 66564)
+ ("DESERET CAPITAL LETTER LONG OO" . 66565)
+ ("DESERET CAPITAL LETTER SHORT I" . 66566)
+ ("DESERET CAPITAL LETTER SHORT E" . 66567)
+ ("DESERET CAPITAL LETTER SHORT A" . 66568)
+ ("DESERET CAPITAL LETTER SHORT AH" . 66569)
+ ("DESERET CAPITAL LETTER SHORT O" . 66570)
+ ("DESERET CAPITAL LETTER SHORT OO" . 66571)
+ ("DESERET CAPITAL LETTER AY" . 66572)
+ ("DESERET CAPITAL LETTER OW" . 66573)
+ ("DESERET CAPITAL LETTER WU" . 66574)
+ ("DESERET CAPITAL LETTER YEE" . 66575)
+ ("DESERET CAPITAL LETTER H" . 66576)
+ ("DESERET CAPITAL LETTER PEE" . 66577)
+ ("DESERET CAPITAL LETTER BEE" . 66578)
+ ("DESERET CAPITAL LETTER TEE" . 66579)
+ ("DESERET CAPITAL LETTER DEE" . 66580)
+ ("DESERET CAPITAL LETTER CHEE" . 66581)
+ ("DESERET CAPITAL LETTER JEE" . 66582)
+ ("DESERET CAPITAL LETTER KAY" . 66583)
+ ("DESERET CAPITAL LETTER GAY" . 66584)
+ ("DESERET CAPITAL LETTER EF" . 66585)
+ ("DESERET CAPITAL LETTER VEE" . 66586)
+ ("DESERET CAPITAL LETTER ETH" . 66587)
+ ("DESERET CAPITAL LETTER THEE" . 66588)
+ ("DESERET CAPITAL LETTER ES" . 66589)
+ ("DESERET CAPITAL LETTER ZEE" . 66590)
+ ("DESERET CAPITAL LETTER ESH" . 66591)
+ ("DESERET CAPITAL LETTER ZHEE" . 66592)
+ ("DESERET CAPITAL LETTER ER" . 66593)
+ ("DESERET CAPITAL LETTER EL" . 66594)
+ ("DESERET CAPITAL LETTER EM" . 66595)
+ ("DESERET CAPITAL LETTER EN" . 66596)
+ ("DESERET CAPITAL LETTER ENG" . 66597)
+ ("DESERET SMALL LETTER LONG I" . 66600)
+ ("DESERET SMALL LETTER LONG E" . 66601)
+ ("DESERET SMALL LETTER LONG A" . 66602)
+ ("DESERET SMALL LETTER LONG AH" . 66603)
+ ("DESERET SMALL LETTER LONG O" . 66604)
+ ("DESERET SMALL LETTER LONG OO" . 66605)
+ ("DESERET SMALL LETTER SHORT I" . 66606)
+ ("DESERET SMALL LETTER SHORT E" . 66607)
+ ("DESERET SMALL LETTER SHORT A" . 66608)
+ ("DESERET SMALL LETTER SHORT AH" . 66609)
+ ("DESERET SMALL LETTER SHORT O" . 66610)
+ ("DESERET SMALL LETTER SHORT OO" . 66611)
+ ("DESERET SMALL LETTER AY" . 66612)
+ ("DESERET SMALL LETTER OW" . 66613)
+ ("DESERET SMALL LETTER WU" . 66614)
+ ("DESERET SMALL LETTER YEE" . 66615)
+ ("DESERET SMALL LETTER H" . 66616)
+ ("DESERET SMALL LETTER PEE" . 66617)
+ ("DESERET SMALL LETTER BEE" . 66618)
+ ("DESERET SMALL LETTER TEE" . 66619)
+ ("DESERET SMALL LETTER DEE" . 66620)
+ ("DESERET SMALL LETTER CHEE" . 66621)
+ ("DESERET SMALL LETTER JEE" . 66622)
+ ("DESERET SMALL LETTER KAY" . 66623)
+ ("DESERET SMALL LETTER GAY" . 66624)
+ ("DESERET SMALL LETTER EF" . 66625)
+ ("DESERET SMALL LETTER VEE" . 66626)
+ ("DESERET SMALL LETTER ETH" . 66627)
+ ("DESERET SMALL LETTER THEE" . 66628)
+ ("DESERET SMALL LETTER ES" . 66629)
+ ("DESERET SMALL LETTER ZEE" . 66630)
+ ("DESERET SMALL LETTER ESH" . 66631)
+ ("DESERET SMALL LETTER ZHEE" . 66632)
+ ("DESERET SMALL LETTER ER" . 66633)
+ ("DESERET SMALL LETTER EL" . 66634)
+ ("DESERET SMALL LETTER EM" . 66635)
+ ("DESERET SMALL LETTER EN" . 66636)
+ ("DESERET SMALL LETTER ENG" . 66637)
+ ("BYZANTINE MUSICAL SYMBOL PSILI" . 118784)
+ ("BYZANTINE MUSICAL SYMBOL DASEIA" . 118785)
+ ("BYZANTINE MUSICAL SYMBOL PERISPOMENI" . 118786)
+ ("BYZANTINE MUSICAL SYMBOL OXEIA EKFONITIKON" . 118787)
+ ("BYZANTINE MUSICAL SYMBOL OXEIA DIPLI" . 118788)
+ ("BYZANTINE MUSICAL SYMBOL VAREIA EKFONITIKON" . 118789)
+ ("BYZANTINE MUSICAL SYMBOL VAREIA DIPLI" . 118790)
+ ("BYZANTINE MUSICAL SYMBOL KATHISTI" . 118791)
+ ("BYZANTINE MUSICAL SYMBOL SYRMATIKI" . 118792)
+ ("BYZANTINE MUSICAL SYMBOL PARAKLITIKI" . 118793)
+ ("BYZANTINE MUSICAL SYMBOL YPOKRISIS" . 118794)
+ ("BYZANTINE MUSICAL SYMBOL YPOKRISIS DIPLI" . 118795)
+ ("BYZANTINE MUSICAL SYMBOL KREMASTI" . 118796)
+ ("BYZANTINE MUSICAL SYMBOL APESO EKFONITIKON" . 118797)
+ ("BYZANTINE MUSICAL SYMBOL EXO EKFONITIKON" . 118798)
+ ("BYZANTINE MUSICAL SYMBOL TELEIA" . 118799)
+ ("BYZANTINE MUSICAL SYMBOL KENTIMATA" . 118800)
+ ("BYZANTINE MUSICAL SYMBOL APOSTROFOS" . 118801)
+ ("BYZANTINE MUSICAL SYMBOL APOSTROFOS DIPLI" . 118802)
+ ("BYZANTINE MUSICAL SYMBOL SYNEVMA" . 118803)
+ ("BYZANTINE MUSICAL SYMBOL THITA" . 118804)
+ ("BYZANTINE MUSICAL SYMBOL OLIGON ARCHAION" . 118805)
+ ("BYZANTINE MUSICAL SYMBOL GORGON ARCHAION" . 118806)
+ ("BYZANTINE MUSICAL SYMBOL PSILON" . 118807)
+ ("BYZANTINE MUSICAL SYMBOL CHAMILON" . 118808)
+ ("BYZANTINE MUSICAL SYMBOL VATHY" . 118809)
+ ("BYZANTINE MUSICAL SYMBOL ISON ARCHAION" . 118810)
+ ("BYZANTINE MUSICAL SYMBOL KENTIMA ARCHAION" . 118811)
+ ("BYZANTINE MUSICAL SYMBOL KENTIMATA ARCHAION" . 118812)
+ ("BYZANTINE MUSICAL SYMBOL SAXIMATA" . 118813)
+ ("BYZANTINE MUSICAL SYMBOL PARICHON" . 118814)
+ ("BYZANTINE MUSICAL SYMBOL STAVROS APODEXIA" . 118815)
+ ("BYZANTINE MUSICAL SYMBOL OXEIAI ARCHAION" . 118816)
+ ("BYZANTINE MUSICAL SYMBOL VAREIAI ARCHAION" . 118817)
+ ("BYZANTINE MUSICAL SYMBOL APODERMA ARCHAION" . 118818)
+ ("BYZANTINE MUSICAL SYMBOL APOTHEMA" . 118819)
+ ("BYZANTINE MUSICAL SYMBOL KLASMA" . 118820)
+ ("BYZANTINE MUSICAL SYMBOL REVMA" . 118821)
+ ("BYZANTINE MUSICAL SYMBOL PIASMA ARCHAION" . 118822)
+ ("BYZANTINE MUSICAL SYMBOL TINAGMA" . 118823)
+ ("BYZANTINE MUSICAL SYMBOL ANATRICHISMA" . 118824)
+ ("BYZANTINE MUSICAL SYMBOL SEISMA" . 118825)
+ ("BYZANTINE MUSICAL SYMBOL SYNAGMA ARCHAION" . 118826)
+ ("BYZANTINE MUSICAL SYMBOL SYNAGMA META STAVROU" . 118827)
+ ("BYZANTINE MUSICAL SYMBOL OYRANISMA ARCHAION" . 118828)
+ ("BYZANTINE MUSICAL SYMBOL THEMA" . 118829)
+ ("BYZANTINE MUSICAL SYMBOL LEMOI" . 118830)
+ ("BYZANTINE MUSICAL SYMBOL DYO" . 118831)
+ ("BYZANTINE MUSICAL SYMBOL TRIA" . 118832)
+ ("BYZANTINE MUSICAL SYMBOL TESSERA" . 118833)
+ ("BYZANTINE MUSICAL SYMBOL KRATIMATA" . 118834)
+ ("BYZANTINE MUSICAL SYMBOL APESO EXO NEO" . 118835)
+ ("BYZANTINE MUSICAL SYMBOL FTHORA ARCHAION" . 118836)
+ ("BYZANTINE MUSICAL SYMBOL IMIFTHORA" . 118837)
+ ("BYZANTINE MUSICAL SYMBOL TROMIKON ARCHAION" . 118838)
+ ("BYZANTINE MUSICAL SYMBOL KATAVA TROMIKON" . 118839)
+ ("BYZANTINE MUSICAL SYMBOL PELASTON" . 118840)
+ ("BYZANTINE MUSICAL SYMBOL PSIFISTON" . 118841)
+ ("BYZANTINE MUSICAL SYMBOL KONTEVMA" . 118842)
+ ("BYZANTINE MUSICAL SYMBOL CHOREVMA ARCHAION" . 118843)
+ ("BYZANTINE MUSICAL SYMBOL RAPISMA" . 118844)
+ ("BYZANTINE MUSICAL SYMBOL PARAKALESMA ARCHAION" . 118845)
+ ("BYZANTINE MUSICAL SYMBOL PARAKLITIKI ARCHAION" . 118846)
+ ("BYZANTINE MUSICAL SYMBOL ICHADIN" . 118847)
+ ("BYZANTINE MUSICAL SYMBOL NANA" . 118848)
+ ("BYZANTINE MUSICAL SYMBOL PETASMA" . 118849)
+ ("BYZANTINE MUSICAL SYMBOL KONTEVMA ALLO" . 118850)
+ ("BYZANTINE MUSICAL SYMBOL TROMIKON ALLO" . 118851)
+ ("BYZANTINE MUSICAL SYMBOL STRAGGISMATA" . 118852)
+ ("BYZANTINE MUSICAL SYMBOL GRONTHISMATA" . 118853)
+ ("BYZANTINE MUSICAL SYMBOL ISON NEO" . 118854)
+ ("BYZANTINE MUSICAL SYMBOL OLIGON NEO" . 118855)
+ ("BYZANTINE MUSICAL SYMBOL OXEIA NEO" . 118856)
+ ("BYZANTINE MUSICAL SYMBOL PETASTI" . 118857)
+ ("BYZANTINE MUSICAL SYMBOL KOUFISMA" . 118858)
+ ("BYZANTINE MUSICAL SYMBOL PETASTOKOUFISMA" . 118859)
+ ("BYZANTINE MUSICAL SYMBOL KRATIMOKOUFISMA" . 118860)
+ ("BYZANTINE MUSICAL SYMBOL PELASTON NEO" . 118861)
+ ("BYZANTINE MUSICAL SYMBOL KENTIMATA NEO ANO" . 118862)
+ ("BYZANTINE MUSICAL SYMBOL KENTIMA NEO ANO" . 118863)
+ ("BYZANTINE MUSICAL SYMBOL YPSILI" . 118864)
+ ("BYZANTINE MUSICAL SYMBOL APOSTROFOS NEO" . 118865)
+ ("BYZANTINE MUSICAL SYMBOL APOSTROFOI SYNDESMOS NEO" . 118866)
+ ("BYZANTINE MUSICAL SYMBOL YPORROI" . 118867)
+ ("BYZANTINE MUSICAL SYMBOL KRATIMOYPORROON" . 118868)
+ ("BYZANTINE MUSICAL SYMBOL ELAFRON" . 118869)
+ ("BYZANTINE MUSICAL SYMBOL CHAMILI" . 118870)
+ ("BYZANTINE MUSICAL SYMBOL MIKRON ISON" . 118871)
+ ("BYZANTINE MUSICAL SYMBOL VAREIA NEO" . 118872)
+ ("BYZANTINE MUSICAL SYMBOL PIASMA NEO" . 118873)
+ ("BYZANTINE MUSICAL SYMBOL PSIFISTON NEO" . 118874)
+ ("BYZANTINE MUSICAL SYMBOL OMALON" . 118875)
+ ("BYZANTINE MUSICAL SYMBOL ANTIKENOMA" . 118876)
+ ("BYZANTINE MUSICAL SYMBOL LYGISMA" . 118877)
+ ("BYZANTINE MUSICAL SYMBOL PARAKLITIKI NEO" . 118878)
+ ("BYZANTINE MUSICAL SYMBOL PARAKALESMA NEO" . 118879)
+ ("BYZANTINE MUSICAL SYMBOL ETERON PARAKALESMA" . 118880)
+ ("BYZANTINE MUSICAL SYMBOL KYLISMA" . 118881)
+ ("BYZANTINE MUSICAL SYMBOL ANTIKENOKYLISMA" . 118882)
+ ("BYZANTINE MUSICAL SYMBOL TROMIKON NEO" . 118883)
+ ("BYZANTINE MUSICAL SYMBOL EKSTREPTON" . 118884)
+ ("BYZANTINE MUSICAL SYMBOL SYNAGMA NEO" . 118885)
+ ("BYZANTINE MUSICAL SYMBOL SYRMA" . 118886)
+ ("BYZANTINE MUSICAL SYMBOL CHOREVMA NEO" . 118887)
+ ("BYZANTINE MUSICAL SYMBOL EPEGERMA" . 118888)
+ ("BYZANTINE MUSICAL SYMBOL SEISMA NEO" . 118889)
+ ("BYZANTINE MUSICAL SYMBOL XIRON KLASMA" . 118890)
+ ("BYZANTINE MUSICAL SYMBOL TROMIKOPSIFISTON" . 118891)
+ ("BYZANTINE MUSICAL SYMBOL PSIFISTOLYGISMA" . 118892)
+ ("BYZANTINE MUSICAL SYMBOL TROMIKOLYGISMA" . 118893)
+ ("BYZANTINE MUSICAL SYMBOL TROMIKOPARAKALESMA" . 118894)
+ ("BYZANTINE MUSICAL SYMBOL PSIFISTOPARAKALESMA" . 118895)
+ ("BYZANTINE MUSICAL SYMBOL TROMIKOSYNAGMA" . 118896)
+ ("BYZANTINE MUSICAL SYMBOL PSIFISTOSYNAGMA" . 118897)
+ ("BYZANTINE MUSICAL SYMBOL GORGOSYNTHETON" . 118898)
+ ("BYZANTINE MUSICAL SYMBOL ARGOSYNTHETON" . 118899)
+ ("BYZANTINE MUSICAL SYMBOL ETERON ARGOSYNTHETON" . 118900)
+ ("BYZANTINE MUSICAL SYMBOL OYRANISMA NEO" . 118901)
+ ("BYZANTINE MUSICAL SYMBOL THEMATISMOS ESO" . 118902)
+ ("BYZANTINE MUSICAL SYMBOL THEMATISMOS EXO" . 118903)
+ ("BYZANTINE MUSICAL SYMBOL THEMA APLOUN" . 118904)
+ ("BYZANTINE MUSICAL SYMBOL THES KAI APOTHES" . 118905)
+ ("BYZANTINE MUSICAL SYMBOL KATAVASMA" . 118906)
+ ("BYZANTINE MUSICAL SYMBOL ENDOFONON" . 118907)
+ ("BYZANTINE MUSICAL SYMBOL YFEN KATO" . 118908)
+ ("BYZANTINE MUSICAL SYMBOL YFEN ANO" . 118909)
+ ("BYZANTINE MUSICAL SYMBOL STAVROS" . 118910)
+ ("BYZANTINE MUSICAL SYMBOL KLASMA ANO" . 118911)
+ ("BYZANTINE MUSICAL SYMBOL DIPLI ARCHAION" . 118912)
+ ("BYZANTINE MUSICAL SYMBOL KRATIMA ARCHAION" . 118913)
+ ("BYZANTINE MUSICAL SYMBOL KRATIMA ALLO" . 118914)
+ ("BYZANTINE MUSICAL SYMBOL KRATIMA NEO" . 118915)
+ ("BYZANTINE MUSICAL SYMBOL APODERMA NEO" . 118916)
+ ("BYZANTINE MUSICAL SYMBOL APLI" . 118917)
+ ("BYZANTINE MUSICAL SYMBOL DIPLI" . 118918)
+ ("BYZANTINE MUSICAL SYMBOL TRIPLI" . 118919)
+ ("BYZANTINE MUSICAL SYMBOL TETRAPLI" . 118920)
+ ("BYZANTINE MUSICAL SYMBOL KORONIS" . 118921)
+ ("BYZANTINE MUSICAL SYMBOL LEIMMA ENOS CHRONOU" . 118922)
+ ("BYZANTINE MUSICAL SYMBOL LEIMMA DYO CHRONON" . 118923)
+ ("BYZANTINE MUSICAL SYMBOL LEIMMA TRION CHRONON" . 118924)
+ ("BYZANTINE MUSICAL SYMBOL LEIMMA TESSARON CHRONON" . 118925)
+ ("BYZANTINE MUSICAL SYMBOL LEIMMA IMISEOS CHRONOU" . 118926)
+ ("BYZANTINE MUSICAL SYMBOL GORGON NEO ANO" . 118927)
+ ("BYZANTINE MUSICAL SYMBOL GORGON PARESTIGMENON ARISTERA" . 118928)
+ ("BYZANTINE MUSICAL SYMBOL GORGON PARESTIGMENON DEXIA" . 118929)
+ ("BYZANTINE MUSICAL SYMBOL DIGORGON" . 118930)
+ ("BYZANTINE MUSICAL SYMBOL DIGORGON PARESTIGMENON ARISTERA KATO" . 118931)
+ ("BYZANTINE MUSICAL SYMBOL DIGORGON PARESTIGMENON ARISTERA ANO" . 118932)
+ ("BYZANTINE MUSICAL SYMBOL DIGORGON PARESTIGMENON DEXIA" . 118933)
+ ("BYZANTINE MUSICAL SYMBOL TRIGORGON" . 118934)
+ ("BYZANTINE MUSICAL SYMBOL ARGON" . 118935)
+ ("BYZANTINE MUSICAL SYMBOL IMIDIARGON" . 118936)
+ ("BYZANTINE MUSICAL SYMBOL DIARGON" . 118937)
+ ("BYZANTINE MUSICAL SYMBOL AGOGI POLI ARGI" . 118938)
+ ("BYZANTINE MUSICAL SYMBOL AGOGI ARGOTERI" . 118939)
+ ("BYZANTINE MUSICAL SYMBOL AGOGI ARGI" . 118940)
+ ("BYZANTINE MUSICAL SYMBOL AGOGI METRIA" . 118941)
+ ("BYZANTINE MUSICAL SYMBOL AGOGI MESI" . 118942)
+ ("BYZANTINE MUSICAL SYMBOL AGOGI GORGI" . 118943)
+ ("BYZANTINE MUSICAL SYMBOL AGOGI GORGOTERI" . 118944)
+ ("BYZANTINE MUSICAL SYMBOL AGOGI POLI GORGI" . 118945)
+ ("BYZANTINE MUSICAL SYMBOL MARTYRIA PROTOS ICHOS" . 118946)
+ ("BYZANTINE MUSICAL SYMBOL MARTYRIA ALLI PROTOS ICHOS" . 118947)
+ ("BYZANTINE MUSICAL SYMBOL MARTYRIA DEYTEROS ICHOS" . 118948)
+ ("BYZANTINE MUSICAL SYMBOL MARTYRIA ALLI DEYTEROS ICHOS" . 118949)
+ ("BYZANTINE MUSICAL SYMBOL MARTYRIA TRITOS ICHOS" . 118950)
+ ("BYZANTINE MUSICAL SYMBOL MARTYRIA TRIFONIAS" . 118951)
+ ("BYZANTINE MUSICAL SYMBOL MARTYRIA TETARTOS ICHOS" . 118952)
+ ("BYZANTINE MUSICAL SYMBOL MARTYRIA TETARTOS LEGETOS ICHOS" . 118953)
+ ("BYZANTINE MUSICAL SYMBOL MARTYRIA LEGETOS ICHOS" . 118954)
+ ("BYZANTINE MUSICAL SYMBOL MARTYRIA PLAGIOS ICHOS" . 118955)
+ ("BYZANTINE MUSICAL SYMBOL ISAKIA TELOUS ICHIMATOS" . 118956)
+ ("BYZANTINE MUSICAL SYMBOL APOSTROFOI TELOUS ICHIMATOS" . 118957)
+ ("BYZANTINE MUSICAL SYMBOL FANEROSIS TETRAFONIAS" . 118958)
+ ("BYZANTINE MUSICAL SYMBOL FANEROSIS MONOFONIAS" . 118959)
+ ("BYZANTINE MUSICAL SYMBOL FANEROSIS DIFONIAS" . 118960)
+ ("BYZANTINE MUSICAL SYMBOL MARTYRIA VARYS ICHOS" . 118961)
+ ("BYZANTINE MUSICAL SYMBOL MARTYRIA PROTOVARYS ICHOS" . 118962)
+ ("BYZANTINE MUSICAL SYMBOL MARTYRIA PLAGIOS TETARTOS ICHOS" . 118963)
+ ("BYZANTINE MUSICAL SYMBOL GORTHMIKON N APLOUN" . 118964)
+ ("BYZANTINE MUSICAL SYMBOL GORTHMIKON N DIPLOUN" . 118965)
+ ("BYZANTINE MUSICAL SYMBOL ENARXIS KAI FTHORA VOU" . 118966)
+ ("BYZANTINE MUSICAL SYMBOL IMIFONON" . 118967)
+ ("BYZANTINE MUSICAL SYMBOL IMIFTHORON" . 118968)
+ ("BYZANTINE MUSICAL SYMBOL FTHORA ARCHAION DEYTEROU ICHOU" . 118969)
+ ("BYZANTINE MUSICAL SYMBOL FTHORA DIATONIKI PA" . 118970)
+ ("BYZANTINE MUSICAL SYMBOL FTHORA DIATONIKI NANA" . 118971)
+ ("BYZANTINE MUSICAL SYMBOL FTHORA NAOS ICHOS" . 118972)
+ ("BYZANTINE MUSICAL SYMBOL FTHORA DIATONIKI DI" . 118973)
+ ("BYZANTINE MUSICAL SYMBOL FTHORA SKLIRON DIATONON DI" . 118974)
+ ("BYZANTINE MUSICAL SYMBOL FTHORA DIATONIKI KE" . 118975)
+ ("BYZANTINE MUSICAL SYMBOL FTHORA DIATONIKI ZO" . 118976)
+ ("BYZANTINE MUSICAL SYMBOL FTHORA DIATONIKI NI KATO" . 118977)
+ ("BYZANTINE MUSICAL SYMBOL FTHORA DIATONIKI NI ANO" . 118978)
+ ("BYZANTINE MUSICAL SYMBOL FTHORA MALAKON CHROMA DIFONIAS" . 118979)
+ ("BYZANTINE MUSICAL SYMBOL FTHORA MALAKON CHROMA MONOFONIAS" . 118980)
+ ("BYZANTINE MUSICAL SYMBOL FHTORA SKLIRON CHROMA VASIS" . 118981)
+ ("BYZANTINE MUSICAL SYMBOL FTHORA SKLIRON CHROMA SYNAFI" . 118982)
+ ("BYZANTINE MUSICAL SYMBOL FTHORA NENANO" . 118983)
+ ("BYZANTINE MUSICAL SYMBOL CHROA ZYGOS" . 118984)
+ ("BYZANTINE MUSICAL SYMBOL CHROA KLITON" . 118985)
+ ("BYZANTINE MUSICAL SYMBOL CHROA SPATHI" . 118986)
+ ("BYZANTINE MUSICAL SYMBOL FTHORA I YFESIS TETARTIMORION" . 118987)
+ ("BYZANTINE MUSICAL SYMBOL FTHORA ENARMONIOS ANTIFONIA" . 118988)
+ ("BYZANTINE MUSICAL SYMBOL YFESIS TRITIMORION" . 118989)
+ ("BYZANTINE MUSICAL SYMBOL DIESIS TRITIMORION" . 118990)
+ ("BYZANTINE MUSICAL SYMBOL DIESIS TETARTIMORION" . 118991)
+ ("BYZANTINE MUSICAL SYMBOL DIESIS APLI DYO DODEKATA" . 118992)
+ ("BYZANTINE MUSICAL SYMBOL DIESIS MONOGRAMMOS TESSERA DODEKATA" . 118993)
+ ("BYZANTINE MUSICAL SYMBOL DIESIS DIGRAMMOS EX DODEKATA" . 118994)
+ ("BYZANTINE MUSICAL SYMBOL DIESIS TRIGRAMMOS OKTO DODEKATA" . 118995)
+ ("BYZANTINE MUSICAL SYMBOL YFESIS APLI DYO DODEKATA" . 118996)
+ ("BYZANTINE MUSICAL SYMBOL YFESIS MONOGRAMMOS TESSERA DODEKATA" . 118997)
+ ("BYZANTINE MUSICAL SYMBOL YFESIS DIGRAMMOS EX DODEKATA" . 118998)
+ ("BYZANTINE MUSICAL SYMBOL YFESIS TRIGRAMMOS OKTO DODEKATA" . 118999)
+ ("BYZANTINE MUSICAL SYMBOL GENIKI DIESIS" . 119000)
+ ("BYZANTINE MUSICAL SYMBOL GENIKI YFESIS" . 119001)
+ ("BYZANTINE MUSICAL SYMBOL DIASTOLI APLI MIKRI" . 119002)
+ ("BYZANTINE MUSICAL SYMBOL DIASTOLI APLI MEGALI" . 119003)
+ ("BYZANTINE MUSICAL SYMBOL DIASTOLI DIPLI" . 119004)
+ ("BYZANTINE MUSICAL SYMBOL DIASTOLI THESEOS" . 119005)
+ ("BYZANTINE MUSICAL SYMBOL SIMANSIS THESEOS" . 119006)
+ ("BYZANTINE MUSICAL SYMBOL SIMANSIS THESEOS DISIMOU" . 119007)
+ ("BYZANTINE MUSICAL SYMBOL SIMANSIS THESEOS TRISIMOU" . 119008)
+ ("BYZANTINE MUSICAL SYMBOL SIMANSIS THESEOS TETRASIMOU" . 119009)
+ ("BYZANTINE MUSICAL SYMBOL SIMANSIS ARSEOS" . 119010)
+ ("BYZANTINE MUSICAL SYMBOL SIMANSIS ARSEOS DISIMOU" . 119011)
+ ("BYZANTINE MUSICAL SYMBOL SIMANSIS ARSEOS TRISIMOU" . 119012)
+ ("BYZANTINE MUSICAL SYMBOL SIMANSIS ARSEOS TETRASIMOU" . 119013)
+ ("BYZANTINE MUSICAL SYMBOL DIGRAMMA GG" . 119014)
+ ("BYZANTINE MUSICAL SYMBOL DIFTOGGOS OU" . 119015)
+ ("BYZANTINE MUSICAL SYMBOL STIGMA" . 119016)
+ ("BYZANTINE MUSICAL SYMBOL ARKTIKO PA" . 119017)
+ ("BYZANTINE MUSICAL SYMBOL ARKTIKO VOU" . 119018)
+ ("BYZANTINE MUSICAL SYMBOL ARKTIKO GA" . 119019)
+ ("BYZANTINE MUSICAL SYMBOL ARKTIKO DI" . 119020)
+ ("BYZANTINE MUSICAL SYMBOL ARKTIKO KE" . 119021)
+ ("BYZANTINE MUSICAL SYMBOL ARKTIKO ZO" . 119022)
+ ("BYZANTINE MUSICAL SYMBOL ARKTIKO NI" . 119023)
+ ("BYZANTINE MUSICAL SYMBOL KENTIMATA NEO MESO" . 119024)
+ ("BYZANTINE MUSICAL SYMBOL KENTIMA NEO MESO" . 119025)
+ ("BYZANTINE MUSICAL SYMBOL KENTIMATA NEO KATO" . 119026)
+ ("BYZANTINE MUSICAL SYMBOL KENTIMA NEO KATO" . 119027)
+ ("BYZANTINE MUSICAL SYMBOL KLASMA KATO" . 119028)
+ ("BYZANTINE MUSICAL SYMBOL GORGON NEO KATO" . 119029)
+ ("MUSICAL SYMBOL SINGLE BARLINE" . 119040)
+ ("MUSICAL SYMBOL DOUBLE BARLINE" . 119041)
+ ("MUSICAL SYMBOL FINAL BARLINE" . 119042)
+ ("MUSICAL SYMBOL REVERSE FINAL BARLINE" . 119043)
+ ("MUSICAL SYMBOL DASHED BARLINE" . 119044)
+ ("MUSICAL SYMBOL SHORT BARLINE" . 119045)
+ ("MUSICAL SYMBOL LEFT REPEAT SIGN" . 119046)
+ ("MUSICAL SYMBOL RIGHT REPEAT SIGN" . 119047)
+ ("MUSICAL SYMBOL REPEAT DOTS" . 119048)
+ ("MUSICAL SYMBOL DAL SEGNO" . 119049)
+ ("MUSICAL SYMBOL DA CAPO" . 119050)
+ ("MUSICAL SYMBOL SEGNO" . 119051)
+ ("MUSICAL SYMBOL CODA" . 119052)
+ ("MUSICAL SYMBOL REPEATED FIGURE-1" . 119053)
+ ("MUSICAL SYMBOL REPEATED FIGURE-2" . 119054)
+ ("MUSICAL SYMBOL REPEATED FIGURE-3" . 119055)
+ ("MUSICAL SYMBOL FERMATA" . 119056)
+ ("MUSICAL SYMBOL FERMATA BELOW" . 119057)
+ ("MUSICAL SYMBOL BREATH MARK" . 119058)
+ ("MUSICAL SYMBOL CAESURA" . 119059)
+ ("MUSICAL SYMBOL BRACE" . 119060)
+ ("MUSICAL SYMBOL BRACKET" . 119061)
+ ("MUSICAL SYMBOL ONE-LINE STAFF" . 119062)
+ ("MUSICAL SYMBOL TWO-LINE STAFF" . 119063)
+ ("MUSICAL SYMBOL THREE-LINE STAFF" . 119064)
+ ("MUSICAL SYMBOL FOUR-LINE STAFF" . 119065)
+ ("MUSICAL SYMBOL FIVE-LINE STAFF" . 119066)
+ ("MUSICAL SYMBOL SIX-LINE STAFF" . 119067)
+ ("MUSICAL SYMBOL SIX-STRING FRETBOARD" . 119068)
+ ("MUSICAL SYMBOL FOUR-STRING FRETBOARD" . 119069)
+ ("MUSICAL SYMBOL G CLEF" . 119070)
+ ("MUSICAL SYMBOL G CLEF OTTAVA ALTA" . 119071)
+ ("MUSICAL SYMBOL G CLEF OTTAVA BASSA" . 119072)
+ ("MUSICAL SYMBOL C CLEF" . 119073)
+ ("MUSICAL SYMBOL F CLEF" . 119074)
+ ("MUSICAL SYMBOL F CLEF OTTAVA ALTA" . 119075)
+ ("MUSICAL SYMBOL F CLEF OTTAVA BASSA" . 119076)
+ ("MUSICAL SYMBOL DRUM CLEF-1" . 119077)
+ ("MUSICAL SYMBOL DRUM CLEF-2" . 119078)
+ ("MUSICAL SYMBOL DOUBLE SHARP" . 119082)
+ ("MUSICAL SYMBOL DOUBLE FLAT" . 119083)
+ ("MUSICAL SYMBOL FLAT UP" . 119084)
+ ("MUSICAL SYMBOL FLAT DOWN" . 119085)
+ ("MUSICAL SYMBOL NATURAL UP" . 119086)
+ ("MUSICAL SYMBOL NATURAL DOWN" . 119087)
+ ("MUSICAL SYMBOL SHARP UP" . 119088)
+ ("MUSICAL SYMBOL SHARP DOWN" . 119089)
+ ("MUSICAL SYMBOL QUARTER TONE SHARP" . 119090)
+ ("MUSICAL SYMBOL QUARTER TONE FLAT" . 119091)
+ ("MUSICAL SYMBOL COMMON TIME" . 119092)
+ ("MUSICAL SYMBOL CUT TIME" . 119093)
+ ("MUSICAL SYMBOL OTTAVA ALTA" . 119094)
+ ("MUSICAL SYMBOL OTTAVA BASSA" . 119095)
+ ("MUSICAL SYMBOL QUINDICESIMA ALTA" . 119096)
+ ("MUSICAL SYMBOL QUINDICESIMA BASSA" . 119097)
+ ("MUSICAL SYMBOL MULTI REST" . 119098)
+ ("MUSICAL SYMBOL WHOLE REST" . 119099)
+ ("MUSICAL SYMBOL HALF REST" . 119100)
+ ("MUSICAL SYMBOL QUARTER REST" . 119101)
+ ("MUSICAL SYMBOL EIGHTH REST" . 119102)
+ ("MUSICAL SYMBOL SIXTEENTH REST" . 119103)
+ ("MUSICAL SYMBOL THIRTY-SECOND REST" . 119104)
+ ("MUSICAL SYMBOL SIXTY-FOURTH REST" . 119105)
+ ("MUSICAL SYMBOL ONE HUNDRED TWENTY-EIGHTH REST" . 119106)
+ ("MUSICAL SYMBOL X NOTEHEAD" . 119107)
+ ("MUSICAL SYMBOL PLUS NOTEHEAD" . 119108)
+ ("MUSICAL SYMBOL CIRCLE X NOTEHEAD" . 119109)
+ ("MUSICAL SYMBOL SQUARE NOTEHEAD WHITE" . 119110)
+ ("MUSICAL SYMBOL SQUARE NOTEHEAD BLACK" . 119111)
+ ("MUSICAL SYMBOL TRIANGLE NOTEHEAD UP WHITE" . 119112)
+ ("MUSICAL SYMBOL TRIANGLE NOTEHEAD UP BLACK" . 119113)
+ ("MUSICAL SYMBOL TRIANGLE NOTEHEAD LEFT WHITE" . 119114)
+ ("MUSICAL SYMBOL TRIANGLE NOTEHEAD LEFT BLACK" . 119115)
+ ("MUSICAL SYMBOL TRIANGLE NOTEHEAD RIGHT WHITE" . 119116)
+ ("MUSICAL SYMBOL TRIANGLE NOTEHEAD RIGHT BLACK" . 119117)
+ ("MUSICAL SYMBOL TRIANGLE NOTEHEAD DOWN WHITE" . 119118)
+ ("MUSICAL SYMBOL TRIANGLE NOTEHEAD DOWN BLACK" . 119119)
+ ("MUSICAL SYMBOL TRIANGLE NOTEHEAD UP RIGHT WHITE" . 119120)
+ ("MUSICAL SYMBOL TRIANGLE NOTEHEAD UP RIGHT BLACK" . 119121)
+ ("MUSICAL SYMBOL MOON NOTEHEAD WHITE" . 119122)
+ ("MUSICAL SYMBOL MOON NOTEHEAD BLACK" . 119123)
+ ("MUSICAL SYMBOL TRIANGLE-ROUND NOTEHEAD DOWN WHITE" . 119124)
+ ("MUSICAL SYMBOL TRIANGLE-ROUND NOTEHEAD DOWN BLACK" . 119125)
+ ("MUSICAL SYMBOL PARENTHESIS NOTEHEAD" . 119126)
+ ("MUSICAL SYMBOL VOID NOTEHEAD" . 119127)
+ ("MUSICAL SYMBOL NOTEHEAD BLACK" . 119128)
+ ("MUSICAL SYMBOL NULL NOTEHEAD" . 119129)
+ ("MUSICAL SYMBOL CLUSTER NOTEHEAD WHITE" . 119130)
+ ("MUSICAL SYMBOL CLUSTER NOTEHEAD BLACK" . 119131)
+ ("MUSICAL SYMBOL BREVE" . 119132)
+ ("MUSICAL SYMBOL WHOLE NOTE" . 119133)
+ ("MUSICAL SYMBOL HALF NOTE" . 119134)
+ ("MUSICAL SYMBOL QUARTER NOTE" . 119135)
+ ("MUSICAL SYMBOL EIGHTH NOTE" . 119136)
+ ("MUSICAL SYMBOL SIXTEENTH NOTE" . 119137)
+ ("MUSICAL SYMBOL THIRTY-SECOND NOTE" . 119138)
+ ("MUSICAL SYMBOL SIXTY-FOURTH NOTE" . 119139)
+ ("MUSICAL SYMBOL ONE HUNDRED TWENTY-EIGHTH NOTE" . 119140)
+ ("MUSICAL SYMBOL COMBINING STEM" . 119141)
+ ("MUSICAL SYMBOL COMBINING SPRECHGESANG STEM" . 119142)
+ ("MUSICAL SYMBOL COMBINING TREMOLO-1" . 119143)
+ ("MUSICAL SYMBOL COMBINING TREMOLO-2" . 119144)
+ ("MUSICAL SYMBOL COMBINING TREMOLO-3" . 119145)
+ ("MUSICAL SYMBOL FINGERED TREMOLO-1" . 119146)
+ ("MUSICAL SYMBOL FINGERED TREMOLO-2" . 119147)
+ ("MUSICAL SYMBOL FINGERED TREMOLO-3" . 119148)
+ ("MUSICAL SYMBOL COMBINING AUGMENTATION DOT" . 119149)
+ ("MUSICAL SYMBOL COMBINING FLAG-1" . 119150)
+ ("MUSICAL SYMBOL COMBINING FLAG-2" . 119151)
+ ("MUSICAL SYMBOL COMBINING FLAG-3" . 119152)
+ ("MUSICAL SYMBOL COMBINING FLAG-4" . 119153)
+ ("MUSICAL SYMBOL COMBINING FLAG-5" . 119154)
+ ("MUSICAL SYMBOL BEGIN BEAM" . 119155)
+ ("MUSICAL SYMBOL END BEAM" . 119156)
+ ("MUSICAL SYMBOL BEGIN TIE" . 119157)
+ ("MUSICAL SYMBOL END TIE" . 119158)
+ ("MUSICAL SYMBOL BEGIN SLUR" . 119159)
+ ("MUSICAL SYMBOL END SLUR" . 119160)
+ ("MUSICAL SYMBOL BEGIN PHRASE" . 119161)
+ ("MUSICAL SYMBOL END PHRASE" . 119162)
+ ("MUSICAL SYMBOL COMBINING ACCENT" . 119163)
+ ("MUSICAL SYMBOL COMBINING STACCATO" . 119164)
+ ("MUSICAL SYMBOL COMBINING TENUTO" . 119165)
+ ("MUSICAL SYMBOL COMBINING STACCATISSIMO" . 119166)
+ ("MUSICAL SYMBOL COMBINING MARCATO" . 119167)
+ ("MUSICAL SYMBOL COMBINING MARCATO-STACCATO" . 119168)
+ ("MUSICAL SYMBOL COMBINING ACCENT-STACCATO" . 119169)
+ ("MUSICAL SYMBOL COMBINING LOURE" . 119170)
+ ("MUSICAL SYMBOL ARPEGGIATO UP" . 119171)
+ ("MUSICAL SYMBOL ARPEGGIATO DOWN" . 119172)
+ ("MUSICAL SYMBOL COMBINING DOIT" . 119173)
+ ("MUSICAL SYMBOL COMBINING RIP" . 119174)
+ ("MUSICAL SYMBOL COMBINING FLIP" . 119175)
+ ("MUSICAL SYMBOL COMBINING SMEAR" . 119176)
+ ("MUSICAL SYMBOL COMBINING BEND" . 119177)
+ ("MUSICAL SYMBOL COMBINING DOUBLE TONGUE" . 119178)
+ ("MUSICAL SYMBOL COMBINING TRIPLE TONGUE" . 119179)
+ ("MUSICAL SYMBOL RINFORZANDO" . 119180)
+ ("MUSICAL SYMBOL SUBITO" . 119181)
+ ("MUSICAL SYMBOL Z" . 119182)
+ ("MUSICAL SYMBOL PIANO" . 119183)
+ ("MUSICAL SYMBOL MEZZO" . 119184)
+ ("MUSICAL SYMBOL FORTE" . 119185)
+ ("MUSICAL SYMBOL CRESCENDO" . 119186)
+ ("MUSICAL SYMBOL DECRESCENDO" . 119187)
+ ("MUSICAL SYMBOL GRACE NOTE SLASH" . 119188)
+ ("MUSICAL SYMBOL GRACE NOTE NO SLASH" . 119189)
+ ("MUSICAL SYMBOL TR" . 119190)
+ ("MUSICAL SYMBOL TURN" . 119191)
+ ("MUSICAL SYMBOL INVERTED TURN" . 119192)
+ ("MUSICAL SYMBOL TURN SLASH" . 119193)
+ ("MUSICAL SYMBOL TURN UP" . 119194)
+ ("MUSICAL SYMBOL ORNAMENT STROKE-1" . 119195)
+ ("MUSICAL SYMBOL ORNAMENT STROKE-2" . 119196)
+ ("MUSICAL SYMBOL ORNAMENT STROKE-3" . 119197)
+ ("MUSICAL SYMBOL ORNAMENT STROKE-4" . 119198)
+ ("MUSICAL SYMBOL ORNAMENT STROKE-5" . 119199)
+ ("MUSICAL SYMBOL ORNAMENT STROKE-6" . 119200)
+ ("MUSICAL SYMBOL ORNAMENT STROKE-7" . 119201)
+ ("MUSICAL SYMBOL ORNAMENT STROKE-8" . 119202)
+ ("MUSICAL SYMBOL ORNAMENT STROKE-9" . 119203)
+ ("MUSICAL SYMBOL ORNAMENT STROKE-10" . 119204)
+ ("MUSICAL SYMBOL ORNAMENT STROKE-11" . 119205)
+ ("MUSICAL SYMBOL HAUPTSTIMME" . 119206)
+ ("MUSICAL SYMBOL NEBENSTIMME" . 119207)
+ ("MUSICAL SYMBOL END OF STIMME" . 119208)
+ ("MUSICAL SYMBOL DEGREE SLASH" . 119209)
+ ("MUSICAL SYMBOL COMBINING DOWN BOW" . 119210)
+ ("MUSICAL SYMBOL COMBINING UP BOW" . 119211)
+ ("MUSICAL SYMBOL COMBINING HARMONIC" . 119212)
+ ("MUSICAL SYMBOL COMBINING SNAP PIZZICATO" . 119213)
+ ("MUSICAL SYMBOL PEDAL MARK" . 119214)
+ ("MUSICAL SYMBOL PEDAL UP MARK" . 119215)
+ ("MUSICAL SYMBOL HALF PEDAL MARK" . 119216)
+ ("MUSICAL SYMBOL GLISSANDO UP" . 119217)
+ ("MUSICAL SYMBOL GLISSANDO DOWN" . 119218)
+ ("MUSICAL SYMBOL WITH FINGERNAILS" . 119219)
+ ("MUSICAL SYMBOL DAMP" . 119220)
+ ("MUSICAL SYMBOL DAMP ALL" . 119221)
+ ("MUSICAL SYMBOL MAXIMA" . 119222)
+ ("MUSICAL SYMBOL LONGA" . 119223)
+ ("MUSICAL SYMBOL BREVIS" . 119224)
+ ("MUSICAL SYMBOL SEMIBREVIS WHITE" . 119225)
+ ("MUSICAL SYMBOL SEMIBREVIS BLACK" . 119226)
+ ("MUSICAL SYMBOL MINIMA" . 119227)
+ ("MUSICAL SYMBOL MINIMA BLACK" . 119228)
+ ("MUSICAL SYMBOL SEMIMINIMA WHITE" . 119229)
+ ("MUSICAL SYMBOL SEMIMINIMA BLACK" . 119230)
+ ("MUSICAL SYMBOL FUSA WHITE" . 119231)
+ ("MUSICAL SYMBOL FUSA BLACK" . 119232)
+ ("MUSICAL SYMBOL LONGA PERFECTA REST" . 119233)
+ ("MUSICAL SYMBOL LONGA IMPERFECTA REST" . 119234)
+ ("MUSICAL SYMBOL BREVIS REST" . 119235)
+ ("MUSICAL SYMBOL SEMIBREVIS REST" . 119236)
+ ("MUSICAL SYMBOL MINIMA REST" . 119237)
+ ("MUSICAL SYMBOL SEMIMINIMA REST" . 119238)
+ ("MUSICAL SYMBOL TEMPUS PERFECTUM CUM PROLATIONE PERFECTA" . 119239)
+ ("MUSICAL SYMBOL TEMPUS PERFECTUM CUM PROLATIONE IMPERFECTA" . 119240)
+ ("MUSICAL SYMBOL TEMPUS PERFECTUM CUM PROLATIONE PERFECTA DIMINUTION-1" . 119241)
+ ("MUSICAL SYMBOL TEMPUS IMPERFECTUM CUM PROLATIONE PERFECTA" . 119242)
+ ("MUSICAL SYMBOL TEMPUS IMPERFECTUM CUM PROLATIONE IMPERFECTA" . 119243)
+ ("MUSICAL SYMBOL TEMPUS IMPERFECTUM CUM PROLATIONE IMPERFECTA DIMINUTION-1" . 119244)
+ ("MUSICAL SYMBOL TEMPUS IMPERFECTUM CUM PROLATIONE IMPERFECTA DIMINUTION-2" . 119245)
+ ("MUSICAL SYMBOL TEMPUS IMPERFECTUM CUM PROLATIONE IMPERFECTA DIMINUTION-3" . 119246)
+ ("MUSICAL SYMBOL CROIX" . 119247)
+ ("MUSICAL SYMBOL GREGORIAN C CLEF" . 119248)
+ ("MUSICAL SYMBOL GREGORIAN F CLEF" . 119249)
+ ("MUSICAL SYMBOL SQUARE B" . 119250)
+ ("MUSICAL SYMBOL VIRGA" . 119251)
+ ("MUSICAL SYMBOL PODATUS" . 119252)
+ ("MUSICAL SYMBOL CLIVIS" . 119253)
+ ("MUSICAL SYMBOL SCANDICUS" . 119254)
+ ("MUSICAL SYMBOL CLIMACUS" . 119255)
+ ("MUSICAL SYMBOL TORCULUS" . 119256)
+ ("MUSICAL SYMBOL PORRECTUS" . 119257)
+ ("MUSICAL SYMBOL PORRECTUS FLEXUS" . 119258)
+ ("MUSICAL SYMBOL SCANDICUS FLEXUS" . 119259)
+ ("MUSICAL SYMBOL TORCULUS RESUPINUS" . 119260)
+ ("MUSICAL SYMBOL PES SUBPUNCTIS" . 119261)
+ ("MATHEMATICAL BOLD CAPITAL A" . 119808)
+ ("MATHEMATICAL BOLD CAPITAL B" . 119809)
+ ("MATHEMATICAL BOLD CAPITAL C" . 119810)
+ ("MATHEMATICAL BOLD CAPITAL D" . 119811)
+ ("MATHEMATICAL BOLD CAPITAL E" . 119812)
+ ("MATHEMATICAL BOLD CAPITAL F" . 119813)
+ ("MATHEMATICAL BOLD CAPITAL G" . 119814)
+ ("MATHEMATICAL BOLD CAPITAL H" . 119815)
+ ("MATHEMATICAL BOLD CAPITAL I" . 119816)
+ ("MATHEMATICAL BOLD CAPITAL J" . 119817)
+ ("MATHEMATICAL BOLD CAPITAL K" . 119818)
+ ("MATHEMATICAL BOLD CAPITAL L" . 119819)
+ ("MATHEMATICAL BOLD CAPITAL M" . 119820)
+ ("MATHEMATICAL BOLD CAPITAL N" . 119821)
+ ("MATHEMATICAL BOLD CAPITAL O" . 119822)
+ ("MATHEMATICAL BOLD CAPITAL P" . 119823)
+ ("MATHEMATICAL BOLD CAPITAL Q" . 119824)
+ ("MATHEMATICAL BOLD CAPITAL R" . 119825)
+ ("MATHEMATICAL BOLD CAPITAL S" . 119826)
+ ("MATHEMATICAL BOLD CAPITAL T" . 119827)
+ ("MATHEMATICAL BOLD CAPITAL U" . 119828)
+ ("MATHEMATICAL BOLD CAPITAL V" . 119829)
+ ("MATHEMATICAL BOLD CAPITAL W" . 119830)
+ ("MATHEMATICAL BOLD CAPITAL X" . 119831)
+ ("MATHEMATICAL BOLD CAPITAL Y" . 119832)
+ ("MATHEMATICAL BOLD CAPITAL Z" . 119833)
+ ("MATHEMATICAL BOLD SMALL A" . 119834)
+ ("MATHEMATICAL BOLD SMALL B" . 119835)
+ ("MATHEMATICAL BOLD SMALL C" . 119836)
+ ("MATHEMATICAL BOLD SMALL D" . 119837)
+ ("MATHEMATICAL BOLD SMALL E" . 119838)
+ ("MATHEMATICAL BOLD SMALL F" . 119839)
+ ("MATHEMATICAL BOLD SMALL G" . 119840)
+ ("MATHEMATICAL BOLD SMALL H" . 119841)
+ ("MATHEMATICAL BOLD SMALL I" . 119842)
+ ("MATHEMATICAL BOLD SMALL J" . 119843)
+ ("MATHEMATICAL BOLD SMALL K" . 119844)
+ ("MATHEMATICAL BOLD SMALL L" . 119845)
+ ("MATHEMATICAL BOLD SMALL M" . 119846)
+ ("MATHEMATICAL BOLD SMALL N" . 119847)
+ ("MATHEMATICAL BOLD SMALL O" . 119848)
+ ("MATHEMATICAL BOLD SMALL P" . 119849)
+ ("MATHEMATICAL BOLD SMALL Q" . 119850)
+ ("MATHEMATICAL BOLD SMALL R" . 119851)
+ ("MATHEMATICAL BOLD SMALL S" . 119852)
+ ("MATHEMATICAL BOLD SMALL T" . 119853)
+ ("MATHEMATICAL BOLD SMALL U" . 119854)
+ ("MATHEMATICAL BOLD SMALL V" . 119855)
+ ("MATHEMATICAL BOLD SMALL W" . 119856)
+ ("MATHEMATICAL BOLD SMALL X" . 119857)
+ ("MATHEMATICAL BOLD SMALL Y" . 119858)
+ ("MATHEMATICAL BOLD SMALL Z" . 119859)
+ ("MATHEMATICAL ITALIC CAPITAL A" . 119860)
+ ("MATHEMATICAL ITALIC CAPITAL B" . 119861)
+ ("MATHEMATICAL ITALIC CAPITAL C" . 119862)
+ ("MATHEMATICAL ITALIC CAPITAL D" . 119863)
+ ("MATHEMATICAL ITALIC CAPITAL E" . 119864)
+ ("MATHEMATICAL ITALIC CAPITAL F" . 119865)
+ ("MATHEMATICAL ITALIC CAPITAL G" . 119866)
+ ("MATHEMATICAL ITALIC CAPITAL H" . 119867)
+ ("MATHEMATICAL ITALIC CAPITAL I" . 119868)
+ ("MATHEMATICAL ITALIC CAPITAL J" . 119869)
+ ("MATHEMATICAL ITALIC CAPITAL K" . 119870)
+ ("MATHEMATICAL ITALIC CAPITAL L" . 119871)
+ ("MATHEMATICAL ITALIC CAPITAL M" . 119872)
+ ("MATHEMATICAL ITALIC CAPITAL N" . 119873)
+ ("MATHEMATICAL ITALIC CAPITAL O" . 119874)
+ ("MATHEMATICAL ITALIC CAPITAL P" . 119875)
+ ("MATHEMATICAL ITALIC CAPITAL Q" . 119876)
+ ("MATHEMATICAL ITALIC CAPITAL R" . 119877)
+ ("MATHEMATICAL ITALIC CAPITAL S" . 119878)
+ ("MATHEMATICAL ITALIC CAPITAL T" . 119879)
+ ("MATHEMATICAL ITALIC CAPITAL U" . 119880)
+ ("MATHEMATICAL ITALIC CAPITAL V" . 119881)
+ ("MATHEMATICAL ITALIC CAPITAL W" . 119882)
+ ("MATHEMATICAL ITALIC CAPITAL X" . 119883)
+ ("MATHEMATICAL ITALIC CAPITAL Y" . 119884)
+ ("MATHEMATICAL ITALIC CAPITAL Z" . 119885)
+ ("MATHEMATICAL ITALIC SMALL A" . 119886)
+ ("MATHEMATICAL ITALIC SMALL B" . 119887)
+ ("MATHEMATICAL ITALIC SMALL C" . 119888)
+ ("MATHEMATICAL ITALIC SMALL D" . 119889)
+ ("MATHEMATICAL ITALIC SMALL E" . 119890)
+ ("MATHEMATICAL ITALIC SMALL F" . 119891)
+ ("MATHEMATICAL ITALIC SMALL G" . 119892)
+ ("MATHEMATICAL ITALIC SMALL I" . 119894)
+ ("MATHEMATICAL ITALIC SMALL J" . 119895)
+ ("MATHEMATICAL ITALIC SMALL K" . 119896)
+ ("MATHEMATICAL ITALIC SMALL L" . 119897)
+ ("MATHEMATICAL ITALIC SMALL M" . 119898)
+ ("MATHEMATICAL ITALIC SMALL N" . 119899)
+ ("MATHEMATICAL ITALIC SMALL O" . 119900)
+ ("MATHEMATICAL ITALIC SMALL P" . 119901)
+ ("MATHEMATICAL ITALIC SMALL Q" . 119902)
+ ("MATHEMATICAL ITALIC SMALL R" . 119903)
+ ("MATHEMATICAL ITALIC SMALL S" . 119904)
+ ("MATHEMATICAL ITALIC SMALL T" . 119905)
+ ("MATHEMATICAL ITALIC SMALL U" . 119906)
+ ("MATHEMATICAL ITALIC SMALL V" . 119907)
+ ("MATHEMATICAL ITALIC SMALL W" . 119908)
+ ("MATHEMATICAL ITALIC SMALL X" . 119909)
+ ("MATHEMATICAL ITALIC SMALL Y" . 119910)
+ ("MATHEMATICAL ITALIC SMALL Z" . 119911)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL A" . 119912)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL B" . 119913)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL C" . 119914)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL D" . 119915)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL E" . 119916)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL F" . 119917)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL G" . 119918)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL H" . 119919)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL I" . 119920)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL J" . 119921)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL K" . 119922)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL L" . 119923)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL M" . 119924)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL N" . 119925)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL O" . 119926)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL P" . 119927)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL Q" . 119928)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL R" . 119929)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL S" . 119930)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL T" . 119931)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL U" . 119932)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL V" . 119933)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL W" . 119934)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL X" . 119935)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL Y" . 119936)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL Z" . 119937)
+ ("MATHEMATICAL BOLD ITALIC SMALL A" . 119938)
+ ("MATHEMATICAL BOLD ITALIC SMALL B" . 119939)
+ ("MATHEMATICAL BOLD ITALIC SMALL C" . 119940)
+ ("MATHEMATICAL BOLD ITALIC SMALL D" . 119941)
+ ("MATHEMATICAL BOLD ITALIC SMALL E" . 119942)
+ ("MATHEMATICAL BOLD ITALIC SMALL F" . 119943)
+ ("MATHEMATICAL BOLD ITALIC SMALL G" . 119944)
+ ("MATHEMATICAL BOLD ITALIC SMALL H" . 119945)
+ ("MATHEMATICAL BOLD ITALIC SMALL I" . 119946)
+ ("MATHEMATICAL BOLD ITALIC SMALL J" . 119947)
+ ("MATHEMATICAL BOLD ITALIC SMALL K" . 119948)
+ ("MATHEMATICAL BOLD ITALIC SMALL L" . 119949)
+ ("MATHEMATICAL BOLD ITALIC SMALL M" . 119950)
+ ("MATHEMATICAL BOLD ITALIC SMALL N" . 119951)
+ ("MATHEMATICAL BOLD ITALIC SMALL O" . 119952)
+ ("MATHEMATICAL BOLD ITALIC SMALL P" . 119953)
+ ("MATHEMATICAL BOLD ITALIC SMALL Q" . 119954)
+ ("MATHEMATICAL BOLD ITALIC SMALL R" . 119955)
+ ("MATHEMATICAL BOLD ITALIC SMALL S" . 119956)
+ ("MATHEMATICAL BOLD ITALIC SMALL T" . 119957)
+ ("MATHEMATICAL BOLD ITALIC SMALL U" . 119958)
+ ("MATHEMATICAL BOLD ITALIC SMALL V" . 119959)
+ ("MATHEMATICAL BOLD ITALIC SMALL W" . 119960)
+ ("MATHEMATICAL BOLD ITALIC SMALL X" . 119961)
+ ("MATHEMATICAL BOLD ITALIC SMALL Y" . 119962)
+ ("MATHEMATICAL BOLD ITALIC SMALL Z" . 119963)
+ ("MATHEMATICAL SCRIPT CAPITAL A" . 119964)
+ ("MATHEMATICAL SCRIPT CAPITAL C" . 119966)
+ ("MATHEMATICAL SCRIPT CAPITAL D" . 119967)
+ ("MATHEMATICAL SCRIPT CAPITAL G" . 119970)
+ ("MATHEMATICAL SCRIPT CAPITAL J" . 119973)
+ ("MATHEMATICAL SCRIPT CAPITAL K" . 119974)
+ ("MATHEMATICAL SCRIPT CAPITAL N" . 119977)
+ ("MATHEMATICAL SCRIPT CAPITAL O" . 119978)
+ ("MATHEMATICAL SCRIPT CAPITAL P" . 119979)
+ ("MATHEMATICAL SCRIPT CAPITAL Q" . 119980)
+ ("MATHEMATICAL SCRIPT CAPITAL S" . 119982)
+ ("MATHEMATICAL SCRIPT CAPITAL T" . 119983)
+ ("MATHEMATICAL SCRIPT CAPITAL U" . 119984)
+ ("MATHEMATICAL SCRIPT CAPITAL V" . 119985)
+ ("MATHEMATICAL SCRIPT CAPITAL W" . 119986)
+ ("MATHEMATICAL SCRIPT CAPITAL X" . 119987)
+ ("MATHEMATICAL SCRIPT CAPITAL Y" . 119988)
+ ("MATHEMATICAL SCRIPT CAPITAL Z" . 119989)
+ ("MATHEMATICAL SCRIPT SMALL A" . 119990)
+ ("MATHEMATICAL SCRIPT SMALL B" . 119991)
+ ("MATHEMATICAL SCRIPT SMALL C" . 119992)
+ ("MATHEMATICAL SCRIPT SMALL D" . 119993)
+ ("MATHEMATICAL SCRIPT SMALL F" . 119995)
+ ("MATHEMATICAL SCRIPT SMALL H" . 119997)
+ ("MATHEMATICAL SCRIPT SMALL I" . 119998)
+ ("MATHEMATICAL SCRIPT SMALL J" . 119999)
+ ("MATHEMATICAL SCRIPT SMALL K" . 120000)
+ ("MATHEMATICAL SCRIPT SMALL M" . 120002)
+ ("MATHEMATICAL SCRIPT SMALL N" . 120003)
+ ("MATHEMATICAL SCRIPT SMALL P" . 120005)
+ ("MATHEMATICAL SCRIPT SMALL Q" . 120006)
+ ("MATHEMATICAL SCRIPT SMALL R" . 120007)
+ ("MATHEMATICAL SCRIPT SMALL S" . 120008)
+ ("MATHEMATICAL SCRIPT SMALL T" . 120009)
+ ("MATHEMATICAL SCRIPT SMALL U" . 120010)
+ ("MATHEMATICAL SCRIPT SMALL V" . 120011)
+ ("MATHEMATICAL SCRIPT SMALL W" . 120012)
+ ("MATHEMATICAL SCRIPT SMALL X" . 120013)
+ ("MATHEMATICAL SCRIPT SMALL Y" . 120014)
+ ("MATHEMATICAL SCRIPT SMALL Z" . 120015)
+ ("MATHEMATICAL BOLD SCRIPT CAPITAL A" . 120016)
+ ("MATHEMATICAL BOLD SCRIPT CAPITAL B" . 120017)
+ ("MATHEMATICAL BOLD SCRIPT CAPITAL C" . 120018)
+ ("MATHEMATICAL BOLD SCRIPT CAPITAL D" . 120019)
+ ("MATHEMATICAL BOLD SCRIPT CAPITAL E" . 120020)
+ ("MATHEMATICAL BOLD SCRIPT CAPITAL F" . 120021)
+ ("MATHEMATICAL BOLD SCRIPT CAPITAL G" . 120022)
+ ("MATHEMATICAL BOLD SCRIPT CAPITAL H" . 120023)
+ ("MATHEMATICAL BOLD SCRIPT CAPITAL I" . 120024)
+ ("MATHEMATICAL BOLD SCRIPT CAPITAL J" . 120025)
+ ("MATHEMATICAL BOLD SCRIPT CAPITAL K" . 120026)
+ ("MATHEMATICAL BOLD SCRIPT CAPITAL L" . 120027)
+ ("MATHEMATICAL BOLD SCRIPT CAPITAL M" . 120028)
+ ("MATHEMATICAL BOLD SCRIPT CAPITAL N" . 120029)
+ ("MATHEMATICAL BOLD SCRIPT CAPITAL O" . 120030)
+ ("MATHEMATICAL BOLD SCRIPT CAPITAL P" . 120031)
+ ("MATHEMATICAL BOLD SCRIPT CAPITAL Q" . 120032)
+ ("MATHEMATICAL BOLD SCRIPT CAPITAL R" . 120033)
+ ("MATHEMATICAL BOLD SCRIPT CAPITAL S" . 120034)
+ ("MATHEMATICAL BOLD SCRIPT CAPITAL T" . 120035)
+ ("MATHEMATICAL BOLD SCRIPT CAPITAL U" . 120036)
+ ("MATHEMATICAL BOLD SCRIPT CAPITAL V" . 120037)
+ ("MATHEMATICAL BOLD SCRIPT CAPITAL W" . 120038)
+ ("MATHEMATICAL BOLD SCRIPT CAPITAL X" . 120039)
+ ("MATHEMATICAL BOLD SCRIPT CAPITAL Y" . 120040)
+ ("MATHEMATICAL BOLD SCRIPT CAPITAL Z" . 120041)
+ ("MATHEMATICAL BOLD SCRIPT SMALL A" . 120042)
+ ("MATHEMATICAL BOLD SCRIPT SMALL B" . 120043)
+ ("MATHEMATICAL BOLD SCRIPT SMALL C" . 120044)
+ ("MATHEMATICAL BOLD SCRIPT SMALL D" . 120045)
+ ("MATHEMATICAL BOLD SCRIPT SMALL E" . 120046)
+ ("MATHEMATICAL BOLD SCRIPT SMALL F" . 120047)
+ ("MATHEMATICAL BOLD SCRIPT SMALL G" . 120048)
+ ("MATHEMATICAL BOLD SCRIPT SMALL H" . 120049)
+ ("MATHEMATICAL BOLD SCRIPT SMALL I" . 120050)
+ ("MATHEMATICAL BOLD SCRIPT SMALL J" . 120051)
+ ("MATHEMATICAL BOLD SCRIPT SMALL K" . 120052)
+ ("MATHEMATICAL BOLD SCRIPT SMALL L" . 120053)
+ ("MATHEMATICAL BOLD SCRIPT SMALL M" . 120054)
+ ("MATHEMATICAL BOLD SCRIPT SMALL N" . 120055)
+ ("MATHEMATICAL BOLD SCRIPT SMALL O" . 120056)
+ ("MATHEMATICAL BOLD SCRIPT SMALL P" . 120057)
+ ("MATHEMATICAL BOLD SCRIPT SMALL Q" . 120058)
+ ("MATHEMATICAL BOLD SCRIPT SMALL R" . 120059)
+ ("MATHEMATICAL BOLD SCRIPT SMALL S" . 120060)
+ ("MATHEMATICAL BOLD SCRIPT SMALL T" . 120061)
+ ("MATHEMATICAL BOLD SCRIPT SMALL U" . 120062)
+ ("MATHEMATICAL BOLD SCRIPT SMALL V" . 120063)
+ ("MATHEMATICAL BOLD SCRIPT SMALL W" . 120064)
+ ("MATHEMATICAL BOLD SCRIPT SMALL X" . 120065)
+ ("MATHEMATICAL BOLD SCRIPT SMALL Y" . 120066)
+ ("MATHEMATICAL BOLD SCRIPT SMALL Z" . 120067)
+ ("MATHEMATICAL FRAKTUR CAPITAL A" . 120068)
+ ("MATHEMATICAL FRAKTUR CAPITAL B" . 120069)
+ ("MATHEMATICAL FRAKTUR CAPITAL D" . 120071)
+ ("MATHEMATICAL FRAKTUR CAPITAL E" . 120072)
+ ("MATHEMATICAL FRAKTUR CAPITAL F" . 120073)
+ ("MATHEMATICAL FRAKTUR CAPITAL G" . 120074)
+ ("MATHEMATICAL FRAKTUR CAPITAL J" . 120077)
+ ("MATHEMATICAL FRAKTUR CAPITAL K" . 120078)
+ ("MATHEMATICAL FRAKTUR CAPITAL L" . 120079)
+ ("MATHEMATICAL FRAKTUR CAPITAL M" . 120080)
+ ("MATHEMATICAL FRAKTUR CAPITAL N" . 120081)
+ ("MATHEMATICAL FRAKTUR CAPITAL O" . 120082)
+ ("MATHEMATICAL FRAKTUR CAPITAL P" . 120083)
+ ("MATHEMATICAL FRAKTUR CAPITAL Q" . 120084)
+ ("MATHEMATICAL FRAKTUR CAPITAL S" . 120086)
+ ("MATHEMATICAL FRAKTUR CAPITAL T" . 120087)
+ ("MATHEMATICAL FRAKTUR CAPITAL U" . 120088)
+ ("MATHEMATICAL FRAKTUR CAPITAL V" . 120089)
+ ("MATHEMATICAL FRAKTUR CAPITAL W" . 120090)
+ ("MATHEMATICAL FRAKTUR CAPITAL X" . 120091)
+ ("MATHEMATICAL FRAKTUR CAPITAL Y" . 120092)
+ ("MATHEMATICAL FRAKTUR SMALL A" . 120094)
+ ("MATHEMATICAL FRAKTUR SMALL B" . 120095)
+ ("MATHEMATICAL FRAKTUR SMALL C" . 120096)
+ ("MATHEMATICAL FRAKTUR SMALL D" . 120097)
+ ("MATHEMATICAL FRAKTUR SMALL E" . 120098)
+ ("MATHEMATICAL FRAKTUR SMALL F" . 120099)
+ ("MATHEMATICAL FRAKTUR SMALL G" . 120100)
+ ("MATHEMATICAL FRAKTUR SMALL H" . 120101)
+ ("MATHEMATICAL FRAKTUR SMALL I" . 120102)
+ ("MATHEMATICAL FRAKTUR SMALL J" . 120103)
+ ("MATHEMATICAL FRAKTUR SMALL K" . 120104)
+ ("MATHEMATICAL FRAKTUR SMALL L" . 120105)
+ ("MATHEMATICAL FRAKTUR SMALL M" . 120106)
+ ("MATHEMATICAL FRAKTUR SMALL N" . 120107)
+ ("MATHEMATICAL FRAKTUR SMALL O" . 120108)
+ ("MATHEMATICAL FRAKTUR SMALL P" . 120109)
+ ("MATHEMATICAL FRAKTUR SMALL Q" . 120110)
+ ("MATHEMATICAL FRAKTUR SMALL R" . 120111)
+ ("MATHEMATICAL FRAKTUR SMALL S" . 120112)
+ ("MATHEMATICAL FRAKTUR SMALL T" . 120113)
+ ("MATHEMATICAL FRAKTUR SMALL U" . 120114)
+ ("MATHEMATICAL FRAKTUR SMALL V" . 120115)
+ ("MATHEMATICAL FRAKTUR SMALL W" . 120116)
+ ("MATHEMATICAL FRAKTUR SMALL X" . 120117)
+ ("MATHEMATICAL FRAKTUR SMALL Y" . 120118)
+ ("MATHEMATICAL FRAKTUR SMALL Z" . 120119)
+ ("MATHEMATICAL DOUBLE-STRUCK CAPITAL A" . 120120)
+ ("MATHEMATICAL DOUBLE-STRUCK CAPITAL B" . 120121)
+ ("MATHEMATICAL DOUBLE-STRUCK CAPITAL D" . 120123)
+ ("MATHEMATICAL DOUBLE-STRUCK CAPITAL E" . 120124)
+ ("MATHEMATICAL DOUBLE-STRUCK CAPITAL F" . 120125)
+ ("MATHEMATICAL DOUBLE-STRUCK CAPITAL G" . 120126)
+ ("MATHEMATICAL DOUBLE-STRUCK CAPITAL I" . 120128)
+ ("MATHEMATICAL DOUBLE-STRUCK CAPITAL J" . 120129)
+ ("MATHEMATICAL DOUBLE-STRUCK CAPITAL K" . 120130)
+ ("MATHEMATICAL DOUBLE-STRUCK CAPITAL L" . 120131)
+ ("MATHEMATICAL DOUBLE-STRUCK CAPITAL M" . 120132)
+ ("MATHEMATICAL DOUBLE-STRUCK CAPITAL O" . 120134)
+ ("MATHEMATICAL DOUBLE-STRUCK CAPITAL S" . 120138)
+ ("MATHEMATICAL DOUBLE-STRUCK CAPITAL T" . 120139)
+ ("MATHEMATICAL DOUBLE-STRUCK CAPITAL U" . 120140)
+ ("MATHEMATICAL DOUBLE-STRUCK CAPITAL V" . 120141)
+ ("MATHEMATICAL DOUBLE-STRUCK CAPITAL W" . 120142)
+ ("MATHEMATICAL DOUBLE-STRUCK CAPITAL X" . 120143)
+ ("MATHEMATICAL DOUBLE-STRUCK CAPITAL Y" . 120144)
+ ("MATHEMATICAL DOUBLE-STRUCK SMALL A" . 120146)
+ ("MATHEMATICAL DOUBLE-STRUCK SMALL B" . 120147)
+ ("MATHEMATICAL DOUBLE-STRUCK SMALL C" . 120148)
+ ("MATHEMATICAL DOUBLE-STRUCK SMALL D" . 120149)
+ ("MATHEMATICAL DOUBLE-STRUCK SMALL E" . 120150)
+ ("MATHEMATICAL DOUBLE-STRUCK SMALL F" . 120151)
+ ("MATHEMATICAL DOUBLE-STRUCK SMALL G" . 120152)
+ ("MATHEMATICAL DOUBLE-STRUCK SMALL H" . 120153)
+ ("MATHEMATICAL DOUBLE-STRUCK SMALL I" . 120154)
+ ("MATHEMATICAL DOUBLE-STRUCK SMALL J" . 120155)
+ ("MATHEMATICAL DOUBLE-STRUCK SMALL K" . 120156)
+ ("MATHEMATICAL DOUBLE-STRUCK SMALL L" . 120157)
+ ("MATHEMATICAL DOUBLE-STRUCK SMALL M" . 120158)
+ ("MATHEMATICAL DOUBLE-STRUCK SMALL N" . 120159)
+ ("MATHEMATICAL DOUBLE-STRUCK SMALL O" . 120160)
+ ("MATHEMATICAL DOUBLE-STRUCK SMALL P" . 120161)
+ ("MATHEMATICAL DOUBLE-STRUCK SMALL Q" . 120162)
+ ("MATHEMATICAL DOUBLE-STRUCK SMALL R" . 120163)
+ ("MATHEMATICAL DOUBLE-STRUCK SMALL S" . 120164)
+ ("MATHEMATICAL DOUBLE-STRUCK SMALL T" . 120165)
+ ("MATHEMATICAL DOUBLE-STRUCK SMALL U" . 120166)
+ ("MATHEMATICAL DOUBLE-STRUCK SMALL V" . 120167)
+ ("MATHEMATICAL DOUBLE-STRUCK SMALL W" . 120168)
+ ("MATHEMATICAL DOUBLE-STRUCK SMALL X" . 120169)
+ ("MATHEMATICAL DOUBLE-STRUCK SMALL Y" . 120170)
+ ("MATHEMATICAL DOUBLE-STRUCK SMALL Z" . 120171)
+ ("MATHEMATICAL BOLD FRAKTUR CAPITAL A" . 120172)
+ ("MATHEMATICAL BOLD FRAKTUR CAPITAL B" . 120173)
+ ("MATHEMATICAL BOLD FRAKTUR CAPITAL C" . 120174)
+ ("MATHEMATICAL BOLD FRAKTUR CAPITAL D" . 120175)
+ ("MATHEMATICAL BOLD FRAKTUR CAPITAL E" . 120176)
+ ("MATHEMATICAL BOLD FRAKTUR CAPITAL F" . 120177)
+ ("MATHEMATICAL BOLD FRAKTUR CAPITAL G" . 120178)
+ ("MATHEMATICAL BOLD FRAKTUR CAPITAL H" . 120179)
+ ("MATHEMATICAL BOLD FRAKTUR CAPITAL I" . 120180)
+ ("MATHEMATICAL BOLD FRAKTUR CAPITAL J" . 120181)
+ ("MATHEMATICAL BOLD FRAKTUR CAPITAL K" . 120182)
+ ("MATHEMATICAL BOLD FRAKTUR CAPITAL L" . 120183)
+ ("MATHEMATICAL BOLD FRAKTUR CAPITAL M" . 120184)
+ ("MATHEMATICAL BOLD FRAKTUR CAPITAL N" . 120185)
+ ("MATHEMATICAL BOLD FRAKTUR CAPITAL O" . 120186)
+ ("MATHEMATICAL BOLD FRAKTUR CAPITAL P" . 120187)
+ ("MATHEMATICAL BOLD FRAKTUR CAPITAL Q" . 120188)
+ ("MATHEMATICAL BOLD FRAKTUR CAPITAL R" . 120189)
+ ("MATHEMATICAL BOLD FRAKTUR CAPITAL S" . 120190)
+ ("MATHEMATICAL BOLD FRAKTUR CAPITAL T" . 120191)
+ ("MATHEMATICAL BOLD FRAKTUR CAPITAL U" . 120192)
+ ("MATHEMATICAL BOLD FRAKTUR CAPITAL V" . 120193)
+ ("MATHEMATICAL BOLD FRAKTUR CAPITAL W" . 120194)
+ ("MATHEMATICAL BOLD FRAKTUR CAPITAL X" . 120195)
+ ("MATHEMATICAL BOLD FRAKTUR CAPITAL Y" . 120196)
+ ("MATHEMATICAL BOLD FRAKTUR CAPITAL Z" . 120197)
+ ("MATHEMATICAL BOLD FRAKTUR SMALL A" . 120198)
+ ("MATHEMATICAL BOLD FRAKTUR SMALL B" . 120199)
+ ("MATHEMATICAL BOLD FRAKTUR SMALL C" . 120200)
+ ("MATHEMATICAL BOLD FRAKTUR SMALL D" . 120201)
+ ("MATHEMATICAL BOLD FRAKTUR SMALL E" . 120202)
+ ("MATHEMATICAL BOLD FRAKTUR SMALL F" . 120203)
+ ("MATHEMATICAL BOLD FRAKTUR SMALL G" . 120204)
+ ("MATHEMATICAL BOLD FRAKTUR SMALL H" . 120205)
+ ("MATHEMATICAL BOLD FRAKTUR SMALL I" . 120206)
+ ("MATHEMATICAL BOLD FRAKTUR SMALL J" . 120207)
+ ("MATHEMATICAL BOLD FRAKTUR SMALL K" . 120208)
+ ("MATHEMATICAL BOLD FRAKTUR SMALL L" . 120209)
+ ("MATHEMATICAL BOLD FRAKTUR SMALL M" . 120210)
+ ("MATHEMATICAL BOLD FRAKTUR SMALL N" . 120211)
+ ("MATHEMATICAL BOLD FRAKTUR SMALL O" . 120212)
+ ("MATHEMATICAL BOLD FRAKTUR SMALL P" . 120213)
+ ("MATHEMATICAL BOLD FRAKTUR SMALL Q" . 120214)
+ ("MATHEMATICAL BOLD FRAKTUR SMALL R" . 120215)
+ ("MATHEMATICAL BOLD FRAKTUR SMALL S" . 120216)
+ ("MATHEMATICAL BOLD FRAKTUR SMALL T" . 120217)
+ ("MATHEMATICAL BOLD FRAKTUR SMALL U" . 120218)
+ ("MATHEMATICAL BOLD FRAKTUR SMALL V" . 120219)
+ ("MATHEMATICAL BOLD FRAKTUR SMALL W" . 120220)
+ ("MATHEMATICAL BOLD FRAKTUR SMALL X" . 120221)
+ ("MATHEMATICAL BOLD FRAKTUR SMALL Y" . 120222)
+ ("MATHEMATICAL BOLD FRAKTUR SMALL Z" . 120223)
+ ("MATHEMATICAL SANS-SERIF CAPITAL A" . 120224)
+ ("MATHEMATICAL SANS-SERIF CAPITAL B" . 120225)
+ ("MATHEMATICAL SANS-SERIF CAPITAL C" . 120226)
+ ("MATHEMATICAL SANS-SERIF CAPITAL D" . 120227)
+ ("MATHEMATICAL SANS-SERIF CAPITAL E" . 120228)
+ ("MATHEMATICAL SANS-SERIF CAPITAL F" . 120229)
+ ("MATHEMATICAL SANS-SERIF CAPITAL G" . 120230)
+ ("MATHEMATICAL SANS-SERIF CAPITAL H" . 120231)
+ ("MATHEMATICAL SANS-SERIF CAPITAL I" . 120232)
+ ("MATHEMATICAL SANS-SERIF CAPITAL J" . 120233)
+ ("MATHEMATICAL SANS-SERIF CAPITAL K" . 120234)
+ ("MATHEMATICAL SANS-SERIF CAPITAL L" . 120235)
+ ("MATHEMATICAL SANS-SERIF CAPITAL M" . 120236)
+ ("MATHEMATICAL SANS-SERIF CAPITAL N" . 120237)
+ ("MATHEMATICAL SANS-SERIF CAPITAL O" . 120238)
+ ("MATHEMATICAL SANS-SERIF CAPITAL P" . 120239)
+ ("MATHEMATICAL SANS-SERIF CAPITAL Q" . 120240)
+ ("MATHEMATICAL SANS-SERIF CAPITAL R" . 120241)
+ ("MATHEMATICAL SANS-SERIF CAPITAL S" . 120242)
+ ("MATHEMATICAL SANS-SERIF CAPITAL T" . 120243)
+ ("MATHEMATICAL SANS-SERIF CAPITAL U" . 120244)
+ ("MATHEMATICAL SANS-SERIF CAPITAL V" . 120245)
+ ("MATHEMATICAL SANS-SERIF CAPITAL W" . 120246)
+ ("MATHEMATICAL SANS-SERIF CAPITAL X" . 120247)
+ ("MATHEMATICAL SANS-SERIF CAPITAL Y" . 120248)
+ ("MATHEMATICAL SANS-SERIF CAPITAL Z" . 120249)
+ ("MATHEMATICAL SANS-SERIF SMALL A" . 120250)
+ ("MATHEMATICAL SANS-SERIF SMALL B" . 120251)
+ ("MATHEMATICAL SANS-SERIF SMALL C" . 120252)
+ ("MATHEMATICAL SANS-SERIF SMALL D" . 120253)
+ ("MATHEMATICAL SANS-SERIF SMALL E" . 120254)
+ ("MATHEMATICAL SANS-SERIF SMALL F" . 120255)
+ ("MATHEMATICAL SANS-SERIF SMALL G" . 120256)
+ ("MATHEMATICAL SANS-SERIF SMALL H" . 120257)
+ ("MATHEMATICAL SANS-SERIF SMALL I" . 120258)
+ ("MATHEMATICAL SANS-SERIF SMALL J" . 120259)
+ ("MATHEMATICAL SANS-SERIF SMALL K" . 120260)
+ ("MATHEMATICAL SANS-SERIF SMALL L" . 120261)
+ ("MATHEMATICAL SANS-SERIF SMALL M" . 120262)
+ ("MATHEMATICAL SANS-SERIF SMALL N" . 120263)
+ ("MATHEMATICAL SANS-SERIF SMALL O" . 120264)
+ ("MATHEMATICAL SANS-SERIF SMALL P" . 120265)
+ ("MATHEMATICAL SANS-SERIF SMALL Q" . 120266)
+ ("MATHEMATICAL SANS-SERIF SMALL R" . 120267)
+ ("MATHEMATICAL SANS-SERIF SMALL S" . 120268)
+ ("MATHEMATICAL SANS-SERIF SMALL T" . 120269)
+ ("MATHEMATICAL SANS-SERIF SMALL U" . 120270)
+ ("MATHEMATICAL SANS-SERIF SMALL V" . 120271)
+ ("MATHEMATICAL SANS-SERIF SMALL W" . 120272)
+ ("MATHEMATICAL SANS-SERIF SMALL X" . 120273)
+ ("MATHEMATICAL SANS-SERIF SMALL Y" . 120274)
+ ("MATHEMATICAL SANS-SERIF SMALL Z" . 120275)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL A" . 120276)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL B" . 120277)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL C" . 120278)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL D" . 120279)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL E" . 120280)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL F" . 120281)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL G" . 120282)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL H" . 120283)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL I" . 120284)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL J" . 120285)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL K" . 120286)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL L" . 120287)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL M" . 120288)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL N" . 120289)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL O" . 120290)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL P" . 120291)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL Q" . 120292)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL R" . 120293)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL S" . 120294)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL T" . 120295)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL U" . 120296)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL V" . 120297)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL W" . 120298)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL X" . 120299)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL Y" . 120300)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL Z" . 120301)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL A" . 120302)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL B" . 120303)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL C" . 120304)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL D" . 120305)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL E" . 120306)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL F" . 120307)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL G" . 120308)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL H" . 120309)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL I" . 120310)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL J" . 120311)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL K" . 120312)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL L" . 120313)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL M" . 120314)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL N" . 120315)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL O" . 120316)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL P" . 120317)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL Q" . 120318)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL R" . 120319)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL S" . 120320)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL T" . 120321)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL U" . 120322)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL V" . 120323)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL W" . 120324)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL X" . 120325)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL Y" . 120326)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL Z" . 120327)
+ ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL A" . 120328)
+ ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL B" . 120329)
+ ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL C" . 120330)
+ ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL D" . 120331)
+ ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL E" . 120332)
+ ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL F" . 120333)
+ ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL G" . 120334)
+ ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL H" . 120335)
+ ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL I" . 120336)
+ ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL J" . 120337)
+ ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL K" . 120338)
+ ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL L" . 120339)
+ ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL M" . 120340)
+ ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL N" . 120341)
+ ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL O" . 120342)
+ ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL P" . 120343)
+ ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL Q" . 120344)
+ ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL R" . 120345)
+ ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL S" . 120346)
+ ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL T" . 120347)
+ ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL U" . 120348)
+ ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL V" . 120349)
+ ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL W" . 120350)
+ ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL X" . 120351)
+ ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL Y" . 120352)
+ ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL Z" . 120353)
+ ("MATHEMATICAL SANS-SERIF ITALIC SMALL A" . 120354)
+ ("MATHEMATICAL SANS-SERIF ITALIC SMALL B" . 120355)
+ ("MATHEMATICAL SANS-SERIF ITALIC SMALL C" . 120356)
+ ("MATHEMATICAL SANS-SERIF ITALIC SMALL D" . 120357)
+ ("MATHEMATICAL SANS-SERIF ITALIC SMALL E" . 120358)
+ ("MATHEMATICAL SANS-SERIF ITALIC SMALL F" . 120359)
+ ("MATHEMATICAL SANS-SERIF ITALIC SMALL G" . 120360)
+ ("MATHEMATICAL SANS-SERIF ITALIC SMALL H" . 120361)
+ ("MATHEMATICAL SANS-SERIF ITALIC SMALL I" . 120362)
+ ("MATHEMATICAL SANS-SERIF ITALIC SMALL J" . 120363)
+ ("MATHEMATICAL SANS-SERIF ITALIC SMALL K" . 120364)
+ ("MATHEMATICAL SANS-SERIF ITALIC SMALL L" . 120365)
+ ("MATHEMATICAL SANS-SERIF ITALIC SMALL M" . 120366)
+ ("MATHEMATICAL SANS-SERIF ITALIC SMALL N" . 120367)
+ ("MATHEMATICAL SANS-SERIF ITALIC SMALL O" . 120368)
+ ("MATHEMATICAL SANS-SERIF ITALIC SMALL P" . 120369)
+ ("MATHEMATICAL SANS-SERIF ITALIC SMALL Q" . 120370)
+ ("MATHEMATICAL SANS-SERIF ITALIC SMALL R" . 120371)
+ ("MATHEMATICAL SANS-SERIF ITALIC SMALL S" . 120372)
+ ("MATHEMATICAL SANS-SERIF ITALIC SMALL T" . 120373)
+ ("MATHEMATICAL SANS-SERIF ITALIC SMALL U" . 120374)
+ ("MATHEMATICAL SANS-SERIF ITALIC SMALL V" . 120375)
+ ("MATHEMATICAL SANS-SERIF ITALIC SMALL W" . 120376)
+ ("MATHEMATICAL SANS-SERIF ITALIC SMALL X" . 120377)
+ ("MATHEMATICAL SANS-SERIF ITALIC SMALL Y" . 120378)
+ ("MATHEMATICAL SANS-SERIF ITALIC SMALL Z" . 120379)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL A" . 120380)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL B" . 120381)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL C" . 120382)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL D" . 120383)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL E" . 120384)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL F" . 120385)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL G" . 120386)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL H" . 120387)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL I" . 120388)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL J" . 120389)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL K" . 120390)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL L" . 120391)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL M" . 120392)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL N" . 120393)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL O" . 120394)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL P" . 120395)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL Q" . 120396)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL R" . 120397)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL S" . 120398)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL T" . 120399)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL U" . 120400)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL V" . 120401)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL W" . 120402)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL X" . 120403)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL Y" . 120404)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL Z" . 120405)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL A" . 120406)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL B" . 120407)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL C" . 120408)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL D" . 120409)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL E" . 120410)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL F" . 120411)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL G" . 120412)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL H" . 120413)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL I" . 120414)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL J" . 120415)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL K" . 120416)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL L" . 120417)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL M" . 120418)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL N" . 120419)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL O" . 120420)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL P" . 120421)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL Q" . 120422)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL R" . 120423)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL S" . 120424)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL T" . 120425)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL U" . 120426)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL V" . 120427)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL W" . 120428)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL X" . 120429)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL Y" . 120430)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL Z" . 120431)
+ ("MATHEMATICAL MONOSPACE CAPITAL A" . 120432)
+ ("MATHEMATICAL MONOSPACE CAPITAL B" . 120433)
+ ("MATHEMATICAL MONOSPACE CAPITAL C" . 120434)
+ ("MATHEMATICAL MONOSPACE CAPITAL D" . 120435)
+ ("MATHEMATICAL MONOSPACE CAPITAL E" . 120436)
+ ("MATHEMATICAL MONOSPACE CAPITAL F" . 120437)
+ ("MATHEMATICAL MONOSPACE CAPITAL G" . 120438)
+ ("MATHEMATICAL MONOSPACE CAPITAL H" . 120439)
+ ("MATHEMATICAL MONOSPACE CAPITAL I" . 120440)
+ ("MATHEMATICAL MONOSPACE CAPITAL J" . 120441)
+ ("MATHEMATICAL MONOSPACE CAPITAL K" . 120442)
+ ("MATHEMATICAL MONOSPACE CAPITAL L" . 120443)
+ ("MATHEMATICAL MONOSPACE CAPITAL M" . 120444)
+ ("MATHEMATICAL MONOSPACE CAPITAL N" . 120445)
+ ("MATHEMATICAL MONOSPACE CAPITAL O" . 120446)
+ ("MATHEMATICAL MONOSPACE CAPITAL P" . 120447)
+ ("MATHEMATICAL MONOSPACE CAPITAL Q" . 120448)
+ ("MATHEMATICAL MONOSPACE CAPITAL R" . 120449)
+ ("MATHEMATICAL MONOSPACE CAPITAL S" . 120450)
+ ("MATHEMATICAL MONOSPACE CAPITAL T" . 120451)
+ ("MATHEMATICAL MONOSPACE CAPITAL U" . 120452)
+ ("MATHEMATICAL MONOSPACE CAPITAL V" . 120453)
+ ("MATHEMATICAL MONOSPACE CAPITAL W" . 120454)
+ ("MATHEMATICAL MONOSPACE CAPITAL X" . 120455)
+ ("MATHEMATICAL MONOSPACE CAPITAL Y" . 120456)
+ ("MATHEMATICAL MONOSPACE CAPITAL Z" . 120457)
+ ("MATHEMATICAL MONOSPACE SMALL A" . 120458)
+ ("MATHEMATICAL MONOSPACE SMALL B" . 120459)
+ ("MATHEMATICAL MONOSPACE SMALL C" . 120460)
+ ("MATHEMATICAL MONOSPACE SMALL D" . 120461)
+ ("MATHEMATICAL MONOSPACE SMALL E" . 120462)
+ ("MATHEMATICAL MONOSPACE SMALL F" . 120463)
+ ("MATHEMATICAL MONOSPACE SMALL G" . 120464)
+ ("MATHEMATICAL MONOSPACE SMALL H" . 120465)
+ ("MATHEMATICAL MONOSPACE SMALL I" . 120466)
+ ("MATHEMATICAL MONOSPACE SMALL J" . 120467)
+ ("MATHEMATICAL MONOSPACE SMALL K" . 120468)
+ ("MATHEMATICAL MONOSPACE SMALL L" . 120469)
+ ("MATHEMATICAL MONOSPACE SMALL M" . 120470)
+ ("MATHEMATICAL MONOSPACE SMALL N" . 120471)
+ ("MATHEMATICAL MONOSPACE SMALL O" . 120472)
+ ("MATHEMATICAL MONOSPACE SMALL P" . 120473)
+ ("MATHEMATICAL MONOSPACE SMALL Q" . 120474)
+ ("MATHEMATICAL MONOSPACE SMALL R" . 120475)
+ ("MATHEMATICAL MONOSPACE SMALL S" . 120476)
+ ("MATHEMATICAL MONOSPACE SMALL T" . 120477)
+ ("MATHEMATICAL MONOSPACE SMALL U" . 120478)
+ ("MATHEMATICAL MONOSPACE SMALL V" . 120479)
+ ("MATHEMATICAL MONOSPACE SMALL W" . 120480)
+ ("MATHEMATICAL MONOSPACE SMALL X" . 120481)
+ ("MATHEMATICAL MONOSPACE SMALL Y" . 120482)
+ ("MATHEMATICAL MONOSPACE SMALL Z" . 120483)
+ ("MATHEMATICAL BOLD CAPITAL ALPHA" . 120488)
+ ("MATHEMATICAL BOLD CAPITAL BETA" . 120489)
+ ("MATHEMATICAL BOLD CAPITAL GAMMA" . 120490)
+ ("MATHEMATICAL BOLD CAPITAL DELTA" . 120491)
+ ("MATHEMATICAL BOLD CAPITAL EPSILON" . 120492)
+ ("MATHEMATICAL BOLD CAPITAL ZETA" . 120493)
+ ("MATHEMATICAL BOLD CAPITAL ETA" . 120494)
+ ("MATHEMATICAL BOLD CAPITAL THETA" . 120495)
+ ("MATHEMATICAL BOLD CAPITAL IOTA" . 120496)
+ ("MATHEMATICAL BOLD CAPITAL KAPPA" . 120497)
+ ("MATHEMATICAL BOLD CAPITAL LAMDA" . 120498)
+ ("MATHEMATICAL BOLD CAPITAL MU" . 120499)
+ ("MATHEMATICAL BOLD CAPITAL NU" . 120500)
+ ("MATHEMATICAL BOLD CAPITAL XI" . 120501)
+ ("MATHEMATICAL BOLD CAPITAL OMICRON" . 120502)
+ ("MATHEMATICAL BOLD CAPITAL PI" . 120503)
+ ("MATHEMATICAL BOLD CAPITAL RHO" . 120504)
+ ("MATHEMATICAL BOLD CAPITAL THETA SYMBOL" . 120505)
+ ("MATHEMATICAL BOLD CAPITAL SIGMA" . 120506)
+ ("MATHEMATICAL BOLD CAPITAL TAU" . 120507)
+ ("MATHEMATICAL BOLD CAPITAL UPSILON" . 120508)
+ ("MATHEMATICAL BOLD CAPITAL PHI" . 120509)
+ ("MATHEMATICAL BOLD CAPITAL CHI" . 120510)
+ ("MATHEMATICAL BOLD CAPITAL PSI" . 120511)
+ ("MATHEMATICAL BOLD CAPITAL OMEGA" . 120512)
+ ("MATHEMATICAL BOLD NABLA" . 120513)
+ ("MATHEMATICAL BOLD SMALL ALPHA" . 120514)
+ ("MATHEMATICAL BOLD SMALL BETA" . 120515)
+ ("MATHEMATICAL BOLD SMALL GAMMA" . 120516)
+ ("MATHEMATICAL BOLD SMALL DELTA" . 120517)
+ ("MATHEMATICAL BOLD SMALL EPSILON" . 120518)
+ ("MATHEMATICAL BOLD SMALL ZETA" . 120519)
+ ("MATHEMATICAL BOLD SMALL ETA" . 120520)
+ ("MATHEMATICAL BOLD SMALL THETA" . 120521)
+ ("MATHEMATICAL BOLD SMALL IOTA" . 120522)
+ ("MATHEMATICAL BOLD SMALL KAPPA" . 120523)
+ ("MATHEMATICAL BOLD SMALL LAMDA" . 120524)
+ ("MATHEMATICAL BOLD SMALL MU" . 120525)
+ ("MATHEMATICAL BOLD SMALL NU" . 120526)
+ ("MATHEMATICAL BOLD SMALL XI" . 120527)
+ ("MATHEMATICAL BOLD SMALL OMICRON" . 120528)
+ ("MATHEMATICAL BOLD SMALL PI" . 120529)
+ ("MATHEMATICAL BOLD SMALL RHO" . 120530)
+ ("MATHEMATICAL BOLD SMALL FINAL SIGMA" . 120531)
+ ("MATHEMATICAL BOLD SMALL SIGMA" . 120532)
+ ("MATHEMATICAL BOLD SMALL TAU" . 120533)
+ ("MATHEMATICAL BOLD SMALL UPSILON" . 120534)
+ ("MATHEMATICAL BOLD SMALL PHI" . 120535)
+ ("MATHEMATICAL BOLD SMALL CHI" . 120536)
+ ("MATHEMATICAL BOLD SMALL PSI" . 120537)
+ ("MATHEMATICAL BOLD SMALL OMEGA" . 120538)
+ ("MATHEMATICAL BOLD PARTIAL DIFFERENTIAL" . 120539)
+ ("MATHEMATICAL BOLD EPSILON SYMBOL" . 120540)
+ ("MATHEMATICAL BOLD THETA SYMBOL" . 120541)
+ ("MATHEMATICAL BOLD KAPPA SYMBOL" . 120542)
+ ("MATHEMATICAL BOLD PHI SYMBOL" . 120543)
+ ("MATHEMATICAL BOLD RHO SYMBOL" . 120544)
+ ("MATHEMATICAL BOLD PI SYMBOL" . 120545)
+ ("MATHEMATICAL ITALIC CAPITAL ALPHA" . 120546)
+ ("MATHEMATICAL ITALIC CAPITAL BETA" . 120547)
+ ("MATHEMATICAL ITALIC CAPITAL GAMMA" . 120548)
+ ("MATHEMATICAL ITALIC CAPITAL DELTA" . 120549)
+ ("MATHEMATICAL ITALIC CAPITAL EPSILON" . 120550)
+ ("MATHEMATICAL ITALIC CAPITAL ZETA" . 120551)
+ ("MATHEMATICAL ITALIC CAPITAL ETA" . 120552)
+ ("MATHEMATICAL ITALIC CAPITAL THETA" . 120553)
+ ("MATHEMATICAL ITALIC CAPITAL IOTA" . 120554)
+ ("MATHEMATICAL ITALIC CAPITAL KAPPA" . 120555)
+ ("MATHEMATICAL ITALIC CAPITAL LAMDA" . 120556)
+ ("MATHEMATICAL ITALIC CAPITAL MU" . 120557)
+ ("MATHEMATICAL ITALIC CAPITAL NU" . 120558)
+ ("MATHEMATICAL ITALIC CAPITAL XI" . 120559)
+ ("MATHEMATICAL ITALIC CAPITAL OMICRON" . 120560)
+ ("MATHEMATICAL ITALIC CAPITAL PI" . 120561)
+ ("MATHEMATICAL ITALIC CAPITAL RHO" . 120562)
+ ("MATHEMATICAL ITALIC CAPITAL THETA SYMBOL" . 120563)
+ ("MATHEMATICAL ITALIC CAPITAL SIGMA" . 120564)
+ ("MATHEMATICAL ITALIC CAPITAL TAU" . 120565)
+ ("MATHEMATICAL ITALIC CAPITAL UPSILON" . 120566)
+ ("MATHEMATICAL ITALIC CAPITAL PHI" . 120567)
+ ("MATHEMATICAL ITALIC CAPITAL CHI" . 120568)
+ ("MATHEMATICAL ITALIC CAPITAL PSI" . 120569)
+ ("MATHEMATICAL ITALIC CAPITAL OMEGA" . 120570)
+ ("MATHEMATICAL ITALIC NABLA" . 120571)
+ ("MATHEMATICAL ITALIC SMALL ALPHA" . 120572)
+ ("MATHEMATICAL ITALIC SMALL BETA" . 120573)
+ ("MATHEMATICAL ITALIC SMALL GAMMA" . 120574)
+ ("MATHEMATICAL ITALIC SMALL DELTA" . 120575)
+ ("MATHEMATICAL ITALIC SMALL EPSILON" . 120576)
+ ("MATHEMATICAL ITALIC SMALL ZETA" . 120577)
+ ("MATHEMATICAL ITALIC SMALL ETA" . 120578)
+ ("MATHEMATICAL ITALIC SMALL THETA" . 120579)
+ ("MATHEMATICAL ITALIC SMALL IOTA" . 120580)
+ ("MATHEMATICAL ITALIC SMALL KAPPA" . 120581)
+ ("MATHEMATICAL ITALIC SMALL LAMDA" . 120582)
+ ("MATHEMATICAL ITALIC SMALL MU" . 120583)
+ ("MATHEMATICAL ITALIC SMALL NU" . 120584)
+ ("MATHEMATICAL ITALIC SMALL XI" . 120585)
+ ("MATHEMATICAL ITALIC SMALL OMICRON" . 120586)
+ ("MATHEMATICAL ITALIC SMALL PI" . 120587)
+ ("MATHEMATICAL ITALIC SMALL RHO" . 120588)
+ ("MATHEMATICAL ITALIC SMALL FINAL SIGMA" . 120589)
+ ("MATHEMATICAL ITALIC SMALL SIGMA" . 120590)
+ ("MATHEMATICAL ITALIC SMALL TAU" . 120591)
+ ("MATHEMATICAL ITALIC SMALL UPSILON" . 120592)
+ ("MATHEMATICAL ITALIC SMALL PHI" . 120593)
+ ("MATHEMATICAL ITALIC SMALL CHI" . 120594)
+ ("MATHEMATICAL ITALIC SMALL PSI" . 120595)
+ ("MATHEMATICAL ITALIC SMALL OMEGA" . 120596)
+ ("MATHEMATICAL ITALIC PARTIAL DIFFERENTIAL" . 120597)
+ ("MATHEMATICAL ITALIC EPSILON SYMBOL" . 120598)
+ ("MATHEMATICAL ITALIC THETA SYMBOL" . 120599)
+ ("MATHEMATICAL ITALIC KAPPA SYMBOL" . 120600)
+ ("MATHEMATICAL ITALIC PHI SYMBOL" . 120601)
+ ("MATHEMATICAL ITALIC RHO SYMBOL" . 120602)
+ ("MATHEMATICAL ITALIC PI SYMBOL" . 120603)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL ALPHA" . 120604)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL BETA" . 120605)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL GAMMA" . 120606)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL DELTA" . 120607)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL EPSILON" . 120608)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL ZETA" . 120609)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL ETA" . 120610)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL THETA" . 120611)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL IOTA" . 120612)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL KAPPA" . 120613)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL LAMDA" . 120614)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL MU" . 120615)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL NU" . 120616)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL XI" . 120617)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL OMICRON" . 120618)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL PI" . 120619)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL RHO" . 120620)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL THETA SYMBOL" . 120621)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL SIGMA" . 120622)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL TAU" . 120623)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL UPSILON" . 120624)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL PHI" . 120625)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL CHI" . 120626)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL PSI" . 120627)
+ ("MATHEMATICAL BOLD ITALIC CAPITAL OMEGA" . 120628)
+ ("MATHEMATICAL BOLD ITALIC NABLA" . 120629)
+ ("MATHEMATICAL BOLD ITALIC SMALL ALPHA" . 120630)
+ ("MATHEMATICAL BOLD ITALIC SMALL BETA" . 120631)
+ ("MATHEMATICAL BOLD ITALIC SMALL GAMMA" . 120632)
+ ("MATHEMATICAL BOLD ITALIC SMALL DELTA" . 120633)
+ ("MATHEMATICAL BOLD ITALIC SMALL EPSILON" . 120634)
+ ("MATHEMATICAL BOLD ITALIC SMALL ZETA" . 120635)
+ ("MATHEMATICAL BOLD ITALIC SMALL ETA" . 120636)
+ ("MATHEMATICAL BOLD ITALIC SMALL THETA" . 120637)
+ ("MATHEMATICAL BOLD ITALIC SMALL IOTA" . 120638)
+ ("MATHEMATICAL BOLD ITALIC SMALL KAPPA" . 120639)
+ ("MATHEMATICAL BOLD ITALIC SMALL LAMDA" . 120640)
+ ("MATHEMATICAL BOLD ITALIC SMALL MU" . 120641)
+ ("MATHEMATICAL BOLD ITALIC SMALL NU" . 120642)
+ ("MATHEMATICAL BOLD ITALIC SMALL XI" . 120643)
+ ("MATHEMATICAL BOLD ITALIC SMALL OMICRON" . 120644)
+ ("MATHEMATICAL BOLD ITALIC SMALL PI" . 120645)
+ ("MATHEMATICAL BOLD ITALIC SMALL RHO" . 120646)
+ ("MATHEMATICAL BOLD ITALIC SMALL FINAL SIGMA" . 120647)
+ ("MATHEMATICAL BOLD ITALIC SMALL SIGMA" . 120648)
+ ("MATHEMATICAL BOLD ITALIC SMALL TAU" . 120649)
+ ("MATHEMATICAL BOLD ITALIC SMALL UPSILON" . 120650)
+ ("MATHEMATICAL BOLD ITALIC SMALL PHI" . 120651)
+ ("MATHEMATICAL BOLD ITALIC SMALL CHI" . 120652)
+ ("MATHEMATICAL BOLD ITALIC SMALL PSI" . 120653)
+ ("MATHEMATICAL BOLD ITALIC SMALL OMEGA" . 120654)
+ ("MATHEMATICAL BOLD ITALIC PARTIAL DIFFERENTIAL" . 120655)
+ ("MATHEMATICAL BOLD ITALIC EPSILON SYMBOL" . 120656)
+ ("MATHEMATICAL BOLD ITALIC THETA SYMBOL" . 120657)
+ ("MATHEMATICAL BOLD ITALIC KAPPA SYMBOL" . 120658)
+ ("MATHEMATICAL BOLD ITALIC PHI SYMBOL" . 120659)
+ ("MATHEMATICAL BOLD ITALIC RHO SYMBOL" . 120660)
+ ("MATHEMATICAL BOLD ITALIC PI SYMBOL" . 120661)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL ALPHA" . 120662)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL BETA" . 120663)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL GAMMA" . 120664)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL DELTA" . 120665)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL EPSILON" . 120666)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL ZETA" . 120667)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL ETA" . 120668)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL THETA" . 120669)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL IOTA" . 120670)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL KAPPA" . 120671)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL LAMDA" . 120672)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL MU" . 120673)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL NU" . 120674)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL XI" . 120675)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL OMICRON" . 120676)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL PI" . 120677)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL RHO" . 120678)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL THETA SYMBOL" . 120679)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL SIGMA" . 120680)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL TAU" . 120681)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL UPSILON" . 120682)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL PHI" . 120683)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL CHI" . 120684)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL PSI" . 120685)
+ ("MATHEMATICAL SANS-SERIF BOLD CAPITAL OMEGA" . 120686)
+ ("MATHEMATICAL SANS-SERIF BOLD NABLA" . 120687)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL ALPHA" . 120688)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL BETA" . 120689)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL GAMMA" . 120690)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL DELTA" . 120691)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL EPSILON" . 120692)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL ZETA" . 120693)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL ETA" . 120694)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL THETA" . 120695)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL IOTA" . 120696)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL KAPPA" . 120697)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL LAMDA" . 120698)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL MU" . 120699)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL NU" . 120700)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL XI" . 120701)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL OMICRON" . 120702)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL PI" . 120703)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL RHO" . 120704)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL FINAL SIGMA" . 120705)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL SIGMA" . 120706)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL TAU" . 120707)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL UPSILON" . 120708)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL PHI" . 120709)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL CHI" . 120710)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL PSI" . 120711)
+ ("MATHEMATICAL SANS-SERIF BOLD SMALL OMEGA" . 120712)
+ ("MATHEMATICAL SANS-SERIF BOLD PARTIAL DIFFERENTIAL" . 120713)
+ ("MATHEMATICAL SANS-SERIF BOLD EPSILON SYMBOL" . 120714)
+ ("MATHEMATICAL SANS-SERIF BOLD THETA SYMBOL" . 120715)
+ ("MATHEMATICAL SANS-SERIF BOLD KAPPA SYMBOL" . 120716)
+ ("MATHEMATICAL SANS-SERIF BOLD PHI SYMBOL" . 120717)
+ ("MATHEMATICAL SANS-SERIF BOLD RHO SYMBOL" . 120718)
+ ("MATHEMATICAL SANS-SERIF BOLD PI SYMBOL" . 120719)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL ALPHA" . 120720)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL BETA" . 120721)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL GAMMA" . 120722)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL DELTA" . 120723)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL EPSILON" . 120724)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL ZETA" . 120725)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL ETA" . 120726)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL THETA" . 120727)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL IOTA" . 120728)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL KAPPA" . 120729)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL LAMDA" . 120730)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL MU" . 120731)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL NU" . 120732)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL XI" . 120733)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL OMICRON" . 120734)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL PI" . 120735)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL RHO" . 120736)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL THETA SYMBOL" . 120737)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL SIGMA" . 120738)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL TAU" . 120739)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL UPSILON" . 120740)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL PHI" . 120741)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL CHI" . 120742)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL PSI" . 120743)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL OMEGA" . 120744)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC NABLA" . 120745)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL ALPHA" . 120746)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL BETA" . 120747)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL GAMMA" . 120748)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL DELTA" . 120749)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL EPSILON" . 120750)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL ZETA" . 120751)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL ETA" . 120752)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL THETA" . 120753)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL IOTA" . 120754)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL KAPPA" . 120755)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL LAMDA" . 120756)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL MU" . 120757)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL NU" . 120758)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL XI" . 120759)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL OMICRON" . 120760)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL PI" . 120761)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL RHO" . 120762)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL FINAL SIGMA" . 120763)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL SIGMA" . 120764)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL TAU" . 120765)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL UPSILON" . 120766)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL PHI" . 120767)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL CHI" . 120768)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL PSI" . 120769)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL OMEGA" . 120770)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC PARTIAL DIFFERENTIAL" . 120771)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC EPSILON SYMBOL" . 120772)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC THETA SYMBOL" . 120773)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC KAPPA SYMBOL" . 120774)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC PHI SYMBOL" . 120775)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC RHO SYMBOL" . 120776)
+ ("MATHEMATICAL SANS-SERIF BOLD ITALIC PI SYMBOL" . 120777)
+ ("MATHEMATICAL BOLD DIGIT ZERO" . 120782)
+ ("MATHEMATICAL BOLD DIGIT ONE" . 120783)
+ ("MATHEMATICAL BOLD DIGIT TWO" . 120784)
+ ("MATHEMATICAL BOLD DIGIT THREE" . 120785)
+ ("MATHEMATICAL BOLD DIGIT FOUR" . 120786)
+ ("MATHEMATICAL BOLD DIGIT FIVE" . 120787)
+ ("MATHEMATICAL BOLD DIGIT SIX" . 120788)
+ ("MATHEMATICAL BOLD DIGIT SEVEN" . 120789)
+ ("MATHEMATICAL BOLD DIGIT EIGHT" . 120790)
+ ("MATHEMATICAL BOLD DIGIT NINE" . 120791)
+ ("MATHEMATICAL DOUBLE-STRUCK DIGIT ZERO" . 120792)
+ ("MATHEMATICAL DOUBLE-STRUCK DIGIT ONE" . 120793)
+ ("MATHEMATICAL DOUBLE-STRUCK DIGIT TWO" . 120794)
+ ("MATHEMATICAL DOUBLE-STRUCK DIGIT THREE" . 120795)
+ ("MATHEMATICAL DOUBLE-STRUCK DIGIT FOUR" . 120796)
+ ("MATHEMATICAL DOUBLE-STRUCK DIGIT FIVE" . 120797)
+ ("MATHEMATICAL DOUBLE-STRUCK DIGIT SIX" . 120798)
+ ("MATHEMATICAL DOUBLE-STRUCK DIGIT SEVEN" . 120799)
+ ("MATHEMATICAL DOUBLE-STRUCK DIGIT EIGHT" . 120800)
+ ("MATHEMATICAL DOUBLE-STRUCK DIGIT NINE" . 120801)
+ ("MATHEMATICAL SANS-SERIF DIGIT ZERO" . 120802)
+ ("MATHEMATICAL SANS-SERIF DIGIT ONE" . 120803)
+ ("MATHEMATICAL SANS-SERIF DIGIT TWO" . 120804)
+ ("MATHEMATICAL SANS-SERIF DIGIT THREE" . 120805)
+ ("MATHEMATICAL SANS-SERIF DIGIT FOUR" . 120806)
+ ("MATHEMATICAL SANS-SERIF DIGIT FIVE" . 120807)
+ ("MATHEMATICAL SANS-SERIF DIGIT SIX" . 120808)
+ ("MATHEMATICAL SANS-SERIF DIGIT SEVEN" . 120809)
+ ("MATHEMATICAL SANS-SERIF DIGIT EIGHT" . 120810)
+ ("MATHEMATICAL SANS-SERIF DIGIT NINE" . 120811)
+ ("MATHEMATICAL SANS-SERIF BOLD DIGIT ZERO" . 120812)
+ ("MATHEMATICAL SANS-SERIF BOLD DIGIT ONE" . 120813)
+ ("MATHEMATICAL SANS-SERIF BOLD DIGIT TWO" . 120814)
+ ("MATHEMATICAL SANS-SERIF BOLD DIGIT THREE" . 120815)
+ ("MATHEMATICAL SANS-SERIF BOLD DIGIT FOUR" . 120816)
+ ("MATHEMATICAL SANS-SERIF BOLD DIGIT FIVE" . 120817)
+ ("MATHEMATICAL SANS-SERIF BOLD DIGIT SIX" . 120818)
+ ("MATHEMATICAL SANS-SERIF BOLD DIGIT SEVEN" . 120819)
+ ("MATHEMATICAL SANS-SERIF BOLD DIGIT EIGHT" . 120820)
+ ("MATHEMATICAL SANS-SERIF BOLD DIGIT NINE" . 120821)
+ ("MATHEMATICAL MONOSPACE DIGIT ZERO" . 120822)
+ ("MATHEMATICAL MONOSPACE DIGIT ONE" . 120823)
+ ("MATHEMATICAL MONOSPACE DIGIT TWO" . 120824)
+ ("MATHEMATICAL MONOSPACE DIGIT THREE" . 120825)
+ ("MATHEMATICAL MONOSPACE DIGIT FOUR" . 120826)
+ ("MATHEMATICAL MONOSPACE DIGIT FIVE" . 120827)
+ ("MATHEMATICAL MONOSPACE DIGIT SIX" . 120828)
+ ("MATHEMATICAL MONOSPACE DIGIT SEVEN" . 120829)
+ ("MATHEMATICAL MONOSPACE DIGIT EIGHT" . 120830)
+ ("MATHEMATICAL MONOSPACE DIGIT NINE" . 120831)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F800" . 194560)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F801" . 194561)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F802" . 194562)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F803" . 194563)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F804" . 194564)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F805" . 194565)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F806" . 194566)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F807" . 194567)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F808" . 194568)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F809" . 194569)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F80A" . 194570)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F80B" . 194571)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F80C" . 194572)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F80D" . 194573)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F80E" . 194574)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F80F" . 194575)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F810" . 194576)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F811" . 194577)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F812" . 194578)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F813" . 194579)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F814" . 194580)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F815" . 194581)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F816" . 194582)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F817" . 194583)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F818" . 194584)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F819" . 194585)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F81A" . 194586)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F81B" . 194587)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F81C" . 194588)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F81D" . 194589)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F81E" . 194590)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F81F" . 194591)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F820" . 194592)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F821" . 194593)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F822" . 194594)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F823" . 194595)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F824" . 194596)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F825" . 194597)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F826" . 194598)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F827" . 194599)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F828" . 194600)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F829" . 194601)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F82A" . 194602)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F82B" . 194603)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F82C" . 194604)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F82D" . 194605)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F82E" . 194606)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F82F" . 194607)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F830" . 194608)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F831" . 194609)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F832" . 194610)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F833" . 194611)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F834" . 194612)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F835" . 194613)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F836" . 194614)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F837" . 194615)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F838" . 194616)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F839" . 194617)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F83A" . 194618)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F83B" . 194619)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F83C" . 194620)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F83D" . 194621)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F83E" . 194622)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F83F" . 194623)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F840" . 194624)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F841" . 194625)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F842" . 194626)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F843" . 194627)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F844" . 194628)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F845" . 194629)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F846" . 194630)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F847" . 194631)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F848" . 194632)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F849" . 194633)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F84A" . 194634)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F84B" . 194635)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F84C" . 194636)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F84D" . 194637)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F84E" . 194638)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F84F" . 194639)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F850" . 194640)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F851" . 194641)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F852" . 194642)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F853" . 194643)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F854" . 194644)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F855" . 194645)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F856" . 194646)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F857" . 194647)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F858" . 194648)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F859" . 194649)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F85A" . 194650)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F85B" . 194651)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F85C" . 194652)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F85D" . 194653)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F85E" . 194654)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F85F" . 194655)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F860" . 194656)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F861" . 194657)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F862" . 194658)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F863" . 194659)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F864" . 194660)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F865" . 194661)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F866" . 194662)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F867" . 194663)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F868" . 194664)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F869" . 194665)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F86A" . 194666)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F86B" . 194667)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F86C" . 194668)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F86D" . 194669)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F86E" . 194670)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F86F" . 194671)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F870" . 194672)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F871" . 194673)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F872" . 194674)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F873" . 194675)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F874" . 194676)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F875" . 194677)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F876" . 194678)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F877" . 194679)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F878" . 194680)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F879" . 194681)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F87A" . 194682)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F87B" . 194683)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F87C" . 194684)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F87D" . 194685)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F87E" . 194686)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F87F" . 194687)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F880" . 194688)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F881" . 194689)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F882" . 194690)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F883" . 194691)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F884" . 194692)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F885" . 194693)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F886" . 194694)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F887" . 194695)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F888" . 194696)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F889" . 194697)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F88A" . 194698)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F88B" . 194699)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F88C" . 194700)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F88D" . 194701)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F88E" . 194702)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F88F" . 194703)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F890" . 194704)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F891" . 194705)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F892" . 194706)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F893" . 194707)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F894" . 194708)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F895" . 194709)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F896" . 194710)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F897" . 194711)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F898" . 194712)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F899" . 194713)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F89A" . 194714)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F89B" . 194715)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F89C" . 194716)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F89D" . 194717)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F89E" . 194718)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F89F" . 194719)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8A0" . 194720)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8A1" . 194721)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8A2" . 194722)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8A3" . 194723)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8A4" . 194724)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8A5" . 194725)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8A6" . 194726)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8A7" . 194727)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8A8" . 194728)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8A9" . 194729)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8AA" . 194730)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8AB" . 194731)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8AC" . 194732)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8AD" . 194733)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8AE" . 194734)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8AF" . 194735)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8B0" . 194736)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8B1" . 194737)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8B2" . 194738)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8B3" . 194739)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8B4" . 194740)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8B5" . 194741)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8B6" . 194742)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8B7" . 194743)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8B8" . 194744)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8B9" . 194745)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8BA" . 194746)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8BB" . 194747)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8BC" . 194748)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8BD" . 194749)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8BE" . 194750)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8BF" . 194751)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8C0" . 194752)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8C1" . 194753)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8C2" . 194754)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8C3" . 194755)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8C4" . 194756)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8C5" . 194757)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8C6" . 194758)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8C7" . 194759)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8C8" . 194760)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8C9" . 194761)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8CA" . 194762)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8CB" . 194763)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8CC" . 194764)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8CD" . 194765)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8CE" . 194766)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8CF" . 194767)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8D0" . 194768)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8D1" . 194769)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8D2" . 194770)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8D3" . 194771)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8D4" . 194772)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8D5" . 194773)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8D6" . 194774)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8D7" . 194775)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8D8" . 194776)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8D9" . 194777)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8DA" . 194778)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8DB" . 194779)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8DC" . 194780)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8DD" . 194781)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8DE" . 194782)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8DF" . 194783)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8E0" . 194784)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8E1" . 194785)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8E2" . 194786)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8E3" . 194787)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8E4" . 194788)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8E5" . 194789)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8E6" . 194790)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8E7" . 194791)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8E8" . 194792)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8E9" . 194793)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8EA" . 194794)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8EB" . 194795)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8EC" . 194796)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8ED" . 194797)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8EE" . 194798)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8EF" . 194799)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8F0" . 194800)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8F1" . 194801)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8F2" . 194802)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8F3" . 194803)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8F4" . 194804)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8F5" . 194805)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8F6" . 194806)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8F7" . 194807)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8F8" . 194808)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8F9" . 194809)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8FA" . 194810)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8FB" . 194811)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8FC" . 194812)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8FD" . 194813)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8FE" . 194814)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F8FF" . 194815)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F900" . 194816)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F901" . 194817)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F902" . 194818)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F903" . 194819)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F904" . 194820)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F905" . 194821)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F906" . 194822)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F907" . 194823)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F908" . 194824)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F909" . 194825)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F90A" . 194826)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F90B" . 194827)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F90C" . 194828)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F90D" . 194829)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F90E" . 194830)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F90F" . 194831)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F910" . 194832)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F911" . 194833)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F912" . 194834)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F913" . 194835)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F914" . 194836)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F915" . 194837)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F916" . 194838)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F917" . 194839)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F918" . 194840)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F919" . 194841)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F91A" . 194842)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F91B" . 194843)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F91C" . 194844)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F91D" . 194845)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F91E" . 194846)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F91F" . 194847)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F920" . 194848)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F921" . 194849)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F922" . 194850)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F923" . 194851)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F924" . 194852)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F925" . 194853)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F926" . 194854)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F927" . 194855)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F928" . 194856)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F929" . 194857)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F92A" . 194858)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F92B" . 194859)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F92C" . 194860)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F92D" . 194861)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F92E" . 194862)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F92F" . 194863)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F930" . 194864)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F931" . 194865)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F932" . 194866)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F933" . 194867)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F934" . 194868)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F935" . 194869)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F936" . 194870)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F937" . 194871)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F938" . 194872)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F939" . 194873)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F93A" . 194874)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F93B" . 194875)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F93C" . 194876)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F93D" . 194877)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F93E" . 194878)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F93F" . 194879)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F940" . 194880)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F941" . 194881)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F942" . 194882)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F943" . 194883)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F944" . 194884)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F945" . 194885)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F946" . 194886)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F947" . 194887)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F948" . 194888)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F949" . 194889)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F94A" . 194890)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F94B" . 194891)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F94C" . 194892)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F94D" . 194893)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F94E" . 194894)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F94F" . 194895)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F950" . 194896)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F951" . 194897)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F952" . 194898)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F953" . 194899)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F954" . 194900)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F955" . 194901)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F956" . 194902)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F957" . 194903)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F958" . 194904)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F959" . 194905)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F95A" . 194906)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F95B" . 194907)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F95C" . 194908)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F95D" . 194909)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F95E" . 194910)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F95F" . 194911)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F960" . 194912)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F961" . 194913)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F962" . 194914)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F963" . 194915)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F964" . 194916)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F965" . 194917)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F966" . 194918)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F967" . 194919)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F968" . 194920)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F969" . 194921)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F96A" . 194922)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F96B" . 194923)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F96C" . 194924)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F96D" . 194925)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F96E" . 194926)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F96F" . 194927)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F970" . 194928)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F971" . 194929)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F972" . 194930)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F973" . 194931)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F974" . 194932)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F975" . 194933)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F976" . 194934)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F977" . 194935)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F978" . 194936)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F979" . 194937)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F97A" . 194938)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F97B" . 194939)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F97C" . 194940)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F97D" . 194941)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F97E" . 194942)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F97F" . 194943)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F980" . 194944)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F981" . 194945)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F982" . 194946)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F983" . 194947)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F984" . 194948)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F985" . 194949)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F986" . 194950)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F987" . 194951)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F988" . 194952)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F989" . 194953)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F98A" . 194954)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F98B" . 194955)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F98C" . 194956)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F98D" . 194957)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F98E" . 194958)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F98F" . 194959)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F990" . 194960)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F991" . 194961)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F992" . 194962)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F993" . 194963)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F994" . 194964)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F995" . 194965)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F996" . 194966)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F997" . 194967)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F998" . 194968)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F999" . 194969)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F99A" . 194970)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F99B" . 194971)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F99C" . 194972)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F99D" . 194973)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F99E" . 194974)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F99F" . 194975)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9A0" . 194976)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9A1" . 194977)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9A2" . 194978)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9A3" . 194979)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9A4" . 194980)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9A5" . 194981)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9A6" . 194982)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9A7" . 194983)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9A8" . 194984)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9A9" . 194985)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9AA" . 194986)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9AB" . 194987)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9AC" . 194988)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9AD" . 194989)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9AE" . 194990)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9AF" . 194991)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9B0" . 194992)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9B1" . 194993)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9B2" . 194994)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9B3" . 194995)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9B4" . 194996)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9B5" . 194997)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9B6" . 194998)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9B7" . 194999)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9B8" . 195000)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9B9" . 195001)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9BA" . 195002)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9BB" . 195003)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9BC" . 195004)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9BD" . 195005)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9BE" . 195006)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9BF" . 195007)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9C0" . 195008)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9C1" . 195009)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9C2" . 195010)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9C3" . 195011)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9C4" . 195012)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9C5" . 195013)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9C6" . 195014)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9C7" . 195015)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9C8" . 195016)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9C9" . 195017)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9CA" . 195018)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9CB" . 195019)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9CC" . 195020)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9CD" . 195021)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9CE" . 195022)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9CF" . 195023)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9D0" . 195024)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9D1" . 195025)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9D2" . 195026)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9D3" . 195027)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9D4" . 195028)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9D5" . 195029)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9D6" . 195030)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9D7" . 195031)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9D8" . 195032)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9D9" . 195033)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9DA" . 195034)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9DB" . 195035)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9DC" . 195036)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9DD" . 195037)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9DE" . 195038)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9DF" . 195039)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9E0" . 195040)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9E1" . 195041)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9E2" . 195042)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9E3" . 195043)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9E4" . 195044)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9E5" . 195045)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9E6" . 195046)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9E7" . 195047)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9E8" . 195048)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9E9" . 195049)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9EA" . 195050)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9EB" . 195051)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9EC" . 195052)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9ED" . 195053)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9EE" . 195054)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9EF" . 195055)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9F0" . 195056)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9F1" . 195057)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9F2" . 195058)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9F3" . 195059)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9F4" . 195060)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9F5" . 195061)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9F6" . 195062)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9F7" . 195063)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9F8" . 195064)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9F9" . 195065)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9FA" . 195066)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9FB" . 195067)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9FC" . 195068)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9FD" . 195069)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9FE" . 195070)
+ ("CJK COMPATIBILITY IDEOGRAPH-2F9FF" . 195071)
+ ("CJK COMPATIBILITY IDEOGRAPH-2FA00" . 195072)
+ ("CJK COMPATIBILITY IDEOGRAPH-2FA01" . 195073)
+ ("CJK COMPATIBILITY IDEOGRAPH-2FA02" . 195074)
+ ("CJK COMPATIBILITY IDEOGRAPH-2FA03" . 195075)
+ ("CJK COMPATIBILITY IDEOGRAPH-2FA04" . 195076)
+ ("CJK COMPATIBILITY IDEOGRAPH-2FA05" . 195077)
+ ("CJK COMPATIBILITY IDEOGRAPH-2FA06" . 195078)
+ ("CJK COMPATIBILITY IDEOGRAPH-2FA07" . 195079)
+ ("CJK COMPATIBILITY IDEOGRAPH-2FA08" . 195080)
+ ("CJK COMPATIBILITY IDEOGRAPH-2FA09" . 195081)
+ ("CJK COMPATIBILITY IDEOGRAPH-2FA0A" . 195082)
+ ("CJK COMPATIBILITY IDEOGRAPH-2FA0B" . 195083)
+ ("CJK COMPATIBILITY IDEOGRAPH-2FA0C" . 195084)
+ ("CJK COMPATIBILITY IDEOGRAPH-2FA0D" . 195085)
+ ("CJK COMPATIBILITY IDEOGRAPH-2FA0E" . 195086)
+ ("CJK COMPATIBILITY IDEOGRAPH-2FA0F" . 195087)
+ ("CJK COMPATIBILITY IDEOGRAPH-2FA10" . 195088)
+ ("CJK COMPATIBILITY IDEOGRAPH-2FA11" . 195089)
+ ("CJK COMPATIBILITY IDEOGRAPH-2FA12" . 195090)
+ ("CJK COMPATIBILITY IDEOGRAPH-2FA13" . 195091)
+ ("CJK COMPATIBILITY IDEOGRAPH-2FA14" . 195092)
+ ("CJK COMPATIBILITY IDEOGRAPH-2FA15" . 195093)
+ ("CJK COMPATIBILITY IDEOGRAPH-2FA16" . 195094)
+ ("CJK COMPATIBILITY IDEOGRAPH-2FA17" . 195095)
+ ("CJK COMPATIBILITY IDEOGRAPH-2FA18" . 195096)
+ ("CJK COMPATIBILITY IDEOGRAPH-2FA19" . 195097)
+ ("CJK COMPATIBILITY IDEOGRAPH-2FA1A" . 195098)
+ ("CJK COMPATIBILITY IDEOGRAPH-2FA1B" . 195099)
+ ("CJK COMPATIBILITY IDEOGRAPH-2FA1C" . 195100)
+ ("CJK COMPATIBILITY IDEOGRAPH-2FA1D" . 195101)
+ ("LANGUAGE TAG" . 917505)
+ ("TAG SPACE" . 917536)
+ ("TAG EXCLAMATION MARK" . 917537)
+ ("TAG QUOTATION MARK" . 917538)
+ ("TAG NUMBER SIGN" . 917539)
+ ("TAG DOLLAR SIGN" . 917540)
+ ("TAG PERCENT SIGN" . 917541)
+ ("TAG AMPERSAND" . 917542)
+ ("TAG APOSTROPHE" . 917543)
+ ("TAG LEFT PARENTHESIS" . 917544)
+ ("TAG RIGHT PARENTHESIS" . 917545)
+ ("TAG ASTERISK" . 917546)
+ ("TAG PLUS SIGN" . 917547)
+ ("TAG COMMA" . 917548)
+ ("TAG HYPHEN-MINUS" . 917549)
+ ("TAG FULL STOP" . 917550)
+ ("TAG SOLIDUS" . 917551)
+ ("TAG DIGIT ZERO" . 917552)
+ ("TAG DIGIT ONE" . 917553)
+ ("TAG DIGIT TWO" . 917554)
+ ("TAG DIGIT THREE" . 917555)
+ ("TAG DIGIT FOUR" . 917556)
+ ("TAG DIGIT FIVE" . 917557)
+ ("TAG DIGIT SIX" . 917558)
+ ("TAG DIGIT SEVEN" . 917559)
+ ("TAG DIGIT EIGHT" . 917560)
+ ("TAG DIGIT NINE" . 917561)
+ ("TAG COLON" . 917562)
+ ("TAG SEMICOLON" . 917563)
+ ("TAG LESS-THAN SIGN" . 917564)
+ ("TAG EQUALS SIGN" . 917565)
+ ("TAG GREATER-THAN SIGN" . 917566)
+ ("TAG QUESTION MARK" . 917567)
+ ("TAG COMMERCIAL AT" . 917568)
+ ("TAG LATIN CAPITAL LETTER A" . 917569)
+ ("TAG LATIN CAPITAL LETTER B" . 917570)
+ ("TAG LATIN CAPITAL LETTER C" . 917571)
+ ("TAG LATIN CAPITAL LETTER D" . 917572)
+ ("TAG LATIN CAPITAL LETTER E" . 917573)
+ ("TAG LATIN CAPITAL LETTER F" . 917574)
+ ("TAG LATIN CAPITAL LETTER G" . 917575)
+ ("TAG LATIN CAPITAL LETTER H" . 917576)
+ ("TAG LATIN CAPITAL LETTER I" . 917577)
+ ("TAG LATIN CAPITAL LETTER J" . 917578)
+ ("TAG LATIN CAPITAL LETTER K" . 917579)
+ ("TAG LATIN CAPITAL LETTER L" . 917580)
+ ("TAG LATIN CAPITAL LETTER M" . 917581)
+ ("TAG LATIN CAPITAL LETTER N" . 917582)
+ ("TAG LATIN CAPITAL LETTER O" . 917583)
+ ("TAG LATIN CAPITAL LETTER P" . 917584)
+ ("TAG LATIN CAPITAL LETTER Q" . 917585)
+ ("TAG LATIN CAPITAL LETTER R" . 917586)
+ ("TAG LATIN CAPITAL LETTER S" . 917587)
+ ("TAG LATIN CAPITAL LETTER T" . 917588)
+ ("TAG LATIN CAPITAL LETTER U" . 917589)
+ ("TAG LATIN CAPITAL LETTER V" . 917590)
+ ("TAG LATIN CAPITAL LETTER W" . 917591)
+ ("TAG LATIN CAPITAL LETTER X" . 917592)
+ ("TAG LATIN CAPITAL LETTER Y" . 917593)
+ ("TAG LATIN CAPITAL LETTER Z" . 917594)
+ ("TAG LEFT SQUARE BRACKET" . 917595)
+ ("TAG REVERSE SOLIDUS" . 917596)
+ ("TAG RIGHT SQUARE BRACKET" . 917597)
+ ("TAG CIRCUMFLEX ACCENT" . 917598)
+ ("TAG LOW LINE" . 917599)
+ ("TAG GRAVE ACCENT" . 917600)
+ ("TAG LATIN SMALL LETTER A" . 917601)
+ ("TAG LATIN SMALL LETTER B" . 917602)
+ ("TAG LATIN SMALL LETTER C" . 917603)
+ ("TAG LATIN SMALL LETTER D" . 917604)
+ ("TAG LATIN SMALL LETTER E" . 917605)
+ ("TAG LATIN SMALL LETTER F" . 917606)
+ ("TAG LATIN SMALL LETTER G" . 917607)
+ ("TAG LATIN SMALL LETTER H" . 917608)
+ ("TAG LATIN SMALL LETTER I" . 917609)
+ ("TAG LATIN SMALL LETTER J" . 917610)
+ ("TAG LATIN SMALL LETTER K" . 917611)
+ ("TAG LATIN SMALL LETTER L" . 917612)
+ ("TAG LATIN SMALL LETTER M" . 917613)
+ ("TAG LATIN SMALL LETTER N" . 917614)
+ ("TAG LATIN SMALL LETTER O" . 917615)
+ ("TAG LATIN SMALL LETTER P" . 917616)
+ ("TAG LATIN SMALL LETTER Q" . 917617)
+ ("TAG LATIN SMALL LETTER R" . 917618)
+ ("TAG LATIN SMALL LETTER S" . 917619)
+ ("TAG LATIN SMALL LETTER T" . 917620)
+ ("TAG LATIN SMALL LETTER U" . 917621)
+ ("TAG LATIN SMALL LETTER V" . 917622)
+ ("TAG LATIN SMALL LETTER W" . 917623)
+ ("TAG LATIN SMALL LETTER X" . 917624)
+ ("TAG LATIN SMALL LETTER Y" . 917625)
+ ("TAG LATIN SMALL LETTER Z" . 917626)
+ ("TAG LEFT CURLY BRACKET" . 917627)
+ ("TAG VERTICAL LINE" . 917628)
+ ("TAG RIGHT CURLY BRACKET" . 917629)
+ ("TAG TILDE" . 917630)
+ ("CANCEL TAG" . 917631))
+ ;; only include characters which are supported by this Lisp
+ while (< code char-code-limit)
+ when (code-char code)
+ do (setf (gethash name *unicode-names*) (code-char code)))
+
+;;; define some aliases
+(loop for (alias . name) in '(("LINE FEED" . "LINE FEED (LF)")
+ ("FORM FEED" . "FORM FEED (LF)")
+ ("CARRIAGE RETURN" . "CARRIAGE RETURN (CR)")
+ ("NEXT LINE" . "NEXT LINE (NEL)")
+ ("LF" . "LINE FEED")
+ ("FF" . "FORM FEED")
+ ("CR" . "CARRIAGE RETURN")
+ ("NEL" . "NEXT LINE")
+ ("ZWNJ" . "ZERO WIDTH NON-JOINER")
+ ("ZWJ" . "ZERO WIDTH JOINER")
+ ("BYTE ORDER MARK" . "ZERO WIDTH NO-BREAK SPACE")
+ ("BOM" . "BYTE ORDER MARK")
+ ("HORIZONTAL TABULATION" . "CHARACTER TABULATION")
+ ("VERTICAL TABULATION" . "LINE TABULATION")
+ ("FILE SEPARATOR" . "INFORMATION SEPARATOR FOUR")
+ ("GROUP SEPARATOR" . "INFORMATION SEPARATOR THREE")
+ ("RECORD SEPARATOR" . "INFORMATION SEPARATOR TWO")
+ ("UNIT SEPARATOR" . "INFORMATION SEPARATOR ONE")
+ ("PARTIAL LINE DOWN" . "PARTIAL LINE FORWARD")
+ ("PARTIAL LINE UP" . "PARTIAL LINE BACKWARD"))
+ for existing-char = (gethash name *unicode-names*)
+ when existing-char
+ do (setf (gethash alias *unicode-names*) existing-char))
Added: branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/util.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/util.lisp 2007-10-04 19:13:23 UTC (rev 2205)
+++ branches/trunk-reorg/thirdparty/cl-interpol-0.1.2/util.lisp 2007-10-04 19:49:06 UTC (rev 2206)
@@ -0,0 +1,135 @@
+;;; -*- Mode: LISP; Syntax: COMMON-LISP; Package: CL-INTERPOL; Base: 10 -*-
+;;; $Header: /usr/local/cvsrep/cl-interpol/util.lisp,v 1.7 2003/10/22 09:20:30 edi Exp $
+
+;;; Copyright (c) 2003, Dr. Edmund Weitz. All rights reserved.
+
+;;; Redistribution and use in source and binary forms, with or without
+;;; modification, are permitted provided that the following conditions
+;;; are met:
+
+;;; * Redistributions of source code must retain the above copyright
+;;; notice, this list of conditions and the following disclaimer.
+
+;;; * Redistributions in binary form must reproduce the above
+;;; copyright notice, this list of conditions and the following
+;;; disclaimer in the documentation and/or other materials
+;;; provided with the distribution.
+
+;;; THIS SOFTWARE IS PROVIDED BY THE AUTHOR 'AS IS' AND ANY EXPRESSED
+;;; OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
+;;; WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+;;; ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
+;;; DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+;;; DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
+;;; GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
+;;; INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
+;;; WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
+;;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
+;;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+
+(in-package #:cl-interpol)
+
+(define-condition simple-reader-error (simple-condition reader-error)
+ ()
+ (:documentation "A reader error which can be signalled by ERROR."))
+
+(defmacro signal-reader-error (format-control &rest format-arguments)
+ "Like ERROR but signals a SIMPLE-READER-ERROR for the stream
+*STREAM*."
+ `(error 'simple-reader-error
+ :stream *stream*
+ :format-control ,format-control
+ :format-arguments (list ,@format-arguments)))
+
+(defun string-list-to-string (string-list)
+ "Concatenates a list of strings to one string."
+ ;; this function originally provided by JP Massar for CL-PPCRE; note
+ ;; that we can't use APPLY with CONCATENATE here because of
+ ;; CALL-ARGUMENTS-LIMIT
+ (let ((total-size 0))
+ (dolist (string string-list)
+ (incf total-size (length string)))
+ (let ((result-string (make-array total-size :element-type 'character))
+ (curr-pos 0))
+ (dolist (string string-list)
+ (replace result-string string :start1 curr-pos)
+ (incf curr-pos (length string)))
+ result-string)))
+
+(defun quote-meta-chars (string)
+ "Quote, i.e. prefix with #\\\\, all non-word characters in STRING."
+ (with-output-to-string (s)
+ (loop for char across string
+ if (or (char<= #\a char #\z)
+ (char<= #\A char #\Z)
+ (char<= #\0 char #\9)
+ (char= #\_ char)) do
+ (write-char char s)
+ else do
+ (write-char #\\ s)
+ (write-char char s))))
+
+(defun get-end-delimiter (start-delimiter delimiters &key errorp)
+ "Find the closing delimiter corresponding to the opening delimiter
+START-DELIMITER in a list DELIMITERS which is formatted like
+*OUTER-DELIMITERS*. If ERRORP is true, signal an error if none was
+found, otherwise return NIL."
+ (loop for element in delimiters
+ if (eql start-delimiter element)
+ do (return-from get-end-delimiter start-delimiter)
+ else if (and (consp element)
+ (char= start-delimiter (car element)))
+ do (return-from get-end-delimiter (cdr element)))
+ (when errorp
+ (signal-reader-error "~S not allowed as a delimiter here" start-delimiter)))
+
+(declaim (inline make-collector))
+(defun make-collector ()
+ "Create an empty string which can be extended by
+VECTOR-PUSH-EXTEND."
+ (make-array 0
+ :element-type 'character
+ :fill-pointer t
+ :adjustable t))
+
+(declaim (inline make-char-from-code))
+(defun make-char-from-code (number)
+ "Create character from char-code NUMBER. NUMBER can be NIL which is
+interpreted as 0."
+ ;; Only look at rightmost eight bits in compliance with Perl
+ (let ((code (logand #o377 (or number 0))))
+ (or (and (< code char-code-limit)
+ (code-char code))
+ (signal-reader-error "No character for char-code #x~X"
+ number))))
+
+(declaim (inline lower-case-p*))
+(defun lower-case-p* (char)
+ "Whether CHAR is a character which has case and is lowercase."
+ (or (not (both-case-p char))
+ (lower-case-p char)))
+
+(defmacro read-char* ()
+ "Convenience macro because we always read from the same string with
+the same arguments."
+ `(read-char *stream* t nil t))
+
+(defmacro peek-char* ()
+ "Convenience macro because we always peek at the same string with
+the same arguments."
+ `(peek-char nil *stream* t nil t))
+
+(declaim (inline copy-readtable*))
+(defun copy-readtable* ()
+ "Returns a copy of the readtable which was current when
+INTERPOL-READER was invoked. Memoizes its result."
+ (or *readtable-copy*
+ (setq *readtable-copy* (copy-readtable))))
+
+(declaim (inline nsubvec))
+(defun nsubvec (sequence start &optional (end (length sequence)))
+ "Return a subvector by pointing to location in original vector."
+ (make-array (- end start)
+ :element-type (array-element-type sequence)
+ :displaced-to sequence
+ :displaced-index-offset start))
1
0
[bknr-cvs] r2205 - in branches/trunk-reorg/thirdparty: . puri-1.5.1 trivial-gray-streams-2006-09-16 trivial-gray-streams-2006-09-16/CVS
by bknr＠bknr.net 04 Oct '07
by bknr＠bknr.net 04 Oct '07
04 Oct '07
Author: hhubner
Date: 2007-10-04 15:13:23 -0400 (Thu, 04 Oct 2007)
New Revision: 2205
Added:
branches/trunk-reorg/thirdparty/puri-1.5.1/
branches/trunk-reorg/thirdparty/puri-1.5.1/LICENSE
branches/trunk-reorg/thirdparty/puri-1.5.1/README
branches/trunk-reorg/thirdparty/puri-1.5.1/puri.asd
branches/trunk-reorg/thirdparty/puri-1.5.1/src.lisp
branches/trunk-reorg/thirdparty/puri-1.5.1/tests.lisp
branches/trunk-reorg/thirdparty/puri-1.5.1/uri.html
branches/trunk-reorg/thirdparty/trivial-gray-streams-2006-09-16/
branches/trunk-reorg/thirdparty/trivial-gray-streams-2006-09-16/COPYING
branches/trunk-reorg/thirdparty/trivial-gray-streams-2006-09-16/CVS/
branches/trunk-reorg/thirdparty/trivial-gray-streams-2006-09-16/CVS/Entries
branches/trunk-reorg/thirdparty/trivial-gray-streams-2006-09-16/CVS/Repository
branches/trunk-reorg/thirdparty/trivial-gray-streams-2006-09-16/CVS/Root
branches/trunk-reorg/thirdparty/trivial-gray-streams-2006-09-16/Makefile
branches/trunk-reorg/thirdparty/trivial-gray-streams-2006-09-16/README
branches/trunk-reorg/thirdparty/trivial-gray-streams-2006-09-16/mixin.lisp
branches/trunk-reorg/thirdparty/trivial-gray-streams-2006-09-16/package.lisp
branches/trunk-reorg/thirdparty/trivial-gray-streams-2006-09-16/trivial-gray-streams.asd
Log:
updating
Added: branches/trunk-reorg/thirdparty/puri-1.5.1/LICENSE
===================================================================
--- branches/trunk-reorg/thirdparty/puri-1.5.1/LICENSE 2007-10-04 19:10:49 UTC (rev 2204)
+++ branches/trunk-reorg/thirdparty/puri-1.5.1/LICENSE 2007-10-04 19:13:23 UTC (rev 2205)
@@ -0,0 +1,574 @@
+Copyright (c) 1999-2001 Franz, Inc.
+Copyright (c) 2003 Kevin Rosenberg
+All rights reserved.
+
+PURI is licensed under the terms of the Lisp Lesser GNU Public
+License, known as the LLGPL. The LLGPL consists of a preamble (see
+below) and the Lessor GNU Public License 2.1 (LGPL-2.1). Where these
+conflict, the preamble takes precedence. PURI is referenced in the
+preamble as the "LIBRARY."
+
+PURI is distributed in the hope that it will be useful, but WITHOUT
+ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+FITNESS FOR A PARTICULAR PURPOSE.
+
+
+
+Preamble to the Gnu Lesser General Public License
+-------------------------------------------------
+Copyright (c) 2000 Franz Incorporated, Berkeley, CA 94704
+
+The concept of the GNU Lesser General Public License version 2.1
+("LGPL") has been adopted to govern the use and distribution of
+above-mentioned application. However, the LGPL uses terminology that
+is more appropriate for a program written in C than one written in
+Lisp. Nevertheless, the LGPL can still be applied to a Lisp program if
+certain clarifications are made. This document details those
+clarifications. Accordingly, the license for the open-source Lisp
+applications consists of this document plus the LGPL. Wherever there
+is a conflict between this document and the LGPL, this document takes
+precedence over the LGPL.
+
+A "Library" in Lisp is a collection of Lisp functions, data and
+foreign modules. The form of the Library can be Lisp source code (for
+processing by an interpreter) or object code (usually the result of
+compilation of source code or built with some other
+mechanisms). Foreign modules are object code in a form that can be
+linked into a Lisp executable. When we speak of functions we do so in
+the most general way to include, in addition, methods and unnamed
+functions. Lisp "data" is also a general term that includes the data
+structures resulting from defining Lisp classes. A Lisp application
+may include the same set of Lisp objects as does a Library, but this
+does not mean that the application is necessarily a "work based on the
+Library" it contains.
+
+The Library consists of everything in the distribution file set before
+any modifications are made to the files. If any of the functions or
+classes in the Library are redefined in other files, then those
+redefinitions ARE considered a work based on the Library. If
+additional methods are added to generic functions in the Library,
+those additional methods are NOT considered a work based on the
+Library. If Library classes are subclassed, these subclasses are NOT
+considered a work based on the Library. If the Library is modified to
+explicitly call other functions that are neither part of Lisp itself
+nor an available add-on module to Lisp, then the functions called by
+the modified Library ARE considered a work based on the Library. The
+goal is to ensure that the Library will compile and run without
+getting undefined function errors.
+
+It is permitted to add proprietary source code to the Library, but it
+must be done in a way such that the Library will still run without
+that proprietary code present. Section 5 of the LGPL distinguishes
+between the case of a library being dynamically linked at runtime and
+one being statically linked at build time. Section 5 of the LGPL
+states that the former results in an executable that is a "work that
+uses the Library." Section 5 of the LGPL states that the latter
+results in one that is a "derivative of the Library", which is
+therefore covered by the LGPL. Since Lisp only offers one choice,
+which is to link the Library into an executable at build time, we
+declare that, for the purpose applying the LGPL to the Library, an
+executable that results from linking a "work that uses the Library"
+with the Library is considered a "work that uses the Library" and is
+therefore NOT covered by the LGPL.
+
+Because of this declaration, section 6 of LGPL is not applicable to
+the Library. However, in connection with each distribution of this
+executable, you must also deliver, in accordance with the terms and
+conditions of the LGPL, the source code of Library (or your derivative
+thereof) that is incorporated into this executable.
+
+
+
+ GNU LESSER GENERAL PUBLIC LICENSE
+ Version 2.1, February 1999
+
+ Copyright (C) 1991, 1999 Free Software Foundation, Inc.
+ 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
+ Everyone is permitted to copy and distribute verbatim copies
+ of this license document, but changing it is not allowed.
+
+[This is the first released version of the Lesser GPL. It also counts
+ as the successor of the GNU Library Public License, version 2, hence
+ the version number 2.1.]
+
+ Preamble
+
+ The licenses for most software are designed to take away your
+freedom to share and change it. By contrast, the GNU General Public
+Licenses are intended to guarantee your freedom to share and change
+free software--to make sure the software is free for all its users.
+
+ This license, the Lesser General Public License, applies to some
+specially designated software packages--typically libraries--of the
+Free Software Foundation and other authors who decide to use it. You
+can use it too, but we suggest you first think carefully about whether
+this license or the ordinary General Public License is the better
+strategy to use in any particular case, based on the explanations
+below.
+
+ When we speak of free software, we are referring to freedom of use,
+not price. Our General Public Licenses are designed to make sure that
+you have the freedom to distribute copies of free software (and charge
+for this service if you wish); that you receive source code or can get
+it if you want it; that you can change the software and use pieces of
+it in new free programs; and that you are informed that you can do
+these things.
+
+ To protect your rights, we need to make restrictions that forbid
+distributors to deny you these rights or to ask you to surrender these
+rights. These restrictions translate to certain responsibilities for
+you if you distribute copies of the library or if you modify it.
+
+ For example, if you distribute copies of the library, whether gratis
+or for a fee, you must give the recipients all the rights that we gave
+you. You must make sure that they, too, receive or can get the source
+code. If you link other code with the library, you must provide
+complete object files to the recipients, so that they can relink them
+with the library after making changes to the library and recompiling
+it. And you must show them these terms so they know their rights.
+
+ We protect your rights with a two-step method: (1) we copyright the
+library, and (2) we offer you this license, which gives you legal
+permission to copy, distribute and/or modify the library.
+
+ To protect each distributor, we want to make it very clear that
+there is no warranty for the free library. Also, if the library is
+modified by someone else and passed on, the recipients should know
+that what they have is not the original version, so that the original
+author's reputation will not be affected by problems that might be
+introduced by others.
+^L
+ Finally, software patents pose a constant threat to the existence of
+any free program. We wish to make sure that a company cannot
+effectively restrict the users of a free program by obtaining a
+restrictive license from a patent holder. Therefore, we insist that
+any patent license obtained for a version of the library must be
+consistent with the full freedom of use specified in this license.
+
+ Most GNU software, including some libraries, is covered by the
+ordinary GNU General Public License. This license, the GNU Lesser
+General Public License, applies to certain designated libraries, and
+is quite different from the ordinary General Public License. We use
+this license for certain libraries in order to permit linking those
+libraries into non-free programs.
+
+ When a program is linked with a library, whether statically or using
+a shared library, the combination of the two is legally speaking a
+combined work, a derivative of the original library. The ordinary
+General Public License therefore permits such linking only if the
+entire combination fits its criteria of freedom. The Lesser General
+Public License permits more lax criteria for linking other code with
+the library.
+
+ We call this license the "Lesser" General Public License because it
+does Less to protect the user's freedom than the ordinary General
+Public License. It also provides other free software developers Less
+of an advantage over competing non-free programs. These disadvantages
+are the reason we use the ordinary General Public License for many
+libraries. However, the Lesser license provides advantages in certain
+special circumstances.
+
+ For example, on rare occasions, there may be a special need to
+encourage the widest possible use of a certain library, so that it
+becomes a de-facto standard. To achieve this, non-free programs must
+be allowed to use the library. A more frequent case is that a free
+library does the same job as widely used non-free libraries. In this
+case, there is little to gain by limiting the free library to free
+software only, so we use the Lesser General Public License.
+
+ In other cases, permission to use a particular library in non-free
+programs enables a greater number of people to use a large body of
+free software. For example, permission to use the GNU C Library in
+non-free programs enables many more people to use the whole GNU
+operating system, as well as its variant, the GNU/Linux operating
+system.
+
+ Although the Lesser General Public License is Less protective of the
+users' freedom, it does ensure that the user of a program that is
+linked with the Library has the freedom and the wherewithal to run
+that program using a modified version of the Library.
+
+ The precise terms and conditions for copying, distribution and
+modification follow. Pay close attention to the difference between a
+"work based on the library" and a "work that uses the library". The
+former contains code derived from the library, whereas the latter must
+be combined with the library in order to run.
+^L
+ GNU LESSER GENERAL PUBLIC LICENSE
+ TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION
+
+ 0. This License Agreement applies to any software library or other
+program which contains a notice placed by the copyright holder or
+other authorized party saying it may be distributed under the terms of
+this Lesser General Public License (also called "this License").
+Each licensee is addressed as "you".
+
+ A "library" means a collection of software functions and/or data
+prepared so as to be conveniently linked with application programs
+(which use some of those functions and data) to form executables.
+
+ The "Library", below, refers to any such software library or work
+which has been distributed under these terms. A "work based on the
+Library" means either the Library or any derivative work under
+copyright law: that is to say, a work containing the Library or a
+portion of it, either verbatim or with modifications and/or translated
+straightforwardly into another language. (Hereinafter, translation is
+included without limitation in the term "modification".)
+
+ "Source code" for a work means the preferred form of the work for
+making modifications to it. For a library, complete source code means
+all the source code for all modules it contains, plus any associated
+interface definition files, plus the scripts used to control
+compilation and installation of the library.
+
+ Activities other than copying, distribution and modification are not
+covered by this License; they are outside its scope. The act of
+running a program using the Library is not restricted, and output from
+such a program is covered only if its contents constitute a work based
+on the Library (independent of the use of the Library in a tool for
+writing it). Whether that is true depends on what the Library does
+and what the program that uses the Library does.
+
+ 1. You may copy and distribute verbatim copies of the Library's
+complete source code as you receive it, in any medium, provided that
+you conspicuously and appropriately publish on each copy an
+appropriate copyright notice and disclaimer of warranty; keep intact
+all the notices that refer to this License and to the absence of any
+warranty; and distribute a copy of this License along with the
+Library.
+
+ You may charge a fee for the physical act of transferring a copy,
+and you may at your option offer warranty protection in exchange for a
+fee.
+
+ 2. You may modify your copy or copies of the Library or any portion
+of it, thus forming a work based on the Library, and copy and
+distribute such modifications or work under the terms of Section 1
+above, provided that you also meet all of these conditions:
+
+ a) The modified work must itself be a software library.
+
+ b) You must cause the files modified to carry prominent notices
+ stating that you changed the files and the date of any change.
+
+ c) You must cause the whole of the work to be licensed at no
+ charge to all third parties under the terms of this License.
+
+ d) If a facility in the modified Library refers to a function or a
+ table of data to be supplied by an application program that uses
+ the facility, other than as an argument passed when the facility
+ is invoked, then you must make a good faith effort to ensure that,
+ in the event an application does not supply such function or
+ table, the facility still operates, and performs whatever part of
+ its purpose remains meaningful.
+
+ (For example, a function in a library to compute square roots has
+ a purpose that is entirely well-defined independent of the
+ application. Therefore, Subsection 2d requires that any
+ application-supplied function or table used by this function must
+ be optional: if the application does not supply it, the square
+ root function must still compute square roots.)
+
+These requirements apply to the modified work as a whole. If
+identifiable sections of that work are not derived from the Library,
+and can be reasonably considered independent and separate works in
+themselves, then this License, and its terms, do not apply to those
+sections when you distribute them as separate works. But when you
+distribute the same sections as part of a whole which is a work based
+on the Library, the distribution of the whole must be on the terms of
+this License, whose permissions for other licensees extend to the
+entire whole, and thus to each and every part regardless of who wrote
+it.
+
+Thus, it is not the intent of this section to claim rights or contest
+your rights to work written entirely by you; rather, the intent is to
+exercise the right to control the distribution of derivative or
+collective works based on the Library.
+
+In addition, mere aggregation of another work not based on the Library
+with the Library (or with a work based on the Library) on a volume of
+a storage or distribution medium does not bring the other work under
+the scope of this License.
+
+ 3. You may opt to apply the terms of the ordinary GNU General Public
+License instead of this License to a given copy of the Library. To do
+this, you must alter all the notices that refer to this License, so
+that they refer to the ordinary GNU General Public License, version 2,
+instead of to this License. (If a newer version than version 2 of the
+ordinary GNU General Public License has appeared, then you can specify
+that version instead if you wish.) Do not make any other change in
+these notices.
+^L
+ Once this change is made in a given copy, it is irreversible for
+that copy, so the ordinary GNU General Public License applies to all
+subsequent copies and derivative works made from that copy.
+
+ This option is useful when you wish to copy part of the code of
+the Library into a program that is not a library.
+
+ 4. You may copy and distribute the Library (or a portion or
+derivative of it, under Section 2) in object code or executable form
+under the terms of Sections 1 and 2 above provided that you accompany
+it with the complete corresponding machine-readable source code, which
+must be distributed under the terms of Sections 1 and 2 above on a
+medium customarily used for software interchange.
+
+ If distribution of object code is made by offering access to copy
+from a designated place, then offering equivalent access to copy the
+source code from the same place satisfies the requirement to
+distribute the source code, even though third parties are not
+compelled to copy the source along with the object code.
+
+ 5. A program that contains no derivative of any portion of the
+Library, but is designed to work with the Library by being compiled or
+linked with it, is called a "work that uses the Library". Such a
+work, in isolation, is not a derivative work of the Library, and
+therefore falls outside the scope of this License.
+
+ However, linking a "work that uses the Library" with the Library
+creates an executable that is a derivative of the Library (because it
+contains portions of the Library), rather than a "work that uses the
+library". The executable is therefore covered by this License.
+Section 6 states terms for distribution of such executables.
+
+ When a "work that uses the Library" uses material from a header file
+that is part of the Library, the object code for the work may be a
+derivative work of the Library even though the source code is not.
+Whether this is true is especially significant if the work can be
+linked without the Library, or if the work is itself a library. The
+threshold for this to be true is not precisely defined by law.
+
+ If such an object file uses only numerical parameters, data
+structure layouts and accessors, and small macros and small inline
+functions (ten lines or less in length), then the use of the object
+file is unrestricted, regardless of whether it is legally a derivative
+work. (Executables containing this object code plus portions of the
+Library will still fall under Section 6.)
+
+ Otherwise, if the work is a derivative of the Library, you may
+distribute the object code for the work under the terms of Section 6.
+Any executables containing that work also fall under Section 6,
+whether or not they are linked directly with the Library itself.
+^L
+ 6. As an exception to the Sections above, you may also combine or
+link a "work that uses the Library" with the Library to produce a
+work containing portions of the Library, and distribute that work
+under terms of your choice, provided that the terms permit
+modification of the work for the customer's own use and reverse
+engineering for debugging such modifications.
+
+ You must give prominent notice with each copy of the work that the
+Library is used in it and that the Library and its use are covered by
+this License. You must supply a copy of this License. If the work
+during execution displays copyright notices, you must include the
+copyright notice for the Library among them, as well as a reference
+directing the user to the copy of this License. Also, you must do one
+of these things:
+
+ a) Accompany the work with the complete corresponding
+ machine-readable source code for the Library including whatever
+ changes were used in the work (which must be distributed under
+ Sections 1 and 2 above); and, if the work is an executable linked
+ with the Library, with the complete machine-readable "work that
+ uses the Library", as object code and/or source code, so that the
+ user can modify the Library and then relink to produce a modified
+ executable containing the modified Library. (It is understood
+ that the user who changes the contents of definitions files in the
+ Library will not necessarily be able to recompile the application
+ to use the modified definitions.)
+
+ b) Use a suitable shared library mechanism for linking with the
+ Library. A suitable mechanism is one that (1) uses at run time a
+ copy of the library already present on the user's computer system,
+ rather than copying library functions into the executable, and (2)
+ will operate properly with a modified version of the library, if
+ the user installs one, as long as the modified version is
+ interface-compatible with the version that the work was made with.
+
+ c) Accompany the work with a written offer, valid for at least
+ three years, to give the same user the materials specified in
+ Subsection 6a, above, for a charge no more than the cost of
+ performing this distribution.
+
+ d) If distribution of the work is made by offering access to copy
+ from a designated place, offer equivalent access to copy the above
+ specified materials from the same place.
+
+ e) Verify that the user has already received a copy of these
+ materials or that you have already sent this user a copy.
+
+ For an executable, the required form of the "work that uses the
+Library" must include any data and utility programs needed for
+reproducing the executable from it. However, as a special exception,
+the materials to be distributed need not include anything that is
+normally distributed (in either source or binary form) with the major
+components (compiler, kernel, and so on) of the operating system on
+which the executable runs, unless that component itself accompanies
+the executable.
+
+ It may happen that this requirement contradicts the license
+restrictions of other proprietary libraries that do not normally
+accompany the operating system. Such a contradiction means you cannot
+use both them and the Library together in an executable that you
+distribute.
+^L
+ 7. You may place library facilities that are a work based on the
+Library side-by-side in a single library together with other library
+facilities not covered by this License, and distribute such a combined
+library, provided that the separate distribution of the work based on
+the Library and of the other library facilities is otherwise
+permitted, and provided that you do these two things:
+
+ a) Accompany the combined library with a copy of the same work
+ based on the Library, uncombined with any other library
+ facilities. This must be distributed under the terms of the
+ Sections above.
+
+ b) Give prominent notice with the combined library of the fact
+ that part of it is a work based on the Library, and explaining
+ where to find the accompanying uncombined form of the same work.
+
+ 8. You may not copy, modify, sublicense, link with, or distribute
+the Library except as expressly provided under this License. Any
+attempt otherwise to copy, modify, sublicense, link with, or
+distribute the Library is void, and will automatically terminate your
+rights under this License. However, parties who have received copies,
+or rights, from you under this License will not have their licenses
+terminated so long as such parties remain in full compliance.
+
+ 9. You are not required to accept this License, since you have not
+signed it. However, nothing else grants you permission to modify or
+distribute the Library or its derivative works. These actions are
+prohibited by law if you do not accept this License. Therefore, by
+modifying or distributing the Library (or any work based on the
+Library), you indicate your acceptance of this License to do so, and
+all its terms and conditions for copying, distributing or modifying
+the Library or works based on it.
+
+ 10. Each time you redistribute the Library (or any work based on the
+Library), the recipient automatically receives a license from the
+original licensor to copy, distribute, link with or modify the Library
+subject to these terms and conditions. You may not impose any further
+restrictions on the recipients' exercise of the rights granted herein.
+You are not responsible for enforcing compliance by third parties with
+this License.
+^L
+ 11. If, as a consequence of a court judgment or allegation of patent
+infringement or for any other reason (not limited to patent issues),
+conditions are imposed on you (whether by court order, agreement or
+otherwise) that contradict the conditions of this License, they do not
+excuse you from the conditions of this License. If you cannot
+distribute so as to satisfy simultaneously your obligations under this
+License and any other pertinent obligations, then as a consequence you
+may not distribute the Library at all. For example, if a patent
+license would not permit royalty-free redistribution of the Library by
+all those who receive copies directly or indirectly through you, then
+the only way you could satisfy both it and this License would be to
+refrain entirely from distribution of the Library.
+
+If any portion of this section is held invalid or unenforceable under
+any particular circumstance, the balance of the section is intended to
+apply, and the section as a whole is intended to apply in other
+circumstances.
+
+It is not the purpose of this section to induce you to infringe any
+patents or other property right claims or to contest validity of any
+such claims; this section has the sole purpose of protecting the
+integrity of the free software distribution system which is
+implemented by public license practices. Many people have made
+generous contributions to the wide range of software distributed
+through that system in reliance on consistent application of that
+system; it is up to the author/donor to decide if he or she is willing
+to distribute software through any other system and a licensee cannot
+impose that choice.
+
+This section is intended to make thoroughly clear what is believed to
+be a consequence of the rest of this License.
+
+ 12. If the distribution and/or use of the Library is restricted in
+certain countries either by patents or by copyrighted interfaces, the
+original copyright holder who places the Library under this License
+may add an explicit geographical distribution limitation excluding those
+countries, so that distribution is permitted only in or among
+countries not thus excluded. In such case, this License incorporates
+the limitation as if written in the body of this License.
+
+ 13. The Free Software Foundation may publish revised and/or new
+versions of the Lesser General Public License from time to time.
+Such new versions will be similar in spirit to the present version,
+but may differ in detail to address new problems or concerns.
+
+Each version is given a distinguishing version number. If the Library
+specifies a version number of this License which applies to it and
+"any later version", you have the option of following the terms and
+conditions either of that version or of any later version published by
+the Free Software Foundation. If the Library does not specify a
+license version number, you may choose any version ever published by
+the Free Software Foundation.
+^L
+ 14. If you wish to incorporate parts of the Library into other free
+programs whose distribution conditions are incompatible with these,
+write to the author to ask for permission. For software which is
+copyrighted by the Free Software Foundation, write to the Free
+Software Foundation; we sometimes make exceptions for this. Our
+decision will be guided by the two goals of preserving the free status
+of all derivatives of our free software and of promoting the sharing
+and reuse of software generally.
+
+ NO WARRANTY
+
+ 15. BECAUSE THE LIBRARY IS LICENSED FREE OF CHARGE, THERE IS NO
+WARRANTY FOR THE LIBRARY, TO THE EXTENT PERMITTED BY APPLICABLE LAW.
+EXCEPT WHEN OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR
+OTHER PARTIES PROVIDE THE LIBRARY "AS IS" WITHOUT WARRANTY OF ANY
+KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE
+IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
+PURPOSE. THE ENTIRE RISK AS TO THE QUALITY AND PERFORMANCE OF THE
+LIBRARY IS WITH YOU. SHOULD THE LIBRARY PROVE DEFECTIVE, YOU ASSUME
+THE COST OF ALL NECESSARY SERVICING, REPAIR OR CORRECTION.
+
+ 16. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN
+WRITING WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY
+AND/OR REDISTRIBUTE THE LIBRARY AS PERMITTED ABOVE, BE LIABLE TO YOU
+FOR DAMAGES, INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR
+CONSEQUENTIAL DAMAGES ARISING OUT OF THE USE OR INABILITY TO USE THE
+LIBRARY (INCLUDING BUT NOT LIMITED TO LOSS OF DATA OR DATA BEING
+RENDERED INACCURATE OR LOSSES SUSTAINED BY YOU OR THIRD PARTIES OR A
+FAILURE OF THE LIBRARY TO OPERATE WITH ANY OTHER SOFTWARE), EVEN IF
+SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH
+DAMAGES.
+
+ END OF TERMS AND CONDITIONS
+^L
+ How to Apply These Terms to Your New Libraries
+
+ If you develop a new library, and you want it to be of the greatest
+possible use to the public, we recommend making it free software that
+everyone can redistribute and change. You can do so by permitting
+redistribution under these terms (or, alternatively, under the terms
+of the ordinary General Public License).
+
+ To apply these terms, attach the following notices to the library.
+It is safest to attach them to the start of each source file to most
+effectively convey the exclusion of warranty; and each file should
+have at least the "copyright" line and a pointer to where the full
+notice is found.
+
+
+ <one line to give the library's name and a brief idea of what it does.>
+ Copyright (C) <year> <name of author>
+
+ This library is free software; you can redistribute it and/or
+ modify it under the terms of the GNU Lesser General Public
+ License as published by the Free Software Foundation; either
+ version 2.1 of the License, or (at your option) any later version.
+
+ This library is distributed in the hope that it will be useful,
+ but WITHOUT ANY WARRANTY; without even the implied warranty of
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ Lesser General Public License for more details.
+
+ You should have received a copy of the GNU Lesser General Public
+ License along with this library; if not, write to the Free Software
+ Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
+
Added: branches/trunk-reorg/thirdparty/puri-1.5.1/README
===================================================================
--- branches/trunk-reorg/thirdparty/puri-1.5.1/README 2007-10-04 19:10:49 UTC (rev 2204)
+++ branches/trunk-reorg/thirdparty/puri-1.5.1/README 2007-10-04 19:13:23 UTC (rev 2205)
@@ -0,0 +1,46 @@
+PURI - Portable URI Library
+===========================
+
+AUTHORS
+-------
+Franz, Inc <http://www.franz.com>
+Kevin Rosenberg <kevin(a)rosenberg.net>
+
+
+DOWNLOAD
+--------
+Puri home: http://files.b9.com/puri/
+Portable tester home: http://files.b9.com/tester/
+
+
+SUPPORTED PLATFORMS
+-------------------
+ AllegroCL, CLISP, CMUCL, Lispworks, OpenMCL, SBCL
+
+
+OVERVIEW
+--------
+This is portable Universal Resource Identifier library for Common Lisp
+programs. It parses URI according to the RFC 2396 specification. It's
+is based on Franz, Inc's opensource URI package and has been ported to
+work other CL implementations. It is licensed under the LLGPL which
+is included in this distribution.
+
+A regression suite is included which uses Franz's open-source tester
+library. I've ported that library for use on other CL
+implementations. Puri completes 126/126 regression tests successfully.
+
+Franz's unmodified documentation file is included in the file
+uri.html.
+
+
+DIFFERENCES BETWEEN PURI and NET.URI
+------------------------------------
+
+* Puri uses the package 'puri while NET.URI uses the package 'net.uri
+
+* To signal an error parsing a URI, Puri uses the condition
+ :uri-parse-error while NET.URI uses the condition :parse-error. This
+ divergence occurs because Franz's parse-error condition uses
+ :format-control and :format-arguments slots which are not in the ANSI
+ specification for the parse-error condition.
Added: branches/trunk-reorg/thirdparty/puri-1.5.1/puri.asd
===================================================================
--- branches/trunk-reorg/thirdparty/puri-1.5.1/puri.asd 2007-10-04 19:10:49 UTC (rev 2204)
+++ branches/trunk-reorg/thirdparty/puri-1.5.1/puri.asd 2007-10-04 19:13:23 UTC (rev 2205)
@@ -0,0 +1,33 @@
+;;;; -*- Mode: LISP; Syntax: ANSI-Common-Lisp; Base: 10 -*-
+;;;; Programmer: Kevin Rosenberg
+
+
+(in-package #:cl-user)
+(defpackage #:puri-system (:use #:cl #:asdf))
+(in-package #:puri-system)
+
+
+(defsystem puri
+ :name "cl-puri"
+ :maintainer "Kevin M. Rosenberg <kmr(a)debian.org>"
+ :licence "GNU Lesser General Public License"
+ :description "Portable Universal Resource Indentifier Library"
+ :components
+ ((:file "src")))
+
+(defmethod perform ((o test-op) (c (eql (find-system 'puri))))
+ (oos 'load-op 'puri-tests)
+ (oos 'test-op 'puri-tests))
+
+(defsystem puri-tests
+ :depends-on (:puri :ptester)
+ :components
+ ((:file "tests")))
+
+(defmethod perform ((o test-op) (c (eql (find-system 'puri-tests))))
+ (or (funcall (intern (symbol-name '#:do-tests)
+ (find-package :puri-tests)))
+ (error "test-op failed")))
+
+(defmethod operation-done-p ((o test-op) (c (eql (find-system 'puri-tests))))
+ (values nil))
Added: branches/trunk-reorg/thirdparty/puri-1.5.1/src.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/puri-1.5.1/src.lisp 2007-10-04 19:10:49 UTC (rev 2204)
+++ branches/trunk-reorg/thirdparty/puri-1.5.1/src.lisp 2007-10-04 19:13:23 UTC (rev 2205)
@@ -0,0 +1,1419 @@
+;; -*- mode: common-lisp; package: puri -*-
+;; Support for URIs
+;; For general URI information see RFC2396.
+;;
+;; copyright (c) 1999-2002 Franz Inc, Berkeley, CA - All rights reserved.
+;; copyright (c) 2002-2005 Franz Inc, Oakland, CA - All rights reserved.
+;; copyright (c) 2003-2006 Kevin Rosenberg (porting changes)
+;;
+;; This code is free software; you can redistribute it and/or
+;; modify it under the terms of the version 2.1 of
+;; the GNU Lesser General Public License as published by
+;; the Free Software Foundation, as clarified by the
+;; preamble found here:
+;; http://opensource.franz.com/preamble.html
+;;
+;; Versions ported from Franz's opensource release
+;; uri.cl,v 2.3.6.4.2.1 2001/08/09 17:42:39 layer
+;; uri.cl,v 2.9.84.1 2005/08/11 18:38:52 layer
+
+;; This code is distributed in the hope that it will be useful,
+;; but without any warranty; without even the implied warranty of
+;; merchantability or fitness for a particular purpose. See the GNU
+;; Lesser General Public License for more details.
+;;
+;; $Id: src.lisp 11328 2006-12-02 15:43:07Z kevin $
+
+(defpackage #:puri
+ (:use #:cl)
+ #-allegro (:nicknames #:net.uri)
+ (:export
+ #:uri ; the type and a function
+ #:uri-p
+ #:copy-uri
+
+ #:uri-scheme ; and slots
+ #:uri-host #:uri-port
+ #:uri-path
+ #:uri-query
+ #:uri-fragment
+ #:uri-plist
+ #:uri-authority ; pseudo-slot accessor
+
+ #:urn ; class
+ #:urn-nid ; pseudo-slot accessor
+ #:urn-nss ; pseudo-slot accessor
+
+ #:*strict-parse*
+ #:parse-uri
+ #:merge-uris
+ #:enough-uri
+ #:uri-parsed-path
+ #:render-uri
+
+ #:make-uri-space ; interning...
+ #:uri-space
+ #:uri=
+ #:intern-uri
+ #:unintern-uri
+ #:do-all-uris
+
+ #:uri-parse-error ;; Added by KMR
+ ))
+
+(in-package #:puri)
+
+(eval-when (:compile-toplevel) (declaim (optimize (speed 3))))
+
+
+#-allegro
+(defun parse-body (forms &optional env)
+ "Parses a body, returns (VALUES docstring declarations forms)"
+ (declare (ignore env))
+ ;; fixme -- need to add parsing of multiple declarations
+ (let (docstring declarations)
+ (when (stringp (car forms))
+ (setq docstring (car forms))
+ (setq forms (cdr forms)))
+ (when (and (listp (car forms))
+ (symbolp (caar forms))
+ (string-equal (symbol-name '#:declare)
+ (symbol-name (caar forms))))
+ (setq declarations (car forms))
+ (setq forms (cdr forms)))
+ (values docstring declarations forms)))
+
+
+(defun shrink-vector (str size)
+ #+allegro
+ (excl::.primcall 'sys::shrink-svector str size)
+ #+sbcl
+ (setq str (sb-kernel:shrink-vector str size))
+ #+cmu
+ (lisp::shrink-vector str size)
+ #+lispworks
+ (system::shrink-vector$vector str size)
+ #+scl
+ (common-lisp::shrink-vector str size)
+ #-(or allegro cmu lispworks sbcl scl)
+ (setq str (subseq str 0 size))
+ str)
+
+
+;; KMR: Added new condition to handle cross-implementation variances
+;; in the parse-error condition many implementations define
+
+(define-condition uri-parse-error (parse-error)
+ ((fmt-control :initarg :fmt-control :accessor fmt-control)
+ (fmt-arguments :initarg :fmt-arguments :accessor fmt-arguments ))
+ (:report (lambda (c stream)
+ (format stream "Parse error:")
+ (apply #'format stream (fmt-control c) (fmt-arguments c)))))
+
+(defun .parse-error (fmt &rest args)
+ (error 'uri-parse-error :fmt-control fmt :fmt-arguments args))
+
+#-allegro
+(defun internal-reader-error (stream fmt &rest args)
+ (apply #'format stream fmt args))
+
+#-allegro (defvar *current-case-mode* :case-insensitive-upper)
+#+allegro (eval-when (:compile-toplevel :load-toplevel :execute)
+ (import '(excl:*current-case-mode*
+ excl:delimited-string-to-list
+ excl::parse-body
+ excl::internal-reader-error
+ excl:if*)))
+
+#-allegro
+(defmethod position-char (char (string string) start max)
+ (declare (optimize (speed 3) (safety 0) (space 0))
+ (fixnum start max) (string string))
+ (do* ((i start (1+ i)))
+ ((= i max) nil)
+ (declare (fixnum i))
+ (when (char= char (char string i)) (return i))))
+
+#-allegro
+(defun delimited-string-to-list (string &optional (separator #\space)
+ skip-terminal)
+ (declare (optimize (speed 3) (safety 0) (space 0)
+ (compilation-speed 0))
+ (type string string)
+ (type character separator))
+ (do* ((len (length string))
+ (output '())
+ (pos 0)
+ (end (position-char separator string pos len)
+ (position-char separator string pos len)))
+ ((null end)
+ (if (< pos len)
+ (push (subseq string pos) output)
+ (when (and (plusp len) (not skip-terminal))
+ (push "" output)))
+ (nreverse output))
+ (declare (type fixnum pos len)
+ (type (or null fixnum) end))
+ (push (subseq string pos end) output)
+ (setq pos (1+ end))))
+
+#-allegro
+(eval-when (:compile-toplevel :load-toplevel :execute)
+ (defvar if*-keyword-list '("then" "thenret" "else" "elseif"))
+
+ (defmacro if* (&rest args)
+ (do ((xx (reverse args) (cdr xx))
+ (state :init)
+ (elseseen nil)
+ (totalcol nil)
+ (lookat nil nil)
+ (col nil))
+ ((null xx)
+ (cond ((eq state :compl)
+ `(cond ,@totalcol))
+ (t (error "if*: illegal form ~s" args))))
+ (cond ((and (symbolp (car xx))
+ (member (symbol-name (car xx))
+ if*-keyword-list
+ :test #'string-equal))
+ (setq lookat (symbol-name (car xx)))))
+
+ (cond ((eq state :init)
+ (cond (lookat (cond ((string-equal lookat "thenret")
+ (setq col nil
+ state :then))
+ (t (error
+ "if*: bad keyword ~a" lookat))))
+ (t (setq state :col
+ col nil)
+ (push (car xx) col))))
+ ((eq state :col)
+ (cond (lookat
+ (cond ((string-equal lookat "else")
+ (cond (elseseen
+ (error
+ "if*: multiples elses")))
+ (setq elseseen t)
+ (setq state :init)
+ (push `(t ,@col) totalcol))
+ ((string-equal lookat "then")
+ (setq state :then))
+ (t (error "if*: bad keyword ~s"
+ lookat))))
+ (t (push (car xx) col))))
+ ((eq state :then)
+ (cond (lookat
+ (error
+ "if*: keyword ~s at the wrong place " (car xx)))
+ (t (setq state :compl)
+ (push `(,(car xx) ,@col) totalcol))))
+ ((eq state :compl)
+ (cond ((not (string-equal lookat "elseif"))
+ (error "if*: missing elseif clause ")))
+ (setq state :init))))))
+
+
+(defclass uri ()
+ (
+;;;; external:
+ (scheme :initarg :scheme :initform nil :accessor uri-scheme)
+ (host :initarg :host :initform nil :accessor uri-host)
+ (port :initarg :port :initform nil :accessor uri-port)
+ (path :initarg :path :initform nil :accessor uri-path)
+ (query :initarg :query :initform nil :accessor uri-query)
+ (fragment :initarg :fragment :initform nil :accessor uri-fragment)
+ (plist :initarg :plist :initform nil :accessor uri-plist)
+
+;;;; internal:
+ (escaped
+ ;; used to prevent unnessary work, looking for chars to escape and
+ ;; unescape.
+ :initarg :escaped :initform nil :accessor uri-escaped)
+ (string
+ ;; the cached printable representation of the URI. It *might* be
+ ;; different than the original string, though, because the user might
+ ;; have escaped non-reserved chars--they won't be escaped when the URI
+ ;; is printed.
+ :initarg :string :initform nil :accessor uri-string)
+ (parsed-path
+ ;; the cached parsed representation of the URI path.
+ :initarg :parsed-path
+ :initform nil
+ :accessor .uri-parsed-path)
+ (hashcode
+ ;; cached sxhash, so we don't have to compute it more than once.
+ :initarg :hashcode :initform nil :accessor uri-hashcode)))
+
+(defclass urn (uri)
+ ((nid :initarg :nid :initform nil :accessor urn-nid)
+ (nss :initarg :nss :initform nil :accessor urn-nss)))
+
+(eval-when (:compile-toplevel :execute)
+ (defmacro clear-caching-on-slot-change (name)
+ `(defmethod (setf ,name) :around (new-value (self uri))
+ (declare (ignore new-value))
+ (prog1 (call-next-method)
+ (setf (uri-string self) nil)
+ ,@(when (eq name 'uri-path) `((setf (.uri-parsed-path self) nil)))
+ (setf (uri-hashcode self) nil))))
+ )
+
+(clear-caching-on-slot-change uri-scheme)
+(clear-caching-on-slot-change uri-host)
+(clear-caching-on-slot-change uri-port)
+(clear-caching-on-slot-change uri-path)
+(clear-caching-on-slot-change uri-query)
+(clear-caching-on-slot-change uri-fragment)
+
+
+(defmethod make-load-form ((self uri) &optional env)
+ (declare (ignore env))
+ `(make-instance ',(class-name (class-of self))
+ :scheme ,(uri-scheme self)
+ :host ,(uri-host self)
+ :port ,(uri-port self)
+ :path ',(uri-path self)
+ :query ,(uri-query self)
+ :fragment ,(uri-fragment self)
+ :plist ',(uri-plist self)
+ :string ,(uri-string self)
+ :parsed-path ',(.uri-parsed-path self)))
+
+(defmethod uri-p ((thing uri)) t)
+(defmethod uri-p ((thing t)) nil)
+
+(defun copy-uri (uri
+ &key place
+ (scheme (when uri (uri-scheme uri)))
+ (host (when uri (uri-host uri)))
+ (port (when uri (uri-port uri)))
+ (path (when uri (uri-path uri)))
+ (parsed-path
+ (when uri (copy-list (.uri-parsed-path uri))))
+ (query (when uri (uri-query uri)))
+ (fragment (when uri (uri-fragment uri)))
+ (plist (when uri (copy-list (uri-plist uri))))
+ (class (when uri (class-of uri)))
+ &aux (escaped (when uri (uri-escaped uri))))
+ (if* place
+ then (setf (uri-scheme place) scheme)
+ (setf (uri-host place) host)
+ (setf (uri-port place) port)
+ (setf (uri-path place) path)
+ (setf (.uri-parsed-path place) parsed-path)
+ (setf (uri-query place) query)
+ (setf (uri-fragment place) fragment)
+ (setf (uri-plist place) plist)
+ (setf (uri-escaped place) escaped)
+ (setf (uri-string place) nil)
+ (setf (uri-hashcode place) nil)
+ place
+ elseif (eq 'uri class)
+ then ;; allow the compiler to optimize the call to make-instance:
+ (make-instance 'uri
+ :scheme scheme :host host :port port :path path
+ :parsed-path parsed-path
+ :query query :fragment fragment :plist plist
+ :escaped escaped :string nil :hashcode nil)
+ else (make-instance class
+ :scheme scheme :host host :port port :path path
+ :parsed-path parsed-path
+ :query query :fragment fragment :plist plist
+ :escaped escaped :string nil :hashcode nil)))
+
+(defmethod uri-parsed-path ((uri uri))
+ (when (uri-path uri)
+ (when (null (.uri-parsed-path uri))
+ (setf (.uri-parsed-path uri)
+ (parse-path (uri-path uri) (uri-escaped uri))))
+ (.uri-parsed-path uri)))
+
+(defmethod (setf uri-parsed-path) (path-list (uri uri))
+ (assert (and (consp path-list)
+ (or (member (car path-list) '(:absolute :relative)
+ :test #'eq))))
+ (setf (uri-path uri) (render-parsed-path path-list t))
+ (setf (.uri-parsed-path uri) path-list)
+ path-list)
+
+(defun uri-authority (uri)
+ (when (uri-host uri)
+ (let ((*print-pretty* nil))
+ (format nil "~a~@[:~a~]" (uri-host uri) (uri-port uri)))))
+
+(defun uri-nid (uri)
+ (if* (equalp "urn" (uri-scheme uri))
+ then (uri-host uri)
+ else (error "URI is not a URN: ~s." uri)))
+
+(defun uri-nss (uri)
+ (if* (equalp "urn" (uri-scheme uri))
+ then (uri-path uri)
+ else (error "URI is not a URN: ~s." uri)))
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+;; Parsing
+
+(defparameter *excluded-characters*
+ '(;; `delims' (except #\%, because it's handled specially):
+ #\< #\> #\" #\space #\#
+ ;; `unwise':
+ #\{ #\} #\| #\\ #\^ #\[ #\] #\`))
+
+(defun reserved-char-vector (chars &key except)
+ (do* ((a (make-array 127 :element-type 'bit :initial-element 0))
+ (chars chars (cdr chars))
+ (c (car chars) (car chars)))
+ ((null chars) a)
+ (if* (and except (member c except :test #'char=))
+ thenret
+ else (setf (sbit a (char-int c)) 1))))
+
+(defparameter *reserved-characters*
+ (reserved-char-vector
+ (append *excluded-characters*
+ '(#\; #\/ #\? #\: #\@ #\& #\= #\+ #\$ #\, #\%))))
+(defparameter *reserved-authority-characters*
+ (reserved-char-vector
+ (append *excluded-characters* '(#\; #\/ #\? #\: #\@))))
+(defparameter *reserved-path-characters*
+ (reserved-char-vector
+ (append *excluded-characters*
+ '(#\;
+;;;;The rfc says this should be here, but it doesn't make sense.
+ ;; #\=
+ #\/ #\?))))
+
+(defparameter *reserved-fragment-characters*
+ (reserved-char-vector (remove #\# *excluded-characters*)))
+
+(eval-when (:compile-toplevel :execute)
+(defun gen-char-range-list (start end)
+ (do* ((res '())
+ (endcode (1+ (char-int end)))
+ (chcode (char-int start)
+ (1+ chcode))
+ (hyphen nil))
+ ((= chcode endcode)
+ ;; - has to be first, otherwise it signifies a range!
+ (if* hyphen
+ then (setq res (nreverse res))
+ (push #\- res)
+ res
+ else (nreverse res)))
+ (if* (= #.(char-int #\-) chcode)
+ then (setq hyphen t)
+ else (push (code-char chcode) res))))
+)
+
+(defparameter *valid-nid-characters*
+ (reserved-char-vector
+ '#.(nconc (gen-char-range-list #\a #\z)
+ (gen-char-range-list #\A #\Z)
+ (gen-char-range-list #\0 #\9)
+ '(#\- #\. #\+))))
+(defparameter *reserved-nss-characters*
+ (reserved-char-vector
+ (append *excluded-characters* '(#\& #\~ #\/ #\?))))
+
+(defparameter *illegal-characters*
+ (reserved-char-vector (remove #\# *excluded-characters*)))
+(defparameter *strict-illegal-query-characters*
+ (reserved-char-vector (append '(#\?) (remove #\# *excluded-characters*))))
+(defparameter *illegal-query-characters*
+ (reserved-char-vector
+ *excluded-characters* :except '(#\^ #\| #\#)))
+
+
+(defun parse-uri (thing &key (class 'uri) &aux escape)
+ (when (uri-p thing) (return-from parse-uri thing))
+
+ (setq escape (escape-p thing))
+ (multiple-value-bind (scheme host port path query fragment)
+ (parse-uri-string thing)
+ (when scheme
+ (setq scheme
+ (intern (funcall
+ (case *current-case-mode*
+ ((:case-insensitive-upper :case-sensitive-upper)
+ #'string-upcase)
+ ((:case-insensitive-lower :case-sensitive-lower)
+ #'string-downcase))
+ (decode-escaped-encoding scheme escape))
+ (find-package :keyword))))
+
+ (when (and scheme (eq :urn scheme))
+ (return-from parse-uri
+ (make-instance 'urn :scheme scheme :nid host :nss path)))
+
+ (when host (setq host (decode-escaped-encoding host escape)))
+ (when port
+ (setq port (read-from-string port))
+ (when (not (numberp port)) (error "port is not a number: ~s." port))
+ (when (not (plusp port))
+ (error "port is not a positive integer: ~d." port))
+ (when (eql port (case scheme
+ (:http 80)
+ (:https 443)
+ (:ftp 21)
+ (:telnet 23)))
+ (setq port nil)))
+ (when (or (string= "" path)
+ (and ;; we canonicalize away a reference to just /:
+ scheme
+ (member scheme '(:http :https :ftp) :test #'eq)
+ (string= "/" path)))
+ (setq path nil))
+ (when path
+ (setq path
+ (decode-escaped-encoding path escape *reserved-path-characters*)))
+ (when query (setq query (decode-escaped-encoding query escape)))
+ (when fragment
+ (setq fragment
+ (decode-escaped-encoding fragment escape
+ *reserved-fragment-characters*)))
+ (if* (eq 'uri class)
+ then ;; allow the compiler to optimize the make-instance call:
+ (make-instance 'uri
+ :scheme scheme
+ :host host
+ :port port
+ :path path
+ :query query
+ :fragment fragment
+ :escaped escape)
+ else ;; do it the slow way:
+ (make-instance class
+ :scheme scheme
+ :host host
+ :port port
+ :path path
+ :query query
+ :fragment fragment
+ :escaped escape))))
+
+(defmethod uri ((thing uri))
+ thing)
+
+(defmethod uri ((thing string))
+ (parse-uri thing))
+
+(defmethod uri ((thing t))
+ (error "Cannot coerce ~s to a uri." thing))
+
+(defvar *strict-parse* t)
+
+(defun parse-uri-string (string &aux (illegal-chars *illegal-characters*))
+ (declare (optimize (speed 3)))
+ ;; Speed is important, so use a specialized state machine instead of
+ ;; regular expressions for parsing the URI string. The regexp we are
+ ;; simulating:
+ ;; ^(([^:/?#]+):)?
+ ;; (//([^/?#]*))?
+ ;; ([^?#]*)
+ ;; (\?([^#]*))?
+ ;; (#(.*))?
+ (let* ((state 0)
+ (start 0)
+ (end (length string))
+ (tokval nil)
+ (scheme nil)
+ (host nil)
+ (port nil)
+ (path-components '())
+ (query nil)
+ (fragment nil)
+ ;; namespace identifier, for urn parsing only:
+ (nid nil))
+ (declare (fixnum state start end))
+ (flet ((read-token (kind &optional legal-chars)
+ (setq tokval nil)
+ (if* (>= start end)
+ then :end
+ else (let ((sindex start)
+ (res nil)
+ c)
+ (declare (fixnum sindex))
+ (setq res
+ (loop
+ (when (>= start end) (return nil))
+ (setq c (char string start))
+ (let ((ci (char-int c)))
+ (if* legal-chars
+ then (if* (and (eq :colon kind) (eq c #\:))
+ then (return :colon)
+ elseif (= 0 (sbit legal-chars ci))
+ then (.parse-error
+ "~
+URI ~s contains illegal character ~s at position ~d."
+ string c start))
+ elseif (and (< ci 128)
+ *strict-parse*
+ (= 1 (sbit illegal-chars ci)))
+ then (.parse-error "~
+URI ~s contains illegal character ~s at position ~d."
+ string c start)))
+ (case kind
+ (:path (case c
+ (#\? (return :question))
+ (#\# (return :hash))))
+ (:query (case c (#\# (return :hash))))
+ (:rest)
+ (t (case c
+ (#\: (return :colon))
+ (#\? (return :question))
+ (#\# (return :hash))
+ (#\/ (return :slash)))))
+ (incf start)))
+ (if* (> start sindex)
+ then ;; we found some chars
+ ;; before we stopped the parse
+ (setq tokval (subseq string sindex start))
+ :string
+ else ;; immediately stopped at a special char
+ (incf start)
+ res))))
+ (failure (&optional why)
+ (.parse-error "illegal URI: ~s [~d]~@[: ~a~]"
+ string state why))
+ (impossible ()
+ (.parse-error "impossible state: ~d [~s]" state string)))
+ (loop
+ (case state
+ (0 ;; starting to parse
+ (ecase (read-token t)
+ (:colon (failure))
+ (:question (setq state 7))
+ (:hash (setq state 8))
+ (:slash (setq state 3))
+ (:string (setq state 1))
+ (:end (setq state 9))))
+ (1 ;; seen <token><special char>
+ (let ((token tokval))
+ (ecase (read-token t)
+ (:colon (setq scheme token)
+ (if* (equalp "urn" scheme)
+ then (setq state 15)
+ else (setq state 2)))
+ (:question (push token path-components)
+ (setq state 7))
+ (:hash (push token path-components)
+ (setq state 8))
+ (:slash (push token path-components)
+ (push "/" path-components)
+ (setq state 6))
+ (:string (failure))
+ (:end (push token path-components)
+ (setq state 9)))))
+ (2 ;; seen <scheme>:
+ (ecase (read-token t)
+ (:colon (failure))
+ (:question (setq state 7))
+ (:hash (setq state 8))
+ (:slash (setq state 3))
+ (:string (setq state 10))
+ (:end (setq state 9))))
+ (10 ;; seen <scheme>:<token>
+ (let ((token tokval))
+ (ecase (read-token t)
+ (:colon (failure))
+ (:question (push token path-components)
+ (setq state 7))
+ (:hash (push token path-components)
+ (setq state 8))
+ (:slash (push token path-components)
+ (setq state 6))
+ (:string (failure))
+ (:end (push token path-components)
+ (setq state 9)))))
+ (3 ;; seen / or <scheme>:/
+ (ecase (read-token t)
+ (:colon (failure))
+ (:question (push "/" path-components)
+ (setq state 7))
+ (:hash (push "/" path-components)
+ (setq state 8))
+ (:slash (setq state 4))
+ (:string (push "/" path-components)
+ (push tokval path-components)
+ (setq state 6))
+ (:end (push "/" path-components)
+ (setq state 9))))
+ (4 ;; seen [<scheme>:]//
+ (ecase (read-token t)
+ (:colon (failure))
+ (:question (failure))
+ (:hash (failure))
+ (:slash
+ (if* (and (equalp "file" scheme)
+ (null host))
+ then ;; file:///...
+ (push "/" path-components)
+ (setq state 6)
+ else (failure)))
+ (:string (setq host tokval)
+ (setq state 11))
+ (:end (failure))))
+ (11 ;; seen [<scheme>:]//<host>
+ (ecase (read-token t)
+ (:colon (setq state 5))
+ (:question (setq state 7))
+ (:hash (setq state 8))
+ (:slash (push "/" path-components)
+ (setq state 6))
+ (:string (impossible))
+ (:end (setq state 9))))
+ (5 ;; seen [<scheme>:]//<host>:
+ (ecase (read-token t)
+ (:colon (failure))
+ (:question (failure))
+ (:hash (failure))
+ (:slash (push "/" path-components)
+ (setq state 6))
+ (:string (setq port tokval)
+ (setq state 12))
+ (:end (failure))))
+ (12 ;; seen [<scheme>:]//<host>:[<port>]
+ (ecase (read-token t)
+ (:colon (failure))
+ (:question (setq state 7))
+ (:hash (setq state 8))
+ (:slash (push "/" path-components)
+ (setq state 6))
+ (:string (impossible))
+ (:end (setq state 9))))
+ (6 ;; seen /
+ (ecase (read-token :path)
+ (:question (setq state 7))
+ (:hash (setq state 8))
+ (:string (push tokval path-components)
+ (setq state 13))
+ (:end (setq state 9))))
+ (13 ;; seen path
+ (ecase (read-token :path)
+ (:question (setq state 7))
+ (:hash (setq state 8))
+ (:string (impossible))
+ (:end (setq state 9))))
+ (7 ;; seen ?
+ (setq illegal-chars
+ (if* *strict-parse*
+ then *strict-illegal-query-characters*
+ else *illegal-query-characters*))
+ (ecase (prog1 (read-token :query)
+ (setq illegal-chars *illegal-characters*))
+ (:hash (setq state 8))
+ (:string (setq query tokval)
+ (setq state 14))
+ (:end (setq state 9))))
+ (14 ;; query
+ (ecase (read-token :query)
+ (:hash (setq state 8))
+ (:string (impossible))
+ (:end (setq state 9))))
+ (8 ;; seen #
+ (ecase (read-token :rest)
+ (:string (setq fragment tokval)
+ (setq state 9))
+ (:end (setq state 9))))
+ (9 ;; done
+ (return
+ (values
+ scheme host port
+ (apply #'concatenate 'string (nreverse path-components))
+ query fragment)))
+ ;; URN parsing:
+ (15 ;; seen urn:, read nid now
+ (case (read-token :colon *valid-nid-characters*)
+ (:string (setq nid tokval)
+ (setq state 16))
+ (t (failure "missing namespace identifier"))))
+ (16 ;; seen urn:<nid>
+ (case (read-token t)
+ (:colon (setq state 17))
+ (t (failure "missing namespace specific string"))))
+ (17 ;; seen urn:<nid>:, rest is nss
+ (return (values scheme
+ nid
+ nil
+ (progn
+ (setq illegal-chars *reserved-nss-characters*)
+ (read-token :rest)
+ tokval))))
+ (t (.parse-error
+ "internal error in parse engine, wrong state: ~s." state)))))))
+
+(defun escape-p (string)
+ (declare (optimize (speed 3)))
+ (do* ((i 0 (1+ i))
+ (max (the fixnum (length string))))
+ ((= i max) nil)
+ (declare (fixnum i max))
+ (when (char= #\% (char string i))
+ (return t))))
+
+(defun parse-path (path-string escape)
+ (do* ((xpath-list (delimited-string-to-list path-string #\/))
+ (path-list
+ (progn
+ (if* (string= "" (car xpath-list))
+ then (setf (car xpath-list) :absolute)
+ else (push :relative xpath-list))
+ xpath-list))
+ (pl (cdr path-list) (cdr pl))
+ segments)
+ ((null pl) path-list)
+
+ (if* (cdr (setq segments
+ (if* (string= "" (car pl))
+ then '("")
+ else (delimited-string-to-list (car pl) #\;))))
+ then ;; there is a param
+ (setf (car pl)
+ (mapcar #'(lambda (s)
+ (decode-escaped-encoding s escape
+ ;; decode all %xx:
+ nil))
+ segments))
+ else ;; no param
+ (setf (car pl)
+ (decode-escaped-encoding (car segments) escape
+ ;; decode all %xx:
+ nil)))))
+
+(defun decode-escaped-encoding (string escape
+ &optional (reserved-chars
+ *reserved-characters*))
+ ;; Return a string with the real characters.
+ (when (null escape) (return-from decode-escaped-encoding string))
+ (do* ((i 0 (1+ i))
+ (max (length string))
+ (new-string (copy-seq string))
+ (new-i 0 (1+ new-i))
+ ch ch2 chc chc2)
+ ((= i max)
+ (shrink-vector new-string new-i))
+ (if* (char= #\% (setq ch (char string i)))
+ then (when (> (+ i 3) max)
+ (.parse-error
+ "Unsyntactic escaped encoding in ~s." string))
+ (setq ch (char string (incf i)))
+ (setq ch2 (char string (incf i)))
+ (when (not (and (setq chc (digit-char-p ch 16))
+ (setq chc2 (digit-char-p ch2 16))))
+ (.parse-error
+ "Non-hexidecimal digits after %: %c%c." ch ch2))
+ (let ((ci (+ (* 16 chc) chc2)))
+ (if* (or (null reserved-chars)
+ (> ci 127) ; bug11527
+ (= 0 (sbit reserved-chars ci)))
+ then ;; ok as is
+ (setf (char new-string new-i)
+ (code-char ci))
+ else (setf (char new-string new-i) #\%)
+ (setf (char new-string (incf new-i)) ch)
+ (setf (char new-string (incf new-i)) ch2)))
+ else (setf (char new-string new-i) ch))))
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+;;;; Printing
+
+(defun render-uri (uri stream
+ &aux (escape (uri-escaped uri))
+ (*print-pretty* nil))
+ (when (null (uri-string uri))
+ (setf (uri-string uri)
+ (let ((scheme (uri-scheme uri))
+ (host (uri-host uri))
+ (port (uri-port uri))
+ (path (uri-path uri))
+ (query (uri-query uri))
+ (fragment (uri-fragment uri)))
+ (concatenate 'string
+ (when scheme
+ (encode-escaped-encoding
+ (string-downcase ;; for upper case lisps
+ (symbol-name scheme))
+ *reserved-characters* escape))
+ (when scheme ":")
+ (when (or host (eq :file scheme)) "//")
+ (when host
+ (encode-escaped-encoding
+ host *reserved-authority-characters* escape))
+ (when port ":")
+ (when port
+ #-allegro (format nil "~D" port)
+ #+allegro (with-output-to-string (s)
+ (excl::maybe-print-fast s port))
+ )
+ (when path
+ (encode-escaped-encoding path
+ nil
+ ;;*reserved-path-characters*
+ escape))
+ (when query "?")
+ (when query (encode-escaped-encoding query nil escape))
+ (when fragment "#")
+ (when fragment (encode-escaped-encoding fragment nil escape))))))
+ (if* stream
+ then (format stream "~a" (uri-string uri))
+ else (uri-string uri)))
+
+(defun render-parsed-path (path-list escape)
+ (do* ((res '())
+ (first (car path-list))
+ (pl (cdr path-list) (cdr pl))
+ (pe (car pl) (car pl)))
+ ((null pl)
+ (when res (apply #'concatenate 'string (nreverse res))))
+ (when (or (null first)
+ (prog1 (eq :absolute first)
+ (setq first nil)))
+ (push "/" res))
+ (if* (atom pe)
+ then (push
+ (encode-escaped-encoding pe *reserved-path-characters* escape)
+ res)
+ else ;; contains params
+ (push (encode-escaped-encoding
+ (car pe) *reserved-path-characters* escape)
+ res)
+ (dolist (item (cdr pe))
+ (push ";" res)
+ (push (encode-escaped-encoding
+ item *reserved-path-characters* escape)
+ res)))))
+
+(defun render-urn (urn stream
+ &aux (*print-pretty* nil))
+ (when (null (uri-string urn))
+ (setf (uri-string urn)
+ (let ((nid (urn-nid urn))
+ (nss (urn-nss urn)))
+ (concatenate 'string "urn:" nid ":" nss))))
+ (if* stream
+ then (format stream "~a" (uri-string urn))
+ else (uri-string urn)))
+
+(defparameter *escaped-encoding*
+ (vector #\0 #\1 #\2 #\3 #\4 #\5 #\6 #\7 #\8 #\9 #\a #\b #\c #\d #\e #\f))
+
+(defun encode-escaped-encoding (string reserved-chars escape)
+ (when (null escape) (return-from encode-escaped-encoding string))
+ ;; Make a string as big as it possibly needs to be (3 times the original
+ ;; size), and truncate it at the end.
+ (do* ((max (length string))
+ (new-max (* 3 max)) ;; worst case new size
+ (new-string (make-string new-max))
+ (i 0 (1+ i))
+ (new-i -1)
+ c ci)
+ ((= i max)
+ (shrink-vector new-string (incf new-i)))
+ (setq ci (char-int (setq c (char string i))))
+ (if* (or (null reserved-chars)
+ (> ci 127)
+ (= 0 (sbit reserved-chars ci)))
+ then ;; ok as is
+ (incf new-i)
+ (setf (char new-string new-i) c)
+ else ;; need to escape it
+ (multiple-value-bind (q r) (truncate ci 16)
+ (setf (char new-string (incf new-i)) #\%)
+ (setf (char new-string (incf new-i)) (elt *escaped-encoding* q))
+ (setf (char new-string (incf new-i))
+ (elt *escaped-encoding* r))))))
+
+(defmethod print-object ((uri uri) stream)
+ (if* *print-escape*
+ then (print-unreadable-object (uri stream :type t) (render-uri uri stream))
+ else (render-uri uri stream)))
+
+(defmethod print-object ((urn urn) stream)
+ (if* *print-escape*
+ then (print-unreadable-object (urn stream :type t) (render-urn urn stream))
+ else (render-urn urn stream)))
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+;; merging and unmerging
+
+(defmethod merge-uris ((uri string) (base string) &optional place)
+ (merge-uris (parse-uri uri) (parse-uri base) place))
+
+(defmethod merge-uris ((uri uri) (base string) &optional place)
+ (merge-uris uri (parse-uri base) place))
+
+(defmethod merge-uris ((uri string) (base uri) &optional place)
+ (merge-uris (parse-uri uri) base place))
+
+
+(defmethod merge-uris ((uri uri) (base uri) &optional place)
+ ;; See ../doc/rfc2396.txt for info on the algorithm we use to merge
+ ;; URIs.
+ ;;
+ (tagbody
+;;;; step 2
+ (when (and (null (uri-parsed-path uri))
+ (null (uri-scheme uri))
+ (null (uri-host uri))
+ (null (uri-port uri))
+ (null (uri-query uri)))
+ (return-from merge-uris
+ (let ((new (copy-uri base :place place)))
+ (when (uri-query uri)
+ (setf (uri-query new) (uri-query uri)))
+ (when (uri-fragment uri)
+ (setf (uri-fragment new) (uri-fragment uri)))
+ new)))
+
+ (setq uri (copy-uri uri :place place))
+
+;;;; step 3
+ (when (uri-scheme uri)
+ (return-from merge-uris uri))
+ (setf (uri-scheme uri) (uri-scheme base))
+
+;;;; step 4
+ (when (uri-host uri) (go :done))
+ (setf (uri-host uri) (uri-host base))
+ (setf (uri-port uri) (uri-port base))
+
+;;;; step 5
+ (let ((p (uri-parsed-path uri)))
+
+ ;; bug13133:
+ ;; The following form causes our implementation to be at odds with
+ ;; RFC 2396, however this is apparently what was intended by the
+ ;; authors of the RFC. Specifically, (merge-uris "?y" "/foo")
+ ;; should return #<uri /foo?y> instead of #<uri ?y>, according to
+ ;; this:
+;;; http://www.apache.org/~fielding/uri/rev-2002/issues.html#003-relative-query
+ (when (null p)
+ (setf (uri-path uri) (uri-path base))
+ (go :done))
+
+ (when (and p (eq :absolute (car p)))
+ (when (equal '(:absolute "") p)
+ ;; Canonicalize the way parsing does:
+ (setf (uri-path uri) nil))
+ (go :done)))
+
+;;;; step 6
+ (let* ((base-path
+ (or (uri-parsed-path base)
+ ;; needed because we canonicalize away a path of just `/':
+ '(:absolute "")))
+ (path (uri-parsed-path uri))
+ new-path-list)
+ (when (not (eq :absolute (car base-path)))
+ (error "Cannot merge ~a and ~a, since latter is not absolute."
+ uri base))
+
+ ;; steps 6a and 6b:
+ (setq new-path-list
+ (append (butlast base-path)
+ (if* path then (cdr path) else '(""))))
+
+ ;; steps 6c and 6d:
+ (let ((last (last new-path-list)))
+ (if* (atom (car last))
+ then (when (string= "." (car last))
+ (setf (car last) ""))
+ else (when (string= "." (caar last))
+ (setf (caar last) ""))))
+ (setq new-path-list
+ (delete "." new-path-list :test #'(lambda (a b)
+ (if* (atom b)
+ then (string= a b)
+ else nil))))
+
+ ;; steps 6e and 6f:
+ (let ((npl (cdr new-path-list))
+ index tmp fix-tail)
+ (setq fix-tail
+ (string= ".." (let ((l (car (last npl))))
+ (if* (atom l)
+ then l
+ else (car l)))))
+ (loop
+ (setq index
+ (position ".." npl
+ :test #'(lambda (a b)
+ (string= a
+ (if* (atom b)
+ then b
+ else (car b))))))
+ (when (null index) (return))
+ (when (= 0 index)
+ ;; The RFC says, in 6g, "that the implementation may handle
+ ;; this error by retaining these components in the resolved
+ ;; path, by removing them from the resolved path, or by
+ ;; avoiding traversal of the reference." The examples in C.2
+ ;; imply that we should do the first thing (retain them), so
+ ;; that's what we'll do.
+ (return))
+ (if* (= 1 index)
+ then (setq npl (cddr npl))
+ else (setq tmp npl)
+ (dotimes (x (- index 2)) (setq tmp (cdr tmp)))
+ (setf (cdr tmp) (cdddr tmp))))
+ (setf (cdr new-path-list) npl)
+ (when fix-tail (setq new-path-list (nconc new-path-list '("")))))
+
+ ;; step 6g:
+ ;; don't complain if new-path-list starts with `..'. See comment
+ ;; above about this step.
+
+ ;; step 6h:
+ (when (or (equal '(:absolute "") new-path-list)
+ (equal '(:absolute) new-path-list))
+ (setq new-path-list nil))
+ (setf (uri-path uri)
+ (render-parsed-path new-path-list
+ ;; don't know, so have to assume:
+ t)))
+
+;;;; step 7
+ :done
+ (return-from merge-uris uri)))
+
+(defmethod enough-uri ((uri string) (base string) &optional place)
+ (enough-uri (parse-uri uri) (parse-uri base) place))
+
+(defmethod enough-uri ((uri uri) (base string) &optional place)
+ (enough-uri uri (parse-uri base) place))
+
+(defmethod enough-uri ((uri string) (base uri) &optional place)
+ (enough-uri (parse-uri uri) base place))
+
+(defmethod enough-uri ((uri uri) (base uri) &optional place)
+ (let ((new-scheme nil)
+ (new-host nil)
+ (new-port nil)
+ (new-parsed-path nil))
+
+ (when (or (and (uri-scheme uri)
+ (not (equalp (uri-scheme uri) (uri-scheme base))))
+ (and (uri-host uri)
+ (not (equalp (uri-host uri) (uri-host base))))
+ (not (equalp (uri-port uri) (uri-port base))))
+ (return-from enough-uri uri))
+
+ (when (null (uri-host uri))
+ (setq new-host (uri-host base)))
+ (when (null (uri-port uri))
+ (setq new-port (uri-port base)))
+
+ (when (null (uri-scheme uri))
+ (setq new-scheme (uri-scheme base)))
+
+ ;; Now, for the hard one, path.
+ ;; We essentially do here what enough-namestring does.
+ (do* ((base-path (uri-parsed-path base))
+ (path (uri-parsed-path uri))
+ (bp base-path (cdr bp))
+ (p path (cdr p)))
+ ((or (null bp) (null p))
+ ;; If p is nil, that means we have something like
+ ;; (enough-uri "/foo/bar" "/foo/bar/baz.htm"), so
+ ;; new-parsed-path will be nil.
+ (when (null bp)
+ (setq new-parsed-path (copy-list p))
+ (when (not (symbolp (car new-parsed-path)))
+ (push :relative new-parsed-path))))
+ (if* (equal (car bp) (car p))
+ thenret ;; skip it
+ else (setq new-parsed-path (copy-list p))
+ (when (not (symbolp (car new-parsed-path)))
+ (push :relative new-parsed-path))
+ (return)))
+
+ (let ((new-path
+ (when new-parsed-path
+ (render-parsed-path new-parsed-path
+ ;; don't know, so have to assume:
+ t)))
+ (new-query (uri-query uri))
+ (new-fragment (uri-fragment uri))
+ (new-plist (copy-list (uri-plist uri))))
+ (if* (and (null new-scheme)
+ (null new-host)
+ (null new-port)
+ (null new-path)
+ (null new-parsed-path)
+ (null new-query)
+ (null new-fragment))
+ then ;; can't have a completely empty uri!
+ (copy-uri nil
+ :class (class-of uri)
+ :place place
+ :path "/"
+ :plist new-plist)
+ else (copy-uri nil
+ :class (class-of uri)
+ :place place
+ :scheme new-scheme
+ :host new-host
+ :port new-port
+ :path new-path
+ :parsed-path new-parsed-path
+ :query new-query
+ :fragment new-fragment
+ :plist new-plist)))))
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+;; support for interning URIs
+
+(defun make-uri-space (&rest keys &key (size 777) &allow-other-keys)
+ #+allegro
+ (apply #'make-hash-table :size size
+ :hash-function 'uri-hash
+ :test 'uri= :values nil keys)
+ #-allegro
+ (apply #'make-hash-table :size size keys))
+
+(defun gethash-uri (uri table)
+ #+allegro (gethash uri table)
+ #-allegro
+ (let* ((hash (uri-hash uri))
+ (existing (gethash hash table)))
+ (dolist (u existing)
+ (when (uri= u uri)
+ (return-from gethash-uri (values u t))))
+ (values nil nil)))
+
+(defun puthash-uri (uri table)
+ #+allegro (excl:puthash-key uri table)
+ #-allegro
+ (let ((existing (gethash (uri-hash uri) table)))
+ (dolist (u existing)
+ (when (uri= u uri)
+ (return-from puthash-uri u)))
+ (setf (gethash (uri-hash uri) table)
+ (cons uri existing))
+ uri))
+
+
+(defun uri-hash (uri)
+ (if* (uri-hashcode uri)
+ thenret
+ else (setf (uri-hashcode uri)
+ (sxhash
+ #+allegro
+ (render-uri uri nil)
+ #-allegro
+ (string-downcase
+ (render-uri uri nil))))))
+
+(defvar *uris* (make-uri-space))
+
+(defun uri-space () *uris*)
+
+(defun (setf uri-space) (new-val)
+ (setq *uris* new-val))
+
+;; bootstrapping (uri= changed from function to method):
+(when (fboundp 'uri=) (fmakunbound 'uri=))
+
+(defgeneric uri= (uri1 uri2))
+(defmethod uri= ((uri1 uri) (uri2 uri))
+ (when (not (eq (uri-scheme uri1) (uri-scheme uri2)))
+ (return-from uri= nil))
+ ;; RFC2396 says: a URL with an explicit ":port", where the port is
+ ;; the default for the scheme, is the equivalent to one where the
+ ;; port is elided. Hmmmm. This means that this function has to be
+ ;; scheme dependent. Grrrr.
+ (let ((default-port (case (uri-scheme uri1)
+ (:http 80)
+ (:https 443)
+ (:ftp 21)
+ (:telnet 23))))
+ (and (equalp (uri-host uri1) (uri-host uri2))
+ (eql (or (uri-port uri1) default-port)
+ (or (uri-port uri2) default-port))
+ (string= (uri-path uri1) (uri-path uri2))
+ (string= (uri-query uri1) (uri-query uri2))
+ (string= (uri-fragment uri1) (uri-fragment uri2)))))
+
+(defmethod uri= ((urn1 urn) (urn2 urn))
+ (when (not (eq (uri-scheme urn1) (uri-scheme urn2)))
+ (return-from uri= nil))
+ (and (equalp (urn-nid urn1) (urn-nid urn2))
+ (urn-nss-equal (urn-nss urn1) (urn-nss urn2))))
+
+(defun urn-nss-equal (nss1 nss2 &aux len)
+ ;; Return t iff the nss values are the same.
+ ;; %2c and %2C are equivalent.
+ (when (or (null nss1) (null nss2)
+ (not (= (setq len (length nss1))
+ (length nss2))))
+ (return-from urn-nss-equal nil))
+ (do* ((i 0 (1+ i))
+ (state :char)
+ c1 c2)
+ ((= i len) t)
+ (setq c1 (char nss1 i))
+ (setq c2 (char nss2 i))
+ (ecase state
+ (:char
+ (if* (and (char= #\% c1) (char= #\% c2))
+ then (setq state :percent+1)
+ elseif (char/= c1 c2)
+ then (return nil)))
+ (:percent+1
+ (when (char-not-equal c1 c2) (return nil))
+ (setq state :percent+2))
+ (:percent+2
+ (when (char-not-equal c1 c2) (return nil))
+ (setq state :char)))))
+
+(defmethod intern-uri ((xuri uri) &optional (uri-space *uris*))
+ (let ((uri (gethash-uri xuri uri-space)))
+ (if* uri
+ thenret
+ else (puthash-uri xuri uri-space))))
+
+(defmethod intern-uri ((uri string) &optional (uri-space *uris*))
+ (intern-uri (parse-uri uri) uri-space))
+
+(defun unintern-uri (uri &optional (uri-space *uris*))
+ (if* (eq t uri)
+ then (clrhash uri-space)
+ elseif (uri-p uri)
+ then (remhash uri uri-space)
+ else (error "bad uri: ~s." uri)))
+
+(defmacro do-all-uris ((var &optional uri-space result-form)
+ &rest forms
+ &environment env)
+ "do-all-uris (var [[uri-space] result-form])
+ {declaration}* {tag | statement}*
+Executes the forms once for each uri with var bound to the current uri"
+ (let ((f (gensym))
+ (g-ignore (gensym))
+ (g-uri-space (gensym))
+ (body (third (parse-body forms env))))
+ `(let ((,g-uri-space (or ,uri-space *uris*)))
+ (prog nil
+ (flet ((,f (,var &optional ,g-ignore)
+ (declare (ignore-if-unused ,var ,g-ignore))
+ (tagbody ,@body)))
+ (maphash #',f ,g-uri-space))
+ (return ,result-form)))))
+
+(defun sharp-u (stream chr arg)
+ (declare (ignore chr arg))
+ (let ((arg (read stream nil nil t)))
+ (if *read-suppress*
+ nil
+ (if* (stringp arg)
+ then (parse-uri arg)
+ else
+
+ (internal-reader-error
+ stream
+ "#u takes a string or list argument: ~s" arg)))))
+
+
+#+allegro
+excl::
+#+allegro
+(locally (declare (special std-lisp-readtable))
+ (let ((*readtable* std-lisp-readtable))
+ (set-dispatch-macro-character #\# #\u #'puri::sharp-u)))
+#-allegro
+(set-dispatch-macro-character #\# #\u #'puri::sharp-u)
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+
+(provide :uri)
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+;; timings
+;; (don't run under emacs with M-x fi:common-lisp)
+
+#+allegro
+(eval-when (:compile-toplevel :load-toplevel :execute)
+ (import 'excl::gc))
+
+#-allegro
+(defun gc (&rest options)
+ (declare (ignore options))
+ #+sbcl (sb-ext::gc)
+ #+cmu (ext::gc)
+ )
+
+(defun time-uri-module ()
+ (declare (optimize (speed 3) (safety 0) (debug 0)))
+ (let ((uri "http://www.franz.com/a/b;x;y;z/c/foo?bar=baz&xxx#foo")
+ (uri2 "http://www.franz.com/a/b;x;y;z/c/%2ffoo?bar=baz&xxx#foo"))
+ (gc t) (gc :tenure) (gc :tenure) (gc :tenure)
+ (format t "~&;;; starting timing testing 1...~%")
+ (time (dotimes (i 100000) (parse-uri uri)))
+
+ (gc t) (gc :tenure) (gc :tenure) (gc :tenure)
+ (format t "~&;;; starting timing testing 2...~%")
+ (let ((uri (parse-uri uri)))
+ (time (dotimes (i 100000)
+ ;; forces no caching of the printed representation:
+ (setf (uri-string uri) nil)
+ (format nil "~a" uri))))
+
+ (gc t) (gc :tenure) (gc :tenure) (gc :tenure)
+ (format t "~&;;; starting timing testing 3...~%")
+ (time
+ (progn
+ (dotimes (i 100000) (parse-uri uri2))
+ (let ((uri (parse-uri uri)))
+ (dotimes (i 100000)
+ ;; forces no caching of the printed representation:
+ (setf (uri-string uri) nil)
+ (format nil "~a" uri)))))))
+
+;;******** reference output (ultra, modified 5.0.1):
+;;; starting timing testing 1...
+; cpu time (non-gc) 13,710 msec user, 0 msec system
+; cpu time (gc) 600 msec user, 10 msec system
+; cpu time (total) 14,310 msec user, 10 msec system
+; real time 14,465 msec
+; space allocation:
+; 1,804,261 cons cells, 7 symbols, 41,628,832 other bytes, 0 static bytes
+;;; starting timing testing 2...
+; cpu time (non-gc) 27,500 msec user, 0 msec system
+; cpu time (gc) 280 msec user, 20 msec system
+; cpu time (total) 27,780 msec user, 20 msec system
+; real time 27,897 msec
+; space allocation:
+; 1,900,463 cons cells, 0 symbols, 17,693,712 other bytes, 0 static bytes
+;;; starting timing testing 3...
+; cpu time (non-gc) 52,290 msec user, 10 msec system
+; cpu time (gc) 1,290 msec user, 30 msec system
+; cpu time (total) 53,580 msec user, 40 msec system
+; real time 54,062 msec
+; space allocation:
+; 7,800,205 cons cells, 0 symbols, 81,697,496 other bytes, 0 static bytes
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+;;; after improving decode-escaped-encoding/encode-escaped-encoding:
+
+;;; starting timing testing 1...
+; cpu time (non-gc) 14,520 msec user, 0 msec system
+; cpu time (gc) 400 msec user, 0 msec system
+; cpu time (total) 14,920 msec user, 0 msec system
+; real time 15,082 msec
+; space allocation:
+; 1,800,270 cons cells, 0 symbols, 41,600,160 other bytes, 0 static bytes
+;;; starting timing testing 2...
+; cpu time (non-gc) 27,490 msec user, 10 msec system
+; cpu time (gc) 300 msec user, 0 msec system
+; cpu time (total) 27,790 msec user, 10 msec system
+; real time 28,025 msec
+; space allocation:
+; 1,900,436 cons cells, 0 symbols, 17,693,712 other bytes, 0 static bytes
+;;; starting timing testing 3...
+; cpu time (non-gc) 47,900 msec user, 20 msec system
+; cpu time (gc) 920 msec user, 10 msec system
+; cpu time (total) 48,820 msec user, 30 msec system
+; real time 49,188 msec
+; space allocation:
+; 3,700,215 cons cells, 0 symbols, 81,707,144 other bytes, 0 static bytes
Added: branches/trunk-reorg/thirdparty/puri-1.5.1/tests.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/puri-1.5.1/tests.lisp 2007-10-04 19:10:49 UTC (rev 2204)
+++ branches/trunk-reorg/thirdparty/puri-1.5.1/tests.lisp 2007-10-04 19:13:23 UTC (rev 2205)
@@ -0,0 +1,419 @@
+;;;; -*- Mode: LISP; Syntax: ANSI-Common-Lisp; Base: 10 -*-
+;; copyright (c) 1999-2001 Franz Inc, Berkeley, CA - All rights reserved.
+;; copyright (c) 2003 Kevin Rosenberg (significant fixes for using
+;; tester package)
+;;
+;; The software, data and information contained herein are proprietary
+;; to, and comprise valuable trade secrets of, Franz, Inc. They are
+;; given in confidence by Franz, Inc. pursuant to a written license
+;; agreement, and may be stored and used only in accordance with the terms
+;; of such license.
+;;
+;; Restricted Rights Legend
+;; ------------------------
+;; Use, duplication, and disclosure of the software, data and information
+;; contained herein by any agency, department or entity of the U.S.
+;; Government are subject to restrictions of Restricted Rights for
+;; Commercial Software developed at private expense as specified in
+;; DOD FAR Supplement 52.227-7013 (c) (1) (ii), as applicable.
+;;
+;; Original version from ACL 6.1:
+;; t-uri.cl,v 1.3.6.3.2.1 2001/08/09 17:42:43 layer
+;;
+;; $Id: tests.lisp 11031 2006-08-15 00:59:34Z kevin $
+
+
+(defpackage #:puri-tests (:use #:puri #:cl #:ptester))
+(in-package #:puri-tests)
+
+(unintern-uri t)
+
+(defmacro gen-test-forms ()
+ (let ((res '())
+ (base-uri "http://a/b/c/d;p?q"))
+
+ (dolist (x `(;; (relative-uri result base-uri compare-function)
+;;;; RFC Appendix C.1 (normal examples)
+ ("g:h" "g:h" ,base-uri)
+ ("g" "http://a/b/c/g" ,base-uri)
+ ("./g" "http://a/b/c/g" ,base-uri)
+ ("g/" "http://a/b/c/g/" ,base-uri)
+ ("/g" "http://a/g" ,base-uri)
+ ("//g" "http://g" ,base-uri)
+ ;; Following was changed from appendix C of RFC 2396
+ ;; http://www.apache.org/~fielding/uri/rev-2002/issues.html#003-relative-query
+ #-ignore ("?y" "http://a/b/c/d;p?y" ,base-uri)
+ #+ignore ("?y" "http://a/b/c/?y" ,base-uri)
+ ("g?y" "http://a/b/c/g?y" ,base-uri)
+ ("#s" "http://a/b/c/d;p?q#s" ,base-uri)
+ ("g#s" "http://a/b/c/g#s" ,base-uri)
+ ("g?y#s" "http://a/b/c/g?y#s" ,base-uri)
+ (";x" "http://a/b/c/;x" ,base-uri)
+ ("g;x" "http://a/b/c/g;x" ,base-uri)
+ ("g;x?y#s" "http://a/b/c/g;x?y#s" ,base-uri)
+ ("." "http://a/b/c/" ,base-uri)
+ ("./" "http://a/b/c/" ,base-uri)
+ (".." "http://a/b/" ,base-uri)
+ ("../" "http://a/b/" ,base-uri)
+ ("../g" "http://a/b/g" ,base-uri)
+ ("../.." "http://a/" ,base-uri)
+ ("../../" "http://a/" ,base-uri)
+ ("../../g" "http://a/g" ,base-uri)
+;;;; RFC Appendix C.2 (abnormal examples)
+ ("" "http://a/b/c/d;p?q" ,base-uri)
+ ("../../../g" "http://a/../g" ,base-uri)
+ ("../../../../g" "http://a/../../g" ,base-uri)
+ ("/./g" "http://a/./g" ,base-uri)
+ ("/../g" "http://a/../g" ,base-uri)
+ ("g." "http://a/b/c/g." ,base-uri)
+ (".g" "http://a/b/c/.g" ,base-uri)
+ ("g.." "http://a/b/c/g.." ,base-uri)
+ ("..g" "http://a/b/c/..g" ,base-uri)
+ ("./../g" "http://a/b/g" ,base-uri)
+ ("./g/." "http://a/b/c/g/" ,base-uri)
+ ("g/./h" "http://a/b/c/g/h" ,base-uri)
+ ("g/../h" "http://a/b/c/h" ,base-uri)
+ ("g;x=1/./y" "http://a/b/c/g;x=1/y" ,base-uri)
+ ("g;x=1/../y" "http://a/b/c/y" ,base-uri)
+ ("g?y/./x" "http://a/b/c/g?y/./x" ,base-uri)
+ ("g?y/../x" "http://a/b/c/g?y/../x" ,base-uri)
+ ("g#s/./x" "http://a/b/c/g#s/./x" ,base-uri)
+ ("g#s/../x" "http://a/b/c/g#s/../x" ,base-uri)
+ ("http:g" "http:g" ,base-uri)
+
+ ("foo/bar/baz.htm#foo"
+ "http://a/b/foo/bar/baz.htm#foo"
+ "http://a/b/c.htm")
+ ("foo/bar/baz.htm#foo"
+ "http://a/b/foo/bar/baz.htm#foo"
+ "http://a/b/")
+ ("foo/bar/baz.htm#foo"
+ "http://a/foo/bar/baz.htm#foo"
+ "http://a/b")
+ ("foo/bar;x;y/bam.htm"
+ "http://a/b/c/foo/bar;x;y/bam.htm"
+ "http://a/b/c/")))
+ (push `(test (intern-uri ,(second x))
+ (intern-uri (merge-uris (intern-uri ,(first x))
+ (intern-uri ,(third x))))
+ :test 'uri=)
+ res))
+
+;;;; intern tests
+ (dolist (x '(;; default port and specifying the default port are
+ ;; supposed to compare the same:
+ ("http://www.franz.com:80" "http://www.franz.com")
+ ("http://www.franz.com:80" "http://www.franz.com" eq)
+ ;; make sure they're `eq':
+ ("http://www.franz.com:80" "http://www.franz.com" eq)
+ ("http://www.franz.com" "http://www.franz.com" eq)
+ ("http://www.franz.com/foo" "http://www.franz.com/foo" eq)
+ ("http://www.franz.com/foo?bar"
+ "http://www.franz.com/foo?bar" eq)
+ ("http://www.franz.com/foo?bar#baz"
+ "http://www.franz.com/foo?bar#baz" eq)
+ ("http://WWW.FRANZ.COM" "http://www.franz.com" eq)
+ ("http://www.FRANZ.com" "http://www.franz.com" eq)
+ ("http://www.franz.com" "http://www.franz.com/" eq)
+ (;; %72 is "r", %2f is "/", %3b is ";"
+ "http://www.franz.com/ba%72%2f%3b;x;y;z/baz/"
+ "http://www.franz.com/bar%2f%3b;x;y;z/baz/" eq)))
+ (push `(test (intern-uri ,(second x))
+ (intern-uri ,(first x))
+ :test ',(if (third x)
+ (third x)
+ 'uri=))
+ res))
+
+;;;; parsing and equivalence tests
+ (push `(test
+ (parse-uri "http://foo+bar?baz=b%26lob+bof")
+ (parse-uri (parse-uri "http://foo+bar?baz=b%26lob+bof"))
+ :test 'uri=)
+ res)
+ (push '(test
+ (parse-uri "http://www.foo.com")
+ (parse-uri (parse-uri "http://www.foo.com?")) ; allow ? at end
+ :test 'uri=)
+ res)
+ (push `(test
+ "baz=b%26lob+bof"
+ (uri-query (parse-uri "http://foo+bar?baz=b%26lob+bof"))
+ :test 'string=)
+ res)
+ (push `(test
+ "baz=b%26lob+bof%3d"
+ (uri-query (parse-uri "http://foo+bar?baz=b%26lob+bof%3d"))
+ :test 'string=)
+ res)
+ (push
+ `(test (parse-uri "xxx?%41") (parse-uri "xxx?A") :test 'uri=)
+ res)
+ (push
+ `(test "A" (uri-query (parse-uri "xxx?%41")) :test 'string=)
+ res)
+
+ (push `(test-error (parse-uri " ")
+ :condition-type 'uri-parse-error)
+ res)
+ (push `(test-error (parse-uri "foo ")
+ :condition-type 'uri-parse-error)
+ res)
+ (push `(test-error (parse-uri " foo ")
+ :condition-type 'uri-parse-error)
+ res)
+ (push `(test-error (parse-uri "<foo")
+ :condition-type 'uri-parse-error)
+ res)
+ (push `(test-error (parse-uri "foo>")
+ :condition-type 'uri-parse-error)
+ res)
+ (push `(test-error (parse-uri "<foo>")
+ :condition-type 'uri-parse-error)
+ res)
+ (push `(test-error (parse-uri "%")
+ :condition-type 'uri-parse-error)
+ res)
+ (push `(test-error (parse-uri "foo%xyr")
+ :condition-type 'uri-parse-error)
+ res)
+ (push `(test-error (parse-uri "\"foo\"")
+ :condition-type 'uri-parse-error)
+ res)
+ (push `(test "%20" (format nil "~a" (parse-uri "%20"))
+ :test 'string=)
+ res)
+ (push `(test "&" (format nil "~a" (parse-uri "%26"))
+ :test 'string=)
+ res)
+ (push
+ `(test "foo%23bar" (format nil "~a" (parse-uri "foo%23bar"))
+ :test 'string=)
+ res)
+ (push
+ `(test "foo%23bar#foobar"
+ (format nil "~a" (parse-uri "foo%23bar#foobar"))
+ :test 'string=)
+ res)
+ (push
+ `(test "foo%23bar#foobar#baz"
+ (format nil "~a" (parse-uri "foo%23bar#foobar#baz"))
+ :test 'string=)
+ res)
+ (push
+ `(test "foo%23bar#foobar#baz"
+ (format nil "~a" (parse-uri "foo%23bar#foobar%23baz"))
+ :test 'string=)
+ res)
+ (push
+ `(test "foo%23bar#foobar/baz"
+ (format nil "~a" (parse-uri "foo%23bar#foobar%2fbaz"))
+ :test 'string=)
+ res)
+ (push `(test-error (parse-uri "foobar??")
+ :condition-type 'uri-parse-error)
+ res)
+ (push `(test-error (parse-uri "foobar?foo?")
+ :condition-type 'uri-parse-error)
+ res)
+ (push `(test "foobar?%3f"
+ (format nil "~a" (parse-uri "foobar?%3f"))
+ :test 'string=)
+ res)
+ (push `(test
+ "http://foo/bAr;3/baz?baf=3"
+ (format nil "~a" (parse-uri "http://foo/b%41r;3/baz?baf=3"))
+ :test 'string=)
+ res)
+ (push `(test
+ '(:absolute ("/bAr" "3") "baz")
+ (uri-parsed-path (parse-uri "http://foo/%2fb%41r;3/baz?baf=3"))
+ :test 'equal)
+ res)
+ (push `(test
+ "/%2fbAr;3/baz"
+ (let ((u (parse-uri "http://foo/%2fb%41r;3/baz?baf=3")))
+ (setf (uri-parsed-path u) '(:absolute ("/bAr" "3") "baz"))
+ (uri-path u))
+ :test 'string=)
+ res)
+ (push `(test
+ "http://www.verada.com:8010/kapow?name=foo%3Dbar%25"
+ (format nil "~a"
+ (parse-uri
+ "http://www.verada.com:8010/kapow?name=foo%3Dbar%25"))
+ :test 'string=)
+ res)
+ (push `(test
+ "ftp://parcftp.xerox.com/pub/pcl/mop/"
+ (format nil "~a"
+ (parse-uri "ftp://parcftp.xerox.com:/pub/pcl/mop/"))
+ :test 'string=)
+ res)
+
+;;;; enough-uri tests
+ (dolist (x `(("http://www.franz.com/foo/bar/baz.htm"
+ "http://www.franz.com/foo/bar/"
+ "baz.htm")
+ ("http://www.franz.com/foo/bar/baz.htm"
+ "http://www.franz.com/foo/bar"
+ "baz.htm")
+ ("http://www.franz.com:80/foo/bar/baz.htm"
+ "http://www.franz.com:80/foo/bar"
+ "baz.htm")
+ ("http:/foo/bar/baz.htm" "http:/foo/bar" "baz.htm")
+ ("http:/foo/bar/baz.htm" "http:/foo/bar/" "baz.htm")
+ ("/foo/bar/baz.htm" "/foo/bar" "baz.htm")
+ ("/foo/bar/baz.htm" "/foo/bar/" "baz.htm")
+ ("/foo/bar/baz.htm#foo" "/foo/bar/" "baz.htm#foo")
+ ("/foo/bar/baz.htm?bar#foo" "/foo/bar/" "baz.htm?bar#foo")
+
+ ("http://www.dnai.com/~layer/foo.htm"
+ "http://www.known.net"
+ "http://www.dnai.com/~layer/foo.htm")
+ ("http://www.dnai.com/~layer/foo.htm"
+ "http://www.dnai.com:8000/~layer/"
+ "http://www.dnai.com/~layer/foo.htm")
+ ("http://www.dnai.com:8000/~layer/foo.htm"
+ "http://www.dnai.com/~layer/"
+ "http://www.dnai.com:8000/~layer/foo.htm")
+ ("http://www.franz.com"
+ "http://www.franz.com"
+ "/")))
+ (push `(test (parse-uri ,(third x))
+ (enough-uri (parse-uri ,(first x))
+ (parse-uri ,(second x)))
+ :test 'uri=)
+ res))
+
+;;;; urn tests, ideas of which are from rfc2141
+ (let ((urn "urn:com:foo-the-bar"))
+ (push `(test "com" (urn-nid (parse-uri ,urn))
+ :test #'string=)
+ res)
+ (push `(test "foo-the-bar" (urn-nss (parse-uri ,urn))
+ :test #'string=)
+ res))
+ (push `(test-error (parse-uri "urn:")
+ :condition-type 'uri-parse-error)
+ res)
+ (push `(test-error (parse-uri "urn:foo")
+ :condition-type 'uri-parse-error)
+ res)
+ (push `(test-error (parse-uri "urn:foo$")
+ :condition-type 'uri-parse-error)
+ res)
+ (push `(test-error (parse-uri "urn:foo_")
+ :condition-type 'uri-parse-error)
+ res)
+ (push `(test-error (parse-uri "urn:foo:foo&bar")
+ :condition-type 'uri-parse-error)
+ res)
+ (push `(test (parse-uri "URN:foo:a123,456")
+ (parse-uri "urn:foo:a123,456")
+ :test #'uri=)
+ res)
+ (push `(test (parse-uri "URN:foo:a123,456")
+ (parse-uri "urn:FOO:a123,456")
+ :test #'uri=)
+ res)
+ (push `(test (parse-uri "urn:foo:a123,456")
+ (parse-uri "urn:FOO:a123,456")
+ :test #'uri=)
+ res)
+ (push `(test (parse-uri "URN:FOO:a123%2c456")
+ (parse-uri "urn:foo:a123%2C456")
+ :test #'uri=)
+ res)
+ (push `(test
+ nil
+ (uri= (parse-uri "urn:foo:A123,456")
+ (parse-uri "urn:FOO:a123,456")))
+ res)
+ (push `(test
+ nil
+ (uri= (parse-uri "urn:foo:A123,456")
+ (parse-uri "urn:foo:a123,456")))
+ res)
+ (push `(test
+ nil
+ (uri= (parse-uri "urn:foo:A123,456")
+ (parse-uri "URN:foo:a123,456")))
+ res)
+ (push `(test
+ nil
+ (uri= (parse-uri "urn:foo:a123%2C456")
+ (parse-uri "urn:FOO:a123,456")))
+ res)
+ (push `(test
+ nil
+ (uri= (parse-uri "urn:foo:a123%2C456")
+ (parse-uri "urn:foo:a123,456")))
+ res)
+ (push `(test
+ nil
+ (uri= (parse-uri "URN:FOO:a123%2c456")
+ (parse-uri "urn:foo:a123,456")))
+ res)
+ (push `(test
+ nil
+ (uri= (parse-uri "urn:FOO:a123%2c456")
+ (parse-uri "urn:foo:a123,456")))
+ res)
+ (push `(test
+ nil
+ (uri= (parse-uri "urn:foo:a123%2c456")
+ (parse-uri "urn:foo:a123,456")))
+ res)
+
+ (push `(test t
+ (uri= (parse-uri "foo") (parse-uri "foo#")))
+ res)
+
+ (push
+ '(let ((puri::*strict-parse* nil))
+ (test-no-error
+ (puri:parse-uri
+ "http://foo.com/bar?a=zip|zop")))
+ res)
+ (push
+ '(test-error
+ (puri:parse-uri "http://foo.com/bar?a=zip|zop")
+ :condition-type 'uri-parse-error)
+ res)
+
+ (push
+ '(let ((puri::*strict-parse* nil))
+ (test-no-error
+ (puri:parse-uri
+ "http://arc3.msn.com/ADSAdClient31.dll?GetAd?PG=NBCSBU?SC=D2?AN=1.0586041")))
+ res)
+ (push
+ '(test-error
+ (puri:parse-uri
+ "http://arc3.msn.com/ADSAdClient31.dll?GetAd?PG=NBCSBU?SC=D2?AN=1.0586041")
+ :condition-type 'uri-parse-error)
+ res)
+
+ (push
+ '(let ((puri::*strict-parse* nil))
+ (test-no-error
+ (puri:parse-uri
+ "http://scbc.booksonline.com/cgi-bin/ndCGI.exe/Develop/pagClubHome.hrfTIOLI_…")))
+ res)
+ (push
+ '(test-error
+ (puri:parse-uri
+ "http://scbc.booksonline.com/cgi-bin/ndCGI.exe/Develop/pagClubHome.hrfTIOLI_…")
+ :condition-type 'uri-parse-error)
+ res)
+
+ `(progn ,@(nreverse res))))
+
+(defun do-tests ()
+ (let ((*break-on-test-failures* t))
+ (with-tests (:name "puri")
+ (gen-test-forms)))
+ t)
+
+
Added: branches/trunk-reorg/thirdparty/puri-1.5.1/uri.html
===================================================================
--- branches/trunk-reorg/thirdparty/puri-1.5.1/uri.html 2007-10-04 19:10:49 UTC (rev 2204)
+++ branches/trunk-reorg/thirdparty/puri-1.5.1/uri.html 2007-10-04 19:13:23 UTC (rev 2205)
@@ -0,0 +1,406 @@
+<html>
+
+<head>
+<title>URI support in Allegro CL</title>
+</head>
+
+<body>
+
+<h1>URI support in Allegro CL</h1>
+
+<p>This document contains the following sections:</p>
+<p><a href="#uri-intro-1">1.0 Introduction</a><br>
+<a href="#uri-api-1">2.0 The URI API definition</a><br>
+<a href="#parsing-decoding-1">3.0 Parsing, escape decoding/encoding and the path</a><br>
+<a href="#interning-uris-1">4.0 Interning URIs</a><br>
+<a href="#acl-implementation-1">5.0 Allegro CL implementation notes</a><br>
+<a href="#examples-1">6.0 Examples</a><br>
+</p>
+
+<p>This version of the Allegro CL URI support documentation is for distribution with the
+Open Source version of the URI code. Links to Allegro CL documentation other than
+URI-specific files have been supressed. To see Allegro CL documentation, see <a
+href="http://www.franz.com/support/documentation/">http://www.franz.com/support/documentation/</a>,
+which is the Allegro CL documentation page of the franz inc. website. Links to Allegro CL
+documentation can be found on that page. </p>
+
+<hr>
+
+<hr>
+
+<h2><a name="uri-intro-1">1.0 Introduction</a></h2>
+
+<p><em>URI</em> stands for <em>Universal Resource Identifier</em>. For a description of
+URIs, see RFC2396, which can be found in several places, including the IETF web site (<a
+href="http://www.ietf.org/rfc/rfc2396.txt">http://www.ietf.org/rfc/rfc2396.txt</a>) and
+the UCI/ICS web site (<a href="http://www.ics.uci.edu/pub/ietf/uri/rfc2396.txt">http://www.ics.uci.edu/pub/ietf/uri/rfc2396.txt</a>).
+We prefer the UCI/ICS one as it has more examples. </p>
+
+<p>URIs are a superset in functionality and syntax to URLs (Universal Resource Locators)
+and URNs (Universal Resource Names). That is, RFC2396 updates and merges RFC1738 and
+RFC1808 into a single syntax, called the URI. It does exclude some portions of RFC1738
+that define specific syntax of individual URL schemes. </p>
+
+<p>In URL slang, the <em>scheme</em> is usually called the `protocol', but it is called
+scheme in RFC1738. A URL `host' corresponds to the URI `authority.' The URL slang
+`bookmark' or `anchor' is `fragment' in URI lingo. </p>
+
+<p>The URI facility was available as a patch to Allegro CL 5.0.1 and is included with
+release 6.0. the URI facility might not be in an Allegro CL image. Evaluate <code>(require
+:uri)</code> to ensure the facility is loaded (that form returns <code>nil</code> if the
+URI module is already loaded). </p>
+
+<p>Broadly, the URI facility creates a Lisp object that represents a URI, and provides
+setters and accessors to fields in the URI object. The URI object can also be interned,
+much like symbols in CL are. This document describes the facility and the related
+operators. </p>
+
+<p>Aside from the obvious slots which are called out in the RFC, URIs also have a property
+list. With interning, this is another similarity between URIs and CL symbols. </p>
+
+<hr>
+
+<hr>
+
+<h2><a name="uri-api-1">2.0 The URI API definition</a></h2>
+
+<p>Symbols naming objects (functions, variables, etc.) in the <em>uri</em> module are
+exported from the <code>net.uri</code> package. </p>
+
+<p>URIs are represented by CLOS objects. Their slots are: </p>
+
+<pre>
+scheme
+host
+port
+path
+query
+fragment
+plist
+</pre>
+
+<p>The <code>host</code> and <code>port</code> slots together correspond to the <code>authority</code>
+(see RFC2396). There is an accessor-like function, <a href="operators/uri-authority.htm"><b>uri-authority</b></a>,
+that can be used to extract the authority from a URI. See the RFC2396 specifications
+pointed to at the beginning of the <a href="#uri-intro-1">1.0 Introduction</a> for details
+of all the slots except <code>plist</code>. The <code>plist</code> slot contains a
+standard Common Lisp property list. </p>
+
+<p>All symbols are external in the <code>net.uri</code> package, unless otherwise noted.
+Brief descriptions are given in this document, with complete descriptions in the
+individual pages.
+
+<ul>
+ <li><a href="classes/uri.htm"><code>uri</code></a>: the class of URI objects. </li>
+ <li><a href="classes/urn.htm"><code>urn</code></a>: the class of URN objects. </li>
+ <li><a href="operators/uri-p.htm"><b>uri-p</b></a> <p><b>Arguments: </b><i>object</i></p>
+ <p>Returns true if <i>object</i> is an instance of class <a href="classes/uri.htm"><code>uri</code></a>.
+ </p>
+ </li>
+ <li><a href="operators/copy-uri.htm"><b>copy-uri</b></a> <p><b>Arguments: </b><i>uri </i>&key
+ <i>place scheme host port path query fragment plist </i></p>
+ <p>Copies the specified URI object. See the description page for information on the
+ keyword arguments. </p>
+ </li>
+ <li><a href="operators/uri-scheme.htm"><b>uri-scheme</b></a><br>
+ <a href="operators/uri-host.htm"><b>uri-host</b></a><br>
+ <a href="operators/uri-port.htm"><b>uri-port</b></a><br>
+ <a href="operators/uri-path.htm"><b>uri-path</b></a><br>
+ <a href="operators/uri-query.htm"><b>uri-query</b></a><br>
+ <a href="operators/uri-fragment.htm"><b>uri-fragment</b></a><br>
+ <a href="operators/uri-plist.htm"><b>uri-plist</b></a><br>
+ <p><b>Arguments: </b><i>uri-object </i></p>
+ <p>These accessors return the value of the associated slots of the <i>uri-object</i> </p>
+ </li>
+ <li><a href="operators/uri-authority.htm"><b>uri-authority</b></a> <p><b>Arguments: </b><i>uri-object
+ </i></p>
+ <p>Returns the authority of <i>uri-object</i>. The authority combines the host and port. </p>
+ </li>
+ <li><a href="operators/render-uri.htm"><b>render-uri</b></a> <p><b>Arguments: </b><i>uri
+ stream </i></p>
+ <p>Print to <i>stream</i> the printed representation of <i>uri</i>. </p>
+ </li>
+ <li><a href="operators/parse-uri.htm"><b>parse-uri</b></a> <p><b>Arguments: </b><i>string </i>&key
+ (<i>class</i> 'uri)<i> </i></p>
+ <p>Parse <i>string</i> into a URI object. </p>
+ </li>
+ <li><a href="operators/merge-uris.htm"><b>merge-uris</b></a> <p><b>Arguments: </b><i>uri
+ base-uri </i>&optional <i>place </i></p>
+ <p>Return an absolute URI, based on <i>uri</i>, which can be relative, and <i>base-uri</i>
+ which must be absolute. </p>
+ </li>
+ <li><a href="operators/enough-uri.htm"><b>enough-uri</b></a> <p><b>Arguments: </b><i>uri
+ base </i></p>
+ <p>Converts <i>uri</i> into a relative URI using <i>base</i> as the base URI. </p>
+ </li>
+ <li><a href="operators/uri-parsed-path.htm"><b>uri-parsed-path</b></a> <p><b>Arguments: </b><i>uri
+ </i></p>
+ <p>Return the parsed representation of the path. </p>
+ </li>
+ <li><a href="operators/uri.htm"><b>uri</b></a> <p><b>Arguments: </b><i>object </i></p>
+ <p>Defined methods: if argument is a uri object, return it; create a uri object if
+ possible and return it, or error if not possible. </p>
+ </li>
+</ul>
+
+<hr>
+
+<hr>
+
+<h2><a name="parsing-decoding-1">3.0 Parsing, escape decoding/encoding and the path</a></h2>
+
+<p>The method <a href="operators/uri-path.htm"><b>uri-path</b></a> returns the path
+portion of the URI, in string form. The method <a href="operators/uri-parsed-path.htm"><b>uri-parsed-path</b></a>
+returns the path portion of the URI, in list form. This list form is discussed below,
+after a discussion of decoding/encoding. </p>
+
+<p>RFC2396 lays out a method for inserting into URIs <em>reserved characters</em>. You do
+this by escaping the character. An <em>escaped</em> character is defined like this: </p>
+
+<pre>
+escaped = "%" hex hex
+
+hex = digit | "A" | "B" | "C" | "D" | "E" | "F" | "a" | "b" | "c" | "d" | "e" | "f"
+</pre>
+
+<p>In addition, the RFC defines excluded characters: </p>
+
+<pre>
+"<" | ">" | "#" | "%" | <"> | "{" | "}" | "|" | "\" | "^" | "[" | "]" | "`"
+</pre>
+
+<p>The set of reserved characters are: </p>
+
+<pre>
+";" | "/" | "?" | ":" | "@" | "&" | "=" | "+" | "$" | ","
+</pre>
+
+<p>with the following exceptions:
+
+<ul>
+ <li>within the authority component, the characters ";", ":",
+ "@", "?", and "/" are reserved. </li>
+ <li>within a path segment, the characters "/", ";", "=", and
+ "?" are reserved. </li>
+ <li>within a query component, the characters ";", "/", "?",
+ ":", "@", "&", "=", "+",
+ ",", and "$" are reserved. </li>
+</ul>
+
+<p>From the RFC, there are two important rules about escaping and unescaping (encoding and
+decoding):
+
+<ul>
+ <li>decoding should only happen when the URI is parsed into component parts;</li>
+ <li>encoding can only occur when a URI is made from component parts (ie, rendered for
+ printing). </li>
+</ul>
+
+<p>The implication of this is that to decode the URI, it must be in a parsed state. That
+is, you can't convert <font face="Courier New">%2f</font> (the escaped form of
+"/") until the path has been parsed into its component parts. Another important
+desire is for the application viewing the component parts to see the decoded values of the
+components. For example, consider: </p>
+
+<pre>
+http://www.franz.com/calculator/3%2f2
+</pre>
+
+<p>This might be the implementation of a calculator, and how someone would execute 3/2.
+Clearly, the application that implements this would want to see path components of
+"calculator" and "3/2". "3%2f2" would not be useful to the
+calculator application. </p>
+
+<p>For the reasons given above, a parsed version of the path is available and has the
+following form: </p>
+
+<pre>
+([:absolute | :relative] component1 [component2...])
+</pre>
+
+<p>where components are: </p>
+
+<pre>
+element | (element param1 [param2 ...])
+</pre>
+
+<p>and <em>element</em> is a path element, and the param's are path element parameters.
+For example, the result of </p>
+
+<pre>
+(uri-parsed-path (parse-uri "foo;10/bar:x;y;z/baz.htm"))
+</pre>
+
+<p>is </p>
+
+<pre>
+(:relative ("foo" "10") ("bar:x" "y" "z") "baz.htm")
+</pre>
+
+<p>There is a certain amount of canonicalization that occurs when parsing:
+
+<ul>
+ <li>A path of <code>(:absolute)</code> or <code>(:absolute "")</code> is
+ equivalent to a <code>nil</code> path. That is, <code>http://a/</code> is parsed with a <code>nil</code>
+ path and printed as <code>http://a</code>. </li>
+ <li>Escaped characters that are not reserved are not escaped upon printing. For example, <code>"foob%61r"</code>
+ is parsed into <code>"foobar"</code> and appears as <code>"foobar"</code>
+ when the URI is printed. </li>
+</ul>
+
+<hr>
+
+<hr>
+
+<h2><a name="interning-uris-1">4.0 Interning URIs</a></h2>
+
+<p>This section describes how to intern URIs. Interning is not mandatory. URIs can be used
+perfectly well without interning them. </p>
+
+<p>Interned URIs in Allegro are like symbols. That is, a string representing a URI, when
+parsed and interned, will always yield an <strong>eq</strong> object. For example: </p>
+
+<pre>
+(eq (intern-uri "http://www.franz.com")
+ (intern-uri "http://www.franz.com"))
+</pre>
+
+<p>is always true. (Two strings with identical contents may or may not be <strong>eq</strong>
+in Common Lisp, note.) </p>
+
+<p>The functions associated with interning are:
+
+<ul>
+ <li><a href="operators/make-uri-space.htm"><b>make-uri-space</b></a> <p><b>Arguments: </b>&key
+ <i>size </i></p>
+ <p>Make a new hash-table object to contain interned URIs. </p>
+ </li>
+ <li><a href="operators/uri-space.htm"><b>uri-space</b></a> <p><b>Arguments: </b></p>
+ <p>Return the object into which URIs are currently being interned. </p>
+ </li>
+ <li><a href="operators/uri_eq.htm"><b>uri=</b></a> <p><b>Arguments: </b><i>uri1 uri2 </i></p>
+ <p>Returns true if <i>uri1</i> and <i>uri2</i> are equivalent. </p>
+ </li>
+ <li><a href="operators/intern-uri.htm"><b>intern-uri</b></a> <p><b>Arguments: </b><i>uri-name
+ </i>&optional <i>uri-space </i></p>
+ <p>Intern the uri object specified in the uri-space specified. Methods exist for strings
+ and uri objects. </p>
+ </li>
+ <li><a href="operators/unintern-uri.htm"><b>unintern-uri</b></a> <p><b>Arguments: </b><i>uri
+ </i>&optional <i>uri-space </i></p>
+ <p>Unintern the uri object specified or all uri objects (in <i>uri-space</i> if specified)
+ if <i>uri</i> is <code>t</code>. </p>
+ </li>
+ <li><a href="operators/do-all-uris.htm"><b>do-all-uris</b></a> <p><b>Arguments: </b><i>(var </i>&optional
+ <i>uri-space result) </i>&body <i>body </i></p>
+ <p>Bind <i>var</i> to all currently defined uris (in <i>uri-space</i> if specified) and
+ evaluate <i>body</i>. </p>
+ </li>
+</ul>
+
+<hr>
+
+<hr>
+
+<h2><a name="acl-implementation-1">5.0 Allegro CL implementation notes</a></h2>
+
+<ol>
+ <li>The following are true: <br>
+ <code>(uri= (parse-uri "http://www.franz.com/")</code> <br>
+ <code>(parse-uri "http://www.franz.com"))</code> <br>
+ <code>(eq (intern-uri "http://www.franz.com/")</code> <br>
+ <code>(intern-uri "http://www.franz.com"))</code><br>
+ </li>
+ <li>The following is true: <br>
+ <code>(eq (intern-uri "http://www.franz.com:80/foo/bar.htm")</code> <br>
+ <code>(intern-uri "http://www.franz.com/foo/bar.htm"))</code><br>
+ (I.e. specifying the default port is the same as specifying no port at all. This is
+ specific in RFC2396.) </li>
+ <li>The <em>scheme</em> and <em>authority</em> are case-insensitive. In Allegro CL, the
+ scheme is a keyword that appears in the normal case for the Lisp in which you are
+ executing. </li>
+ <li><code>#u"..."</code> is shorthand for <code>(parse-uri "...")</code>
+ but if an existing <code>#u</code> dispatch macro definition exists, it will not be
+ overridden. </li>
+ <li>The interaction between setting the scheme, host, port, path, query, and fragment slots
+ of URI objects, in conjunction with interning URIs will have very bad and unpredictable
+ results. </li>
+ <li>The printable representation of URIs is cached, for efficiency. This caching is undone
+ when the above slots are changed. That is, when you create a URI the printed
+ representation is cached. When you change one of the above mentioned slots, the printed
+ representation is cleared and calculated when the URI is next printed. For example: </li>
+</ol>
+
+<pre>
+user(10): (setq u #u"http://foo.bar.com/foo/bar")
+#<uri http://foo.bar.com/foo/bar>
+user(11): (setf (net.uri:uri-host u) "foo.com")
+"foo.com"
+user(12): u
+#<uri http://foo.com/foo/bar>
+user(13):
+</pre>
+
+<p>This allows URIs behavior to follow the principle of least surprise. </p>
+
+<hr>
+
+<hr>
+
+<h2><a name="examples-1">6.0 Examples</a></h2>
+
+<pre>
+uri(10): (use-package :net.uri)
+t
+uri(11): (parse-uri "foo")
+#<uri foo>
+uri(12): #u"foo"
+#<uri foo>
+uri(13): (setq base (intern-uri "http://www.franz.com/foo/bar/"))
+#<uri http://www.franz.com/foo/bar/>
+uri(14): (merge-uris (parse-uri "foo.htm") base)
+#<uri http://www.franz.com/foo/bar/foo.htm>
+uri(15): (merge-uris (parse-uri "?foo") base)
+#<uri http://www.franz.com/foo/bar/?foo>
+uri(16): (setq base (intern-uri "http://www.franz.com/foo/bar/baz.htm"))
+#<uri http://www.franz.com/foo/bar/baz.htm>
+uri(17): (merge-uris (parse-uri "foo.htm") base)
+#<uri http://www.franz.com/foo/bar/foo.htm>
+uri(18): (merge-uris #u"?foo" base)
+#<uri http://www.franz.com/foo/bar/?foo>
+uri(19): (describe #u"http://www.franz.com")
+#<uri http://www.franz.com> is an instance of #<standard-class net.uri:uri>:
+ The following slots have :instance allocation:
+ scheme :http
+ host "www.franz.com"
+ port nil
+ path nil
+ query nil
+ fragment nil
+ plist nil
+ escaped nil
+ string "http://www.franz.com"
+ parsed-path nil
+ hashcode nil
+uri(20): (describe #u"http://www.franz.com/")
+#<uri http://www.franz.com> is an instance of #<standard-class net.uri:uri>:
+ The following slots have :instance allocation:
+ scheme :http
+ host "www.franz.com"
+ port nil
+ path nil
+ query nil
+ fragment nil
+ plist nil
+ escaped nil
+ string "http://www.franz.com"
+ parsed-path nil
+ hashcode nil
+uri(21): #u"foobar#baz%23xxx"
+#<uri foobar#baz#xxx>
+</pre>
+
+<p><small>Copyright (c) 1998-2001, Franz Inc. Berkeley, CA., USA. All rights reserved.
+Created 2001.8.16.</small></p>
+</body>
+</html>
Added: branches/trunk-reorg/thirdparty/trivial-gray-streams-2006-09-16/COPYING
===================================================================
--- branches/trunk-reorg/thirdparty/trivial-gray-streams-2006-09-16/COPYING 2007-10-04 19:10:49 UTC (rev 2204)
+++ branches/trunk-reorg/thirdparty/trivial-gray-streams-2006-09-16/COPYING 2007-10-04 19:13:23 UTC (rev 2205)
@@ -0,0 +1,21 @@
+ Copyright (c) 2005 David Lichteblau
+
+ Permission is hereby granted, free of charge, to any person
+ obtaining a copy of this software and associated documentation files
+ (the "Software"), to deal in the Software without restriction,
+ including without limitation the rights to use, copy, modify, merge,
+ publish, distribute, sublicense, and/or sell copies of the Software,
+ and to permit persons to whom the Software is furnished to do so,
+ subject to the following conditions:
+
+ The above copyright notice and this permission notice shall be
+ included in all copies or substantial portions of the Software.
+
+ THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+ EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+ MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+ NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
+ BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
+ ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
+ CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
+ SOFTWARE.
Added: branches/trunk-reorg/thirdparty/trivial-gray-streams-2006-09-16/CVS/Entries
===================================================================
--- branches/trunk-reorg/thirdparty/trivial-gray-streams-2006-09-16/CVS/Entries 2007-10-04 19:10:49 UTC (rev 2204)
+++ branches/trunk-reorg/thirdparty/trivial-gray-streams-2006-09-16/CVS/Entries 2007-10-04 19:13:23 UTC (rev 2205)
@@ -0,0 +1,7 @@
+/COPYING/1.1/Sun Dec 4 23:41:05 2005//
+/Makefile/1.1.1.1/Wed Nov 9 22:11:00 2005//
+/README/1.3/Thu Sep 14 17:45:36 2006//
+/mixin.lisp/1.5/Thu Sep 14 17:45:36 2006//
+/package.lisp/1.4/Thu Sep 14 17:45:36 2006//
+/trivial-gray-streams.asd/1.1.1.1/Wed Nov 9 22:11:00 2005//
+D
Added: branches/trunk-reorg/thirdparty/trivial-gray-streams-2006-09-16/CVS/Repository
===================================================================
--- branches/trunk-reorg/thirdparty/trivial-gray-streams-2006-09-16/CVS/Repository 2007-10-04 19:10:49 UTC (rev 2204)
+++ branches/trunk-reorg/thirdparty/trivial-gray-streams-2006-09-16/CVS/Repository 2007-10-04 19:13:23 UTC (rev 2205)
@@ -0,0 +1 @@
+trivial-gray-streams
Added: branches/trunk-reorg/thirdparty/trivial-gray-streams-2006-09-16/CVS/Root
===================================================================
--- branches/trunk-reorg/thirdparty/trivial-gray-streams-2006-09-16/CVS/Root 2007-10-04 19:10:49 UTC (rev 2204)
+++ branches/trunk-reorg/thirdparty/trivial-gray-streams-2006-09-16/CVS/Root 2007-10-04 19:13:23 UTC (rev 2205)
@@ -0,0 +1 @@
+:ext:dlichteblau@common-lisp.net:/project/cl-plus-ssl/cvsroot
Added: branches/trunk-reorg/thirdparty/trivial-gray-streams-2006-09-16/Makefile
===================================================================
--- branches/trunk-reorg/thirdparty/trivial-gray-streams-2006-09-16/Makefile 2007-10-04 19:10:49 UTC (rev 2204)
+++ branches/trunk-reorg/thirdparty/trivial-gray-streams-2006-09-16/Makefile 2007-10-04 19:13:23 UTC (rev 2205)
@@ -0,0 +1,3 @@
+.PHONY: clean
+clean:
+ rm -f *.fasl *.x86f *.fas *.ufsl *.lib *.pfsl
Added: branches/trunk-reorg/thirdparty/trivial-gray-streams-2006-09-16/README
===================================================================
--- branches/trunk-reorg/thirdparty/trivial-gray-streams-2006-09-16/README 2007-10-04 19:10:49 UTC (rev 2204)
+++ branches/trunk-reorg/thirdparty/trivial-gray-streams-2006-09-16/README 2007-10-04 19:13:23 UTC (rev 2205)
@@ -0,0 +1,37 @@
+trivial-gray-streams
+====================
+
+This system provides an extremely thin compatibility layer for gray
+streams. It is nearly *too* trivial for a complete package, except that
+I have copy&pasted this code into enough projects now that I decided to
+factor it out once again now, and then *never* have to touch it again.
+
+
+How to use it
+=============
+
+1. Use the package TRIVIAL-GRAY-STREAMS instead of whatever
+ implementation-specific package you would have to use otherwise to
+ get at gray stream symbols.
+2. For STREAM-READ-SEQUENCE and STREAM-WRITE-SEQUENCE, notice that we
+ use two required arguments and allow additional keyword arguments.
+ So the lambda list when defining a method on either function should look
+ like this:
+ (stream sequence start end &key)
+3. In order for (2) to work on all Lisps, make sure to subclass all your
+ stream classes from TRIVIAL-GRAY-STREAM-MIXIN if you intend to define
+ methods on those two generic functions.
+
+
+Extensions
+==========
+
+Generic function STREAM-READ-SEQUENCE (stream sequence start end &key)
+Generic function STREAM-WRITE-SEQUENCE (stream sequence start end &key)
+
+ See above.
+
+Generic function STREAM-FILE-POSITION (stream) => file position
+Generic function (SETF STREAM-FILE-POSITION) (position-spec stream) => successp
+
+ Will only be called by LispWorks and CLISP.
Added: branches/trunk-reorg/thirdparty/trivial-gray-streams-2006-09-16/mixin.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/trivial-gray-streams-2006-09-16/mixin.lisp 2007-10-04 19:10:49 UTC (rev 2204)
+++ branches/trunk-reorg/thirdparty/trivial-gray-streams-2006-09-16/mixin.lisp 2007-10-04 19:13:23 UTC (rev 2205)
@@ -0,0 +1,117 @@
+(in-package :trivial-gray-streams)
+
+(defclass trivial-gray-stream-mixin () ())
+
+(defgeneric stream-read-sequence
+ (stream sequence start end &key &allow-other-keys))
+(defgeneric stream-write-sequence
+ (stream sequence start end &key &allow-other-keys))
+
+(defgeneric stream-file-position (stream))
+(defgeneric (setf stream-file-position) (newval stream))
+
+(defmethod stream-write-string
+ ((stream trivial-gray-stream-mixin) seq &optional start end)
+ (stream-write-sequence stream seq (or start 0) (or end (length seq))))
+
+;; Implementations should provide this default method, I believe, but
+;; at least sbcl and allegro don't.
+(defmethod stream-terpri ((stream trivial-gray-stream-mixin))
+ (write-char #\newline stream))
+
+(defmethod stream-file-position ((stream trivial-gray-stream-mixin))
+ nil)
+
+(defmethod (setf stream-file-position)
+ (newval (stream trivial-gray-stream-mixin))
+ (declare (ignore newval))
+ nil)
+
+#+allegro
+(progn
+ (defmethod excl:stream-read-sequence
+ ((s trivial-gray-stream-mixin) seq &optional start end)
+ (stream-read-sequence s seq (or start 0) (or end (length seq))))
+ (defmethod stream:stream-write-sequence
+ ((s trivial-gray-stream-mixin) seq &optional start end)
+ (stream-write-sequence s seq (or start 0) (or end (length seq)))))
+
+#+cmu
+(progn
+ (defmethod ext:stream-read-sequence
+ ((s trivial-gray-stream-mixin) seq &optional start end)
+ (stream-read-sequence s seq (or start 0) (or end (length seq))))
+ (defmethod ext:stream-write-sequence
+ ((s trivial-gray-stream-mixin) seq &optional start end)
+ (stream-write-sequence s seq (or start 0) (or end (length seq)))))
+
+#+lispworks
+(progn
+ (defmethod stream:stream-read-sequence
+ ((s trivial-gray-stream-mixin) seq start end)
+ (stream-read-sequence s seq start end))
+ (defmethod stream:stream-write-sequence
+ ((s trivial-gray-stream-mixin) seq start end)
+ (stream-write-sequence s seq start end))
+
+ (defmethod stream:stream-file-position ((stream trivial-gray-stream-mixin))
+ (stream-file-position stream))
+ (defmethod (setf stream:stream-file-position)
+ (newval (stream trivial-gray-stream-mixin))
+ (setf (stream-file-position stream) newval)))
+
+#+openmcl
+(progn
+ (defmethod ccl:stream-read-vector
+ ((s trivial-gray-stream-mixin) seq start end)
+ (stream-read-sequence s seq start end))
+ (defmethod ccl:stream-write-vector
+ ((s trivial-gray-stream-mixin) seq start end)
+ (stream-write-sequence s seq start end)))
+
+#+clisp
+(progn
+ (defmethod gray:stream-read-byte-sequence
+ ((s trivial-gray-stream-mixin)
+ seq
+ &optional start end no-hang interactive)
+ (when no-hang
+ (error "this stream does not support the NO-HANG argument"))
+ (when interactive
+ (error "this stream does not support the INTERACTIVE argument"))
+ (stream-read-sequence s seq start end))
+
+ (defmethod gray:stream-write-byte-sequence
+ ((s trivial-gray-stream-mixin)
+ seq
+ &optional start end no-hang interactive)
+ (when no-hang
+ (error "this stream does not support the NO-HANG argument"))
+ (when interactive
+ (error "this stream does not support the INTERACTIVE argument"))
+ (stream-write-sequence s seq start end))
+
+ (defmethod gray:stream-read-char-sequence
+ ((s trivial-gray-stream-mixin) seq &optional start end)
+ (stream-read-sequence s seq start end))
+
+ (defmethod gray:stream-write-char-sequence
+ ((s trivial-gray-stream-mixin) seq &optional start end)
+ (stream-write-sequence s seq start end))
+
+ (defmethod gray:stream-position ((stream trivial-gray-stream-mixin) position)
+ (if position
+ (setf (stream-file-position stream) position)
+ (stream-file-position stream))))
+
+#+sbcl
+(progn
+ (defmethod sb-gray:stream-read-sequence
+ ((s trivial-gray-stream-mixin) seq &optional start end)
+ (stream-read-sequence s seq (or start 0) (or end (length seq))))
+ (defmethod sb-gray:stream-write-sequence
+ ((s trivial-gray-stream-mixin) seq &optional start end)
+ (stream-write-sequence s seq (or start 0) (or end (length seq))))
+ ;; SBCL extension:
+ (defmethod sb-gray:stream-line-length ((stream trivial-gray-stream-mixin))
+ 80))
Added: branches/trunk-reorg/thirdparty/trivial-gray-streams-2006-09-16/package.lisp
===================================================================
--- branches/trunk-reorg/thirdparty/trivial-gray-streams-2006-09-16/package.lisp 2007-10-04 19:10:49 UTC (rev 2204)
+++ branches/trunk-reorg/thirdparty/trivial-gray-streams-2006-09-16/package.lisp 2007-10-04 19:13:23 UTC (rev 2205)
@@ -0,0 +1,44 @@
+(in-package :trivial-gray-streams-system)
+
+#+cmu
+(eval-when (:compile-toplevel :load-toplevel :execute)
+ (require :gray-streams))
+
+#+allegro
+(eval-when (:compile-toplevel :load-toplevel :execute)
+ (unless (fboundp 'stream:stream-write-string)
+ (require "streamc.fasl")))
+
+(macrolet
+ ((frob ()
+ (let
+ ((common-symbols
+ '(#:fundamental-stream #:fundamental-input-stream
+ #:fundamental-output-stream #:fundamental-character-stream
+ #:fundamental-binary-stream #:fundamental-character-input-stream
+ #:fundamental-character-output-stream
+ #:fundamental-binary-input-stream
+ #:fundamental-binary-output-stream #:stream-read-char
+ #:stream-unread-char #:stream-read-char-no-hang
+ #:stream-peek-char #:stream-listen #:stream-read-line
+ #:stream-clear-input #:stream-write-char #:stream-line-column
+ #:stream-start-line-p #:stream-write-string #:stream-terpri
+ #:stream-fresh-line #:stream-finish-output #:stream-force-output
+ #:stream-clear-output #:stream-advance-to-column
+ #:stream-read-byte #:stream-write-byte)))
+ `(defpackage :trivial-gray-streams
+ (:use :cl)
+ (:import-from #+sbcl :sb-gray
+ #+allegro :excl
+ #+cmu :ext
+ #+clisp :gray
+ #+openmcl :ccl
+ #+lispworks :stream
+ #-(or sbcl allegro cmu clisp openmcl lispworks) ...
+ ,@common-symbols)
+ (:export #:trivial-gray-stream-mixin
+ #:stream-read-sequence
+ #:stream-write-sequence
+ #:stream-file-position
+ ,@common-symbols)))))
+ (frob))
Added: branches/trunk-reorg/thirdparty/trivial-gray-streams-2006-09-16/trivial-gray-streams.asd
===================================================================
--- branches/trunk-reorg/thirdparty/trivial-gray-streams-2006-09-16/trivial-gray-streams.asd 2007-10-04 19:10:49 UTC (rev 2204)
+++ branches/trunk-reorg/thirdparty/trivial-gray-streams-2006-09-16/trivial-gray-streams.asd 2007-10-04 19:13:23 UTC (rev 2205)
@@ -0,0 +1,9 @@
+;;; -*- mode: lisp -*-
+
+(defpackage :trivial-gray-streams-system
+(:use :cl :asdf))
+(in-package :trivial-gray-streams-system)
+
+(defsystem :trivial-gray-streams
+ :serial t
+ :components ((:file "package") (:file "mixin")))
1
0
[bknr-cvs] r2204 - in branches/trunk-reorg/thirdparty: . portableaserve/libs
by bknr＠bknr.net 04 Oct '07
by bknr＠bknr.net 04 Oct '07
04 Oct '07
Author: hhubner
Date: 2007-10-04 15:10:49 -0400 (Thu, 04 Oct 2007)
New Revision: 2204
Removed:
branches/trunk-reorg/thirdparty/portableaserve/libs/cl-ppcre/
branches/trunk-reorg/thirdparty/portableaserve/libs/puri-1.3.1/
branches/trunk-reorg/thirdparty/trivial-gray-streams-2006-09-16/
Log:
updating
1
0