;;; -*- Mode:LISP; Package:USER; Base:10; Readtable:Common-Lisp; Patch-File:T -*-
;;; Patch directory for System version 130
;;; Written 22-Nov-88 19:00:09 by smh (Steve Haflich) at site Gigamos Cambridge
;;; while running on Alex from band 1
;;; with Experimental System 130.9, Experimental ZWEI 128.7, Experimental ZMail 75.0, Experimental Local-File 77.0, Experimental File-Server 26.0, Experimental Unix-Interface 16.0, Experimental Tape 27.0, Experimental Lambda-Diag 19.0, Microcode 1762, SDU Boot Tape 3.14, SDU ROM 102, 11/18 Falcon System Loaded.

(:EXPERIMENTAL
 ((0 "System Loaded" "keith" NIL 2804112244)
  (1 "Once again, import some SI symbols into GC.  This has been necessary the
last 3 times after a cold load.  I think I fixed the source, with
Steve's help, in a way that will work from now on..." "keith" NIL 2804274101)
  (2 "GC:STATUS now reports (SI:ESTIMATED-DUMP-SIZE).

Some things that were printed on *error-output* are now done with WARN.

Also doc-string improvements." "keith" NIL 2804276887)
  (3 "Fix package whoops which caused COMPILER:DUMP-FORMS-TO-FILE to shadow GLOBAL symbol.
This also defines the GLOBAL function.  If this works, the next patch I do will
redefine all the callers of COMPILER:DUMP-FORMS-TO-FILE." "keith" NIL 2804530072)
  (4 "Redefine two callers to ZL:DUMP-FORMS-TO-FILE after package lossage." "keith" NIL 2804531815)
  (5 "New defsystem keyword: :CTS-CONTROLLED
Declaring this will make ZWEI remind you to add CTS comments
when you edit files in that system." "smh" NIL 2804799194)
  (6 "Pretty-printing of arrays was very badly broken, causing infinite loop
within GRIND-PRINT-IO.  Now we just PRIN1 or PRINC as appropriate.
Someday someone should figure this one out and really fix it.

   -keith+smh" "keith" NIL 2804807276)
  (7 "Avoid strange array subscript error that occurs printing messed-up array.
It's possible to create an array for which some element(s) can not be
accessed.  (Hint: use ADJUST-ARRAY.) With *PRINT-ARRAY* and
*PRINT-CIRCLE* non-NIL, this caused a subscript error when the
circularity-detector tripped on an un-accessible element.  The message was truly obscure.
You will still get the error, but during the process of printing.
The array code should be fixed to avoid the screw cases!" "keith" NIL 2804871328)
  (8 "Avoid error in COMPILER:P1 doing CAR on atom.  For example, compiling
(COND (FLAG)), form gets transformed into just FLAG.  Just avoid further
processing that assumed form was still a cons." "keith" NIL 2805141197)
  (9 "Optimize (COERCE x 'RATIONAL) into (RATIONAL X).  This also avoids
foolish compiler warnings compiling such forms.  Note that calls in the
form (COERCE X '(RATIONAL ...)) are not optimized." "keith" NIL 2805146142)
  (10 "When recording source file names, don't query about redefinitions
between two files with same generic name, e.g. \"FOO.LISP\" and
\"FOO.FDEF\".  (Eliminates warnings while loading Falcon FDEF files.)" "keith" NIL 2805233382)
  (11 NIL "smh" NIL 2805235208)
  ))