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/NOTECARDS-4045XLPPATCH

@@ -1 +1,47 @@
-
(FILECREATED "15-Dec-86 16:30:35" {DANTE}<SNOW>4045>V1.4>NOTECARDS-4045XLPPATCH.;2
 1578   
+
(FILECREATED "15-Dec-86 16:30:35" {DANTE}<SNOW>4045>V1.4>NOTECARDS-4045XLPPATCH.;2
 1578   
+
+      changes to:  (FNS 4045XLP.NoteCardsAdvice)
+
+      previous date: "26-Sep-86 14:20:43" {DANTE}<SNOW>4045>V1.4>NOTECARDS-4045XLPPATCH.;1)
+
+
+(* Copyright (c) 1986 by Xerox Corporation and Will Snow. All rights reserved.)
+
+(PRETTYCOMPRINT NOTECARDS-4045XLPPATCHCOMS)
+
+(RPAQQ NOTECARDS-4045XLPPATCHCOMS
 ((FNS 4045XLP.NoteCardsAdvice)
+				     (P (4045XLP.NoteCardsAdvice))))
+(DEFINEQ
+
+(4045XLP.NoteCardsAdvice

+  [LAMBDA NIL                                                (* edited: "15-Dec-86 16:29")

+    [
ADVISE
 (
QUOTE
 NC.LinkIconDisplayFn)
+	      (
QUOTE
 BEFORE)
+	      NIL
+	      (
QUOTE
 (
COND
 ((
OR
 (
NULL
 STREAMTYPE)
+				      (
EQ
 STREAMTYPE (
QUOTE
 4045XLP)))
+				 (
SETQ
 STREAMTYPE (
QUOTE
 DISPLAY]
+    (
ADVISE
 (
QUOTE
 (
STRINGWIDTH
 IN NC.LinkIconImageBoxFn))
+	      (
QUOTE
 AFTER)
+	      NIL
+	      (
QUOTE
 (
AND
 (
EQ
 (
IMAGESTREAMTYPE
 ImageStream)
+				    (
QUOTE
 4045XLP))
+			      (
RETURN
 (
IQUOTIENT
 (
STRINGWIDTH
 (
CONCAT
 "nn"
+									      (if
 Label
+										  then

+										   (
CONCAT
 "<" 
+											    Label ">")
+										else
 "")
+									      (if
 (
AND
 Label 
+											   Title)
+										  then
 " "
+										else
 "")
+									      (
OR
 Title ""))
+								    ImageStream)
+						     Scale])
+)
+(4045XLP.NoteCardsAdvice)
+(PUTPROPS NOTECARDS-4045XLPPATCH COPYRIGHT ("Xerox Corporation and Will Snow" 1986))
+(DECLARE: DONTCOPY
+  (FILEMAP (NIL (478 1445 (4045XLP.NoteCardsAdvice 488 . 1443)))))
+STOP