Changeset 5318

Timestamp:

Oct 8, 2006, 7:27:18 PM (18 years ago)

Author:

Gary Byers

Message:

Add character names for #\Line_Separator, #\Paragraph_separator.

File:

• trunk/ccl/level-1/l1-reader.lisp (modified) (2 diffs)

trunk/ccl/level-1/l1-reader.lisp

@@ -1810 +1810 @@
                 ("Nko_Comma" . #\u+07f8)
                 ("Nko_Exclamation_Mark" . #\u+07f9)
-                ("Nko_Lajanyalan" . #\u+07fa)))
+                ("Nko_Lajanyalan" . #\u+07fa)
+                ("Line_Separator" . #\u+2028)
+                ("Paragraph_Separator" . #\u+2029)
+                ))
   (destructuring-bind (name . char) pair
     (register-character-name name char)))
@@ -1828 +1831 @@
 ;;;  those octal digits is interpreted as per the U+ case above.
 ;;;Otherwise return NIL.
+
 
 (defun name-char (name)