(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10 FORMAT XCCS) (FILECREATED " 8-Aug-2021 13:22:32" ("compiled on " {DSK}kaplan>Local>medley3.5>git-medley>lispusers>ISO8859IO.;18) " 8-Aug-2021 09:53:29" brecompiled changes%: \8859OUTCHARFN \IBMOUTCHARFN \MACOUTCHARFN in "FULL 8-Aug-2021 ..." dated " 8-Aug-2021 09:53:35") (FILECREATED " 8-Aug-2021 13:22:31" {DSK}kaplan>Local>medley3.5>git-medley>lispusers>ISO8859IO.;18 22218 changes to%: (FNS \8859OUTCHARFN \IBMOUTCHARFN \MACOUTCHARFN) previous date%: " 6-Aug-2021 16:12:42" {DSK}kaplan>Local>medley3.5>git-medley>lispusers>ISO8859IO.;17) \8859OUTCHARFN :D8 (I 1 CHARCODE I 0 STREAM) 1Al @j@ @k@@Adl` (46 \BOUT 41 \RECODECCODE 14 \BOUTEOL) (36 *XEROXTOISO8859MAP*) () \8859INCCODEFN :D8 (I 1 COUNTP I 0 STRM F 0 *BYTECOUNTER*) Akc@ ` (17 \RECODECCODE) (12 *ISO8859TOXEROXMAP*) () \8859PEEKCCODEFN :D8 (I 1 NOERROR I 0 STRM) @A ` (16 \RECODECCODE 6 \PEEKCCODE) (11 *ISO8859TOXEROXMAP*) () MAKEISOFORMAT :D8 (P 0 XEROXTOISO) BoH Hi ggggg (63 MAKE-EXTERNALFORMAT 26 \MAKERECODEMAP 13 \MAKERECODEMAP) (57 \8859OUTCHARFN 52 \COMMONBACKCCODEFN 47 \8859PEEKCCODEFN 42 \8859INCCODEFN 37 :ISO8859/1 31 *ISO8859TOXEROXMAP* 18 *XEROXTOISO8859MAP*) ( 4 ((61217 160) (61291 166) (8994 168) (211 169) (227 170) (61290 172) (61219 173) (210 174) (9086 175) (8999 180) (203 184) (209 185) (235 186) (61729 192) (61730 193) (61731 194) (61732 195) (61735 196) (61736 197) (225 198) (61741 199) (61744 200) (61745 201) (61746 202) (61749 203) (61758 204) (61759 205) (61760 206) (61764 207) (226 208) (61772 209) (61775 210) (61776 211) (61777 212) (61778 213) (61780 214) (180 215) (233 216) (61791 217) (61792 218) (61793 219) (61797 220) (61803 221) (236 222) (251 223) (61857 224) (61858 225) (61859 226) (61860 227) (61863 228) (61864 229) (241 230) (61869 231) (61872 232) (61873 233) (61874 234) (61877 235) (61886 236) (61887 237) (61888 238) (61892 239) (243 240) (61900 241) (61903 242) (61904 243) (61905 244) (61906 245) (61908 246) (184 247) (249 248) (61919 249) (61920 250) (61921 251) (61925 252) (61931 253) (252 254) (61933 255) (61805 376))) \IBMOUTCHARFN :D8 (I 1 CHARCODE I 0 STREAM) 1Al @j@ @k@@Adl` (46 \BOUT 41 \RECODECCODE 14 \BOUTEOL) (36 *XEROXTOIBMMAP*) () \IBMINCCODEFN :D8 (I 1 COUNTP I 0 STRM F 0 *BYTECOUNTER*) Akc@ ` (17 \RECODECCODE) (12 *IBMTOXEROXMAP*) () \IBMPEEKCCODEFN :D8 (I 1 NOERROR I 0 STRM) @A ` (16 \RECODECCODE 6 \PEEKCCODE) (11 *IBMTOXEROXMAP*) () MAKEIBMFORMAT :D8 (P 0 XEROXTOIBM) @oH Hi ggggg (61 MAKE-EXTERNALFORMAT 25 \MAKERECODEMAP 13 \MAKERECODEMAP) (55 \IBMOUTCHARFN 50 \COMMONBACKCCODEFN 45 \IBMPEEKCCODEFN 40 \IBMINCCODEFN 35 :IBM 30 *IBMTOXEROXMAP* 18 *XEROXTOIBMMAP*) ( 4 ((61217 255) (61291 166) (8994 168) (211 169) (227 166) (61290 170) (61219 173) (210 174) (9086 175) (8999 180) (203 184) (235 167) (61729 183) (61730 181) (61731 182) (61732 199) (61735 142) (61736 143) (225 146) (61741 128) (61744 212) (61745 144) (61746 210) (61749 211) (61758 222) (61759 214) (61760 215) (61764 216) (61772 165) (61775 227) (61776 224) (61777 226) (61778 229) (61780 153) (233 157) (61791 235) (61792 233) (61793 234) (61797 154) (61803 194) (251 225) (61857 133) (61858 160) (61859 131) (61860 198) (61863 132) (61864 134) (241 145) (61869 135) (61872 138) (61873 130) (61874 136) (61877 137) (61886 141) (61887 161) (61888 140) (61892 139) (61900 164) (61903 149) (61904 162) (61905 147) (61906 228) (61908 148) (249 155) (61919 151) (61920 163) (61921 150) (61925 129) (61931 194) (61933 152) (61805 376) (161 173) (162 155) (163 156) (165 157) (167 21) (171 174) (176 248) (177 241) (178 253) (181 230) (182 20) (183 250) (187 175) (188 172) (189 171) (191 168))) \MACOUTCHARFN :D8 (I 1 CHARCODE I 0 STREAM) 1Al @j@ @k@@Adl` (46 \BOUT 41 \RECODECCODE 14 \BOUTEOL) (36 *XEROXTOMACMAP*) () \MACINCCODEFN :D8 (I 2 BYTECOUNTVAL I 1 BYTECOUNTVAR I 0 STRM) AABk @ ` (23 \RECODECCODE 10 SET) (18 *MACTOXEROXMAP*) () \MACPEEKCCODEFN :D8 (I 1 NOERROR I 0 STRM) @A ` (16 \RECODECCODE 6 \PEEKCCODE) (11 *MACTOXEROXMAP*) () MAKEMACFORMAT :D8 (P 0 XEROXTOMAC) @oH Hi ggggg (61 MAKE-EXTERNALFORMAT 25 \MAKERECODEMAP 13 \MAKERECODEMAP) (55 \MACOUTCHARFN 50 \COMMONBACKCCODEFN 45 \MACPEEKCCODEFN 40 \MACINCCODEFN 35 :MACINTOSH 30 *MACTOXEROXMAP* 18 *XEROXTOMACMAP*) ( 4 ((211 212) (227 187) (61290 194) (210 168) (203 252) (209 213) (235 188) (61729 203) (61730 231) (61731 171) (61732 204) (61735 128) (61736 129) (225 174) (61741 130) (61744 172) (61745 131) (61746 230) (61749 232) (61758 237) (61759 234) (61760 235) (61764 236) (61772 132) (61775 241) (61776 238) (61777 170) (61778 205) (61780 133) (233 175) (61791 244) (61792 242) (61793 243) (61797 134) (61803 194 89) (251 167) (61857 136) (61858 135) (61859 137) (61860 139) (61863 138) (61864 140) (241 190) (61869 141) (61872 143) (61873 142) (61874 144) (61877 145) (61886 147) (61887 146) (61888 148) (61892 149) (61900 150) (61903 152) (61904 151) (61905 153) (61906 155) (61908 154) (184 214) (249 191) (61919 157) (61920 156) (61921 158) (61925 159) (61931 194 121) (61933 216) (61805 217) (61232 160) (176 161) (167 164) (61286 165) (182 166) (8546 173) (8551 176) (8549 178) (8550 179) (165 180) (61370 182) (61306 183) (61307 184) (9843 185) (61301 186) (191 192) (161 193) (61308 195) (61346 196) (61305 197) (9797 198) (171 199) (187 200) (8516 201) (32 202) (61220 208) (61221 209) (8574 215) (47 218) (164 219) (61226 220) (61227 221) (61476 222) (61477 223) (61233 224) (183 225) (9138 226) (61224 227) (61249 228))) \COMMONBACKCCODEFN :D8 (I 1 COUNTP I 0 STRM F 0 *BYTECOUNTER*) @ Amci(5 \BACKFILEPTR) NIL () \MAKERECODEMAP :D8 (P 12 A0034 P 11 A0035 P 10 A0033 P 9 A0031 P 8 A0032 P 7 A0030 P 6 CSMAP P 5 M P 4 MAPARRAY I 1 INVERTED I 0 CODEMAP) A'@@d[KhIHhZH&Jb@ngh "KL]MCLM^%ngh L! M_N_OON! Ml_M_OOK[(94 CL:MAKE-ARRAY 54 CL:MAKE-ARRAY) (88 :INITIAL-ELEMENT 48 :INITIAL-ELEMENT) () \RECODECCODE :D8 (P 0 CSMAP I 1 MAPARRAY I 0 CODE) A@HH@l嶵@NIL NIL () (PRETTYCOMPRINT ISO8859IOCOMS) (RPAQQ ISO8859IOCOMS ((* ;; "This package defines EXTERNALFORMATS for files that are encoded in either ISO8859/1, the standard IBM extended ascii, or the usual MAC encoding." ) (COMS (* ; "ISO8859/1") (FNS \8859OUTCHARFN \8859INCCODEFN \8859PEEKCCODEFN) (GLOBALVARS *XEROXTOISO8859MAP* *ISO8859TOXEROXMAP*) (FNS MAKEISOFORMAT) (P (MAKEISOFORMAT))) (COMS (* ; "IBM-PC Extended Ascii") (FNS \IBMOUTCHARFN \IBMINCCODEFN \IBMPEEKCCODEFN) (GLOBALVARS *XEROXTOIBMMAP* *IBMTOXEROXMAP*) (FNS MAKEIBMFORMAT) (P (MAKEIBMFORMAT))) (COMS (* ; "Macintosh") (FNS \MACOUTCHARFN \MACINCCODEFN \MACPEEKCCODEFN) (GLOBALVARS *XEROXTOMACMAP* *MACTOXEROXMAP*) (FNS MAKEMACFORMAT) (P ( MAKEMACFORMAT))) (COMS (* ; "Independent of char encoding") (FNS \COMMONBACKCCODEFN \MAKERECODEMAP \RECODECCODE)))) (MAKEISOFORMAT) (MAKEIBMFORMAT) (MAKEMACFORMAT) (PUTPROPS ISO8859IO COPYRIGHT ("Xerox Corporation" 1995 1996 1997 1999 2021)) NIL