Fixing CHARACTERNAMES

sources/FILESETS

@@ -1,12 +1,12 @@
 (DEFINE-FILE-INFO :PACKAGE "INTERLISP" :READTABLE "INTERLISP" :BASE 10)
 
-
(FILECREATED "16-Apr-2026 09:01:52" {WMEDLEY}<sources>FILESETS.;34
 6272   
+
(FILECREATED "17-Apr-2026 13:42:24" {WMEDLEY}<sources>FILESETS.;35
 6272   
 
       :EDIT-BY rmk
 
-      :CHANGES-TO (VARS 1LISPSET)
+      :CHANGES-TO (VARS 0LISPSET)
 
-      :PREVIOUS-DATE " 9-Mar-2026 12:36:02" {WMEDLEY}<sources>FILESETS.;33)
+      :PREVIOUS-DATE "16-Apr-2026 09:01:52" {WMEDLEY}<sources>FILESETS.;34)
 
 
 (PRETTYCOMPRINT FILESETSCOMS)
@@ -50,7 +50,7 @@
 
 (RPAQQ 0LISPSET
 (PACKAGE-CONVERSION-TABLE LLFAULT LLSUBRS LLBFS LLNEW FILEIO LLARRAYELT 
                        EXTERNALFORMAT IOCHAR UNICODE-FORMATS IMAGEIO LLBASIC LLGC LLINTERP LLMVS 
-                       DEFSTRUCT-RUN-TIME SETF-RUNTIME CMLSEQBASICS LLARITH LLFLOAT LLBIGNUM LLREAD 
+                       DEFSTRUCT-RUN-TIME SETF-RUNTIME CMLSEQBASICS LLARITH LLFLOAT LLREAD LLBIGNUM 
                        MCCS LLCHAR LLSTK LLDATATYPE LLKEY LLTIMER))
 
 (RPAQQ 1LISPSET

sources/LLREAD

@@ -1,12 +1,12 @@
 (DEFINE-FILE-INFO :PACKAGE "INTERLISP" :READTABLE "INTERLISP" :BASE 10)
 
-
(FILECREATED "17-Apr-2026 00:48:15" {WMEDLEY}<sources>LLREAD.;125
 99837  
+
(FILECREATED "17-Apr-2026 13:52:16" {WMEDLEY}<sources>LLREAD.;126
 99879  
 
       :EDIT-BY rmk
 
       :CHANGES-TO (VARS LLREADCOMS)
 
-      :PREVIOUS-DATE "20-Sep-2025 14:18:31" {WMEDLEY}<sources>LLREAD.;123)
+      :PREVIOUS-DATE "17-Apr-2026 00:48:15" {WMEDLEY}<sources>LLREAD.;125)
 
 
 (PRETTYCOMPRINT LLREADCOMS)
@@ -41,7 +41,7 @@
                              Four Five Six Seven Eight Nine INFINITY EMQUAD ENQUAD THINSPACE 
                              HAIRSPACE FIGURESPACE LEFT-DOUBLEQUOTE RIGHT-DOUBLEQUOTE EMDASH Union 
                              Intersection And Or Contourintegral Integral Summation Product Radical 
-                             All Exists Member INFINITY)
+                             All Exists Member INFINITY Notmember)
                      (CHARACTERSETNAMES Meta Function Greek Cyrillic Hira Hiragana Kata Katakana 
                             Kanji)))
         (DECLARE%: DOEVAL@COMPILE DONTCOPY (CONSTANTS * READTYPES)
@@ -1741,7 +1741,8 @@
           (All "357,265")
           (Exists "357,264")
           (Member "357,112")
-          (INFINITY "41,147"))
+          (INFINITY "41,147")
+          (Notmember "357,113"))
 
 (ADDTOVAR CHARACTERSETNAMES
 (Meta 1)
                             (Function 2)
@@ -1855,19 +1856,19 @@
 (ADDTOVAR LAMA
 CL:PARSE-INTEGER CL:READ-DELIMITED-LIST CL:READ-PRESERVING-WHITESPACE CL:READ)
 )
 (DECLARE%: DONTCOPY
-  (FILEMAP (NIL (3963 12407 (LASTC 3973 . 4279) (PEEKC 4281 . 4669) (PEEKCCODE 4671 . 5082) (RATOM 5084
- . 6165) (READ 6167 . 6727) (READC 6729 . 7370) (READCCODE 7372 . 8131) (READP 8133 . 8685) (
-SETREADMACROFLG 8687 . 8986) (SKIPSEPRCODES 8988 . 10068) (SKIPSEPRS 10070 . 10456) (SKREAD 10458 . 
-12405)) (12453 21062 (CL:READ 12463 . 13012) (CL:READ-PRESERVING-WHITESPACE 13014 . 13736) (
-CL:READ-DELIMITED-LIST 13738 . 14653) (CL:PARSE-INTEGER 14655 . 21060)) (21155 33632 (RSTRING 21165 . 
-21897) (READ-EXTENDED-TOKEN 21899 . 25771) (\RSTRING2 25773 . 33630)) (33668 64401 (\TOP-LEVEL-READ 
-33678 . 35661) (\SUBREAD 35663 . 60817) (\SUBREADCONCAT 60819 . 61442) (\ORIG-READ.SYMBOL 61444 . 
-62512) (\ORIG-INVALID.SYMBOL 62514 . 63413) (\APPLYREADMACRO 63415 . 63831) (INREADMACROP 63833 . 
-64399)) (64560 64735 (READQUOTE 64570 . 64733)) (64760 76664 (READVBAR 64770 . 66101) (READHASHMACRO 
-66103 . 71913) (DEFMACRO-LAMBDA-LIST-KEYWORD-P 71915 . 72135) (DIGITBASEP 72137 . 72871) (
-READNUMBERINBASE 72873 . 74759) (ESTIMATE-DIMENSIONALITY 74761 . 75086) (SKIP.HASH.COMMENT 75088 . 
-76056) (CMLREAD.FEATURE.PARSER 76058 . 76662)) (76708 77974 (CHARACTER.READ 76718 . 77972)) (78007 
-89925 (CHARCODE.DECODE 78017 . 83186) (CHARCODE.ENCODE 83188 . 87630) (CHARCODEP 87632 . 88161) (
-CHARSET.DECODE 88163 . 89111) (CHARSET.ENCODE 89113 . 89923)) (89926 94422 (HEXNUM? 89936 . 92279) (
-OCTALNUM? 92281 . 93094) (HEXSTRING 93096 . 94420)))))
+  (FILEMAP (NIL (3973 12417 (LASTC 3983 . 4289) (PEEKC 4291 . 4679) (PEEKCCODE 4681 . 5092) (RATOM 5094
+ . 6175) (READ 6177 . 6737) (READC 6739 . 7380) (READCCODE 7382 . 8141) (READP 8143 . 8695) (
+SETREADMACROFLG 8697 . 8996) (SKIPSEPRCODES 8998 . 10078) (SKIPSEPRS 10080 . 10466) (SKREAD 10468 . 
+12415)) (12463 21072 (CL:READ 12473 . 13022) (CL:READ-PRESERVING-WHITESPACE 13024 . 13746) (
+CL:READ-DELIMITED-LIST 13748 . 14663) (CL:PARSE-INTEGER 14665 . 21070)) (21165 33642 (RSTRING 21175 . 
+21907) (READ-EXTENDED-TOKEN 21909 . 25781) (\RSTRING2 25783 . 33640)) (33678 64411 (\TOP-LEVEL-READ 
+33688 . 35671) (\SUBREAD 35673 . 60827) (\SUBREADCONCAT 60829 . 61452) (\ORIG-READ.SYMBOL 61454 . 
+62522) (\ORIG-INVALID.SYMBOL 62524 . 63423) (\APPLYREADMACRO 63425 . 63841) (INREADMACROP 63843 . 
+64409)) (64570 64745 (READQUOTE 64580 . 64743)) (64770 76674 (READVBAR 64780 . 66111) (READHASHMACRO 
+66113 . 71923) (DEFMACRO-LAMBDA-LIST-KEYWORD-P 71925 . 72145) (DIGITBASEP 72147 . 72881) (
+READNUMBERINBASE 72883 . 74769) (ESTIMATE-DIMENSIONALITY 74771 . 75096) (SKIP.HASH.COMMENT 75098 . 
+76066) (CMLREAD.FEATURE.PARSER 76068 . 76672)) (76718 77984 (CHARACTER.READ 76728 . 77982)) (78017 
+89935 (CHARCODE.DECODE 78027 . 83196) (CHARCODE.ENCODE 83198 . 87640) (CHARCODEP 87642 . 88171) (
+CHARSET.DECODE 88173 . 89121) (CHARSET.ENCODE 89123 . 89933)) (89936 94432 (HEXNUM? 89946 . 92289) (
+OCTALNUM? 92291 . 93104) (HEXSTRING 93106 . 94430)))))
 STOP