All source files converted to LF (#315)

* All source files converted to LF

Also, HPRINT:  EQUALALL knows about CL arrays
FILEIO:  STREAM record with fields for external format functions

* Delete makeinit.dribble

* Converted CR to LF on internal/library and docs/Documentation Tools

lispusers/CHATSERVER-TCP

@@ -1 +1,54 @@
-(DEFINE-FILE-INFO READTABLE "INTERLISP" PACKAGE "INTERLISP")
+(DEFINE-FILE-INFO READTABLE "INTERLISP" PACKAGE "INTERLISP")
+
(FILECREATED " 7-Sep-88 17:13:08" {ERINYES}<LISPUSERS>MEDLEY>CHATSERVER-TCP.;2
 1699   
+
+      changes to%:  (VARS CHATSERVER-TCPCOMS)
+                    (FNS TCP.CHAT.LISTENER))
+
+
+(* "
+Copyright (c) 1988 by Xerox Corporation.  All rights reserved.
+")
+
+(PRETTYCOMPRINT CHATSERVER-TCPCOMS)
+
+(RPAQQ CHATSERVER-TCPCOMS
 ((FNS TCP.CHAT.LISTENER TCPCHATSERVER)
+                               (FILES TCP CHATSERVER)))
+(DEFINEQ
+
+(TCP.CHAT.LISTENER

+  [LAMBDA (PORT)
                                      (* ; "Edited  2-Sep-88 23:09 by masinter")

+    (LET* [(INSTREAM (TCP.OPEN NIL NIL (OR PORT \TCP.TELNET.PORT)
+                            'PASSIVE
+                            'INPUT T))
+           (OUTSTREAM (AND INSTREAM (TCP.OTHER.STREAM INSTREAM]
+
+          (* ;; "ok, I'm the server")

+
+          (PROCESS.NAME (THIS.PROCESS)
+                 'CHATSERVER)
+          (PROCESSPROP (THIS.PROCESS)
+                 'RESTARTABLE NIL)
+
+          (* ;; "spawn another listener")

+
+          (ADD.PROCESS (LIST (FUNCTION TCP.CHAT.LISTENER)
+                             (KWOTE PORT))
+                 'RESTARTABLE
+                 'HARDRESET)
+          (PROCESSPROP (THIS.PROCESS)
+                 'RESTARTABLE NIL)
+          (CHATSERVEROPENFN INSTREAM OUTSTREAM])
+
+(TCPCHATSERVER

+  [LAMBDA NIL
                                            (* ejs%: "26-Mar-86 16:47")

+    (DEL.PROCESS 'TCP.CHAT.LISTENER)
+    (ADD.PROCESS '(TCP.CHAT.LISTENER
)
+           'RESTARTABLE
+           'HARDRESET])
+)
+
+(FILESLOAD TCP CHATSERVER)
+(PUTPROPS CHATSERVER-TCP COPYRIGHT ("Xerox Corporation" 1988))
+(DECLARE%: DONTCOPY
+  (FILEMAP (NIL (484 1585 (TCP.CHAT.LISTENER 494 . 1343) (TCPCHATSERVER 1345 . 1583)))))
+STOP