LCOMS needing to be recompiled for \CHECKEOLC macro and Create STREAM

(plus a new (unchanged) version of IOCHAR needed to get the cleanup to work for the recompile)

sources/IOCHAR

@@ -1,15 +1,13 @@
 (DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10)
 
-
(FILECREATED "11-Sep-2022 20:07:43" {DSK}<home>larry>medley>sources>IOCHAR.;2
 100127 
+
(FILECREATED "17-Dec-2024 20:36:26" {WMEDLEY}<sources>IOCHAR.;45
 99915  
 
-      :CHANGES-TO (VARS IOCHARCOMS)
+      :EDIT-BY rmk
 
-      :PREVIOUS-DATE "24-Jul-2022 14:56:20" {DSK}<home>larry>medley>sources>IOCHAR.;1)
+      :CHANGES-TO (FNS \SLOWFILEPOS)
 
+      :PREVIOUS-DATE "11-Sep-2022 20:07:43" {WMEDLEY}<sources>IOCHAR.;44)
 
-(* ; "
-Copyright (c) 1981-1988, 1990-1991, 2018, 2020 by Venue & Xerox Corporation.
-")
 
 (PRETTYCOMPRINT IOCHARCOMS)
 
@@ -1567,18 +1565,16 @@ DONTCOPY
 
 (ADDTOVAR LAMA
 PACK* CONCAT)
 )
-(PUTPROPS IOCHAR COPYRIGHT ("Venue & Xerox Corporation" 1981 1982 1983 1984 1985 1986 1987 1988 1990 
-1991 2018 2020))
 (DECLARE%: DONTCOPY
-  (FILEMAP (NIL (3456 7250 (CHCON 3466 . 4316) (UNPACK 4318 . 5212) (DCHCON 5214 . 6481) (DUNPACK 6483
- . 7248)) (7251 18766 (UALPHORDER 7261 . 7357) (ALPHORDER 7359 . 9162) (CONCAT 9164 . 9809) (
-CONCATCODES 9811 . 9997) (PACKC 9999 . 12602) (PACK 12604 . 13183) (PACK* 13185 . 14907) (\PACK.ITEM 
-14909 . 15364) (STRPOS 15366 . 18764)) (18768 19057 (XCL:PACK 18768 . 19057)) (19059 19309 (XCL:PACK* 
-19059 . 19309)) (20016 22407 (STRPOSL 20026 . 21652) (MAKEBITTABLE 21654 . 22405)) (22569 23046 (
-CASEARRAY 22579 . 22769) (UPPERCASEARRAY 22771 . 23044)) (23368 56745 (FILEPOS 23378 . 32619) (
-FFILEPOS 32621 . 44842) (\SETUP.FFILEPOS 44844 . 48627) (\SLOWFILEPOS 48629 . 56743)) (57533 98780 (
-DATE 57543 . 57629) (DATEFORMAT 57631 . 57723) (GDATE 57725 . 57836) (IDATE 57838 . 69509) (
-\IDATESCANTOKEN 69511 . 70790) (\IDATE-PARSE-MONTH 70792 . 74488) (\OUTDATE 74490 . 87238) (
-\OUTDATE-STRING 87240 . 87855) (\RPLRIGHT 87857 . 88095) (\UNPACKDATE 88097 . 93888) (\PACKDATE 93890
- . 97210) (\DTSCAN 97212 . 97354) (\ISDST? 97356 . 97863) (\CHECKDSTCHANGE 97865 . 98778)))))
+  (FILEMAP (NIL (3363 7157 (CHCON 3373 . 4223) (UNPACK 4225 . 5119) (DCHCON 5121 . 6388) (DUNPACK 6390
+ . 7155)) (7158 18673 (UALPHORDER 7168 . 7264) (ALPHORDER 7266 . 9069) (CONCAT 9071 . 9716) (
+CONCATCODES 9718 . 9904) (PACKC 9906 . 12509) (PACK 12511 . 13090) (PACK* 13092 . 14814) (\PACK.ITEM 
+14816 . 15271) (STRPOS 15273 . 18671)) (18675 18964 (XCL:PACK 18675 . 18964)) (18966 19216 (XCL:PACK* 
+18966 . 19216)) (19923 22314 (STRPOSL 19933 . 21559) (MAKEBITTABLE 21561 . 22312)) (22476 22953 (
+CASEARRAY 22486 . 22676) (UPPERCASEARRAY 22678 . 22951)) (23275 56652 (FILEPOS 23285 . 32526) (
+FFILEPOS 32528 . 44749) (\SETUP.FFILEPOS 44751 . 48534) (\SLOWFILEPOS 48536 . 56650)) (57440 98687 (
+DATE 57450 . 57536) (DATEFORMAT 57538 . 57630) (GDATE 57632 . 57743) (IDATE 57745 . 69416) (
+\IDATESCANTOKEN 69418 . 70697) (\IDATE-PARSE-MONTH 70699 . 74395) (\OUTDATE 74397 . 87145) (
+\OUTDATE-STRING 87147 . 87762) (\RPLRIGHT 87764 . 88002) (\UNPACKDATE 88004 . 93795) (\PACKDATE 93797
+ . 97117) (\DTSCAN 97119 . 97261) (\ISDST? 97263 . 97770) (\CHECKDSTCHANGE 97772 . 98685)))))
 STOP