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

library/DOSPRINT

@@ -1,24 +1,45 @@
-(DEFINE-FILE-INFO READTABLE "XCL" PACKAGE "INTERLISP")
-
(FILECREATED "20-Nov-95 11:34:56" {DSK}<MEDLEY>LIBRARY/DOSPRINT.\;1
 2006   
-
-      |changes| |to:|  (VARS DOSPRINTCOMS)
-
-      |previous| |date:| "26-Jul-93 14:01:26" {DSK}<MEDLEY>LIBRARY/DOSPRINT.\;1)
-
-
-; Copyright (c) 1995 by Xerox Corporation.  All rights reserved.
-
-(PRETTYCOMPRINT DOSPRINTCOMS)
-
-(RPAQQ DOSPRINTCOMS
 ((FNS DOSPRINT)
-                         (INITVARS (|DosPrinterName| NIL))
-                         (DECLARE\: EVAL@COMPILE DONTCOPY (GLOBALVARS |DosPrinterName|))
-                         (DECLARE\: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDVARS
-                                                                                        (NLAMA)
-                                                                                        (NLAML)
-                                                                                        (LAMA)))))
-(DEFINEQ
-
+(DEFINE-FILE-INFO READTABLE "XCL" PACKAGE "INTERLISP")
+
+
(FILECREATED "20-Nov-95 11:34:56" {DSK}<MEDLEY>LIBRARY/DOSPRINT.\;1
 2006   
+
+
+
+      |changes| |to:|  (VARS DOSPRINTCOMS)
+
+
+
+      |previous| |date:| "26-Jul-93 14:01:26" {DSK}<MEDLEY>LIBRARY/DOSPRINT.\;1)
+
+
+
+
+
+; Copyright (c) 1995 by Xerox Corporation.  All rights reserved.
+
+
+
+(PRETTYCOMPRINT DOSPRINTCOMS)
+
+
+
+(RPAQQ DOSPRINTCOMS
 ((FNS DOSPRINT)
+
+                         (INITVARS (|DosPrinterName| NIL))
+
+                         (DECLARE\: EVAL@COMPILE DONTCOPY (GLOBALVARS |DosPrinterName|))
+
+                         (DECLARE\: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDVARS
+
+                                                                                        (NLAMA)
+
+                                                                                        (NLAML)
+
+                                                                                        (LAMA)))))
+
+(DEFINEQ
+
+
+
 (DOSPRINT

   (LAMBDA (HOST FILE PRINTOPTIONS)
                       (* \; "Edited 26-Jul-93 13:48 by ")

     (LET* ((PRINTER (OR HOST |DosPrinterName|))
@@ -29,25 +50,47 @@
                  (CL:WITH-OPEN-STREAM (|in|
 (OPENSTREAM FILE 'INPUT))
                         (CL:FORMAT PROMPTWINDOW "Spooling output to DOS printer \"~A\"..." PRINTER)
                         (COPYCHARS |in| |out|)
-                        (CL:FORMAT PROMPTWINDOW "Done."))))))
-)
-
-(RPAQ? |DosPrinterName|
 NIL)
-(DECLARE\: EVAL@COMPILE DONTCOPY 
-(DECLARE\: DOEVAL@COMPILE DONTCOPY
-
-(GLOBALVARS |DosPrinterName|)
-)
-)
-(DECLARE\: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS 
-
-(ADDTOVAR NLAMA
 )
-
-(ADDTOVAR NLAML
 )
-
-(ADDTOVAR LAMA
 )
-)
-(PUTPROPS DOSPRINT COPYRIGHT ("Xerox Corporation" 1995))
-(DECLARE\: DONTCOPY
-  (FILEMAP (NIL (958 1636 (DOSPRINT 970 . 1633)))))
-STOP
+                        (CL:FORMAT PROMPTWINDOW "Done."))))))
+
+)
+
+
+
+(RPAQ? |DosPrinterName|
 NIL)
+
+(DECLARE\: EVAL@COMPILE DONTCOPY 
+
+(DECLARE\: DOEVAL@COMPILE DONTCOPY
+
+
+
+(GLOBALVARS |DosPrinterName|)
+
+)
+
+)
+
+(DECLARE\: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS 
+
+
+
+(ADDTOVAR NLAMA
 )
+
+
+
+(ADDTOVAR NLAML
 )
+
+
+
+(ADDTOVAR LAMA
 )
+
+)
+
+(PUTPROPS DOSPRINT COPYRIGHT ("Xerox Corporation" 1995))
+
+(DECLARE\: DONTCOPY
+
+  (FILEMAP (NIL (958 1636 (DOSPRINT 970 . 1633)))))
+
+STOP
+