;;; -*- Mode:LISP; Package:USER; Base:10; Readtable:Common-Lisp; Patch-File:T -*-
;;; Patch directory for System version 122
;;; Written 30-Jul-87 11:04:14 by pld (Peter L. DeWolf) at site LMI Cambridge
;;; while running on Azathoth from band 4
;;; with Experimental System 122.9, Experimental Local-File 73.0, Experimental FILE-Server 22.0, Experimental Unix-Interface 11.0, Experimental Tape 17.1, Experimental Tiger 26.0, Experimental KERMIT 33.1, Experimental ZMail 71.0, Experimental Lambda-Diag 15.0, Experimental Site Data Editor 5.0, microcode 1754, SDU Boot Tape 3.12, SDU ROM 102, the old ones.

(:EXPERIMENTAL
 ((0 "System Loaded" "robert" NIL)
  (1 "si:array-displaced-p, si:array-indirect-p, si:array-indirect-to
did interesting things when applied to non-arrays.
Easy enough for them to verify their argument is an array.
Similar fixes to si:array-indexed-p, si:array-index-offset" "pld" NIL)
  (2 "Enable **MORE** processing." "pld" NIL)
  (3 "Add ALTERNATE-MACRO-DEFINITIONS for
FUNCALL-WITH-MAPPING-TABLE
FUNCALL-WITH-MAPPING-TABLE-INTERNAL
LEXPR-FUNCALL-WITH-MAPPING-TABLE
LEXPR-FUNCALL-WITH-MAPPING-TABLE-INTERNAL" "jrm" NIL)
  (4 "Fix to FORMAT ~\\time\\" "robert" NIL)
  (5 "Conditionalize for arrays with fill-pointers in SUBSTITUTE, DELETE, etc." "robert" NIL)
  (6 "Fix erroneous reporting of name conflict when export finds
a shadowing symbol." "jrm" NIL)
  (7 "Take the control panel (gauges) into account when doing screen dump with Terminal-Q" "pld" NIL)
  (8 "Load ISPELL dictionary (I don't know why it isn't loaded)" "jrm" NIL)
  (9 "ADDED DOSEQUENCE MACRO -GJC" "khh" NIL)
  (10 "If Peek window is deexposed for a long time, when you reexpose it, it won't
update the display -- frozen in the past!" "pld" NIL)
  ))