;;; -*- Mode: Common-Lisp; Package:User; Base:10.; Patch-File:T -*-
;;; Patch directory for REL6H version 6
;;; Written 05/19/89 13:56:24 by GRAY,
;;; while running on Kelvin from band LOD2
;;; With Experimental REL6H 6.17, SYSTEM 6.0, Experimental VIRTUAL-MEMORY 6.0, Experimental EH 6.0,
;;;  Experimental MAKE-SYSTEM 6.0, Experimental MICRONET 6.0, Experimental LOCAL-FILE 6.0,
;;;  Experimental BASIC-PATHNAME 6.0, Experimental NETWORK-SUPPORT-COLD 6.0, Experimental BASIC-NAMESPACE 6.0,
;;;  Experimental NETWORK-NAMESPACE 6.0, Experimental DISK-IO 6.0, Experimental DISK-LABEL 6.0,
;;;  Experimental BASIC-FILE 6.0, Experimental MAC-PATHNAME 6.0, Experimental NETWORK-PATHNAME 6.0,
;;;  COMPILER 6.0, Experimental TV 6.0, Experimental DATALINK 6.0, Experimental CHAOSNET 6.0,
;;;  Experimental GC 6.0, Experimental MEMORY-AUX 6.0, Experimental NVRAM 6.0, Experimental SYSLOG 6.0,
;;;  Experimental STREAMER-TAPE 6.0, Experimental CLEH 1.0, Experimental UCL 6.0,
;;;  Experimental INPUT-EDITOR 6.0, Experimental METER 6.0, Experimental ZWEI 6.0,
;;;  Experimental DEBUG-TOOLS 6.0, Experimental NETWORK-SUPPORT 6.0, Experimental NETWORK-SERVICE 6.0,
;;;  DATALINK-DISPLAYS 6.0, Experimental FONT-EDITOR 6.0, Experimental SERIAL 6.0,
;;;  Experimental PRINTER 6.0, Experimental MAC-PRINTER-TYPES 6.0, Experimental PRINTER-TYPES 6.0,
;;;  Experimental IMAGEN 6.0, Experimental SUGGESTIONS 6.0, Experimental MAIL-DAEMON 6.0,
;;;  Experimental MAIL-READER 6.0, Experimental TELNET 6.0, Experimental VT100 6.0,
;;;  Experimental NAMESPACE-EDITOR 6.0, Experimental PROFILE 6.0, VISIDOC 6.0, Experimental TI-CLOS 17.6,
;;;  Experimental CLX 5.0, Experimental CLUE 20.0, Experimental X11M 3.0, Experimental RPC 6.0,
;;;  Experimental NFS 6.0, Experimental BUG 11.4, IP 3.45, Experimental DOCUMENTER 618.0,
;;;   microcode 426, Band Name: Rel6H,Scribe,&c, u426 5/4

(:PATCH-SYSTEM-NAME "REL6H" :MAJOR-VERSION 6 :LATEST-MINOR-VERSION 18)

(:EXPERIMENTAL
((0 "REL6H Loaded" "BUILD" NIL)
  (1 "fix common-lisp package" "SWEDE" NIL)
  (2 "Fix default who line PLANE MASK and DISPLAY-TYPE" "swede" NIL)
  (3 "Change CLOS version from 16.7 to 17.1." "GRAY" NIL)
  (4 "Fix bug in compilation of GENERIC-FLET, GENERIC-LABELS, etc.
Suppress compiler warning about undefined function when it is defined as a 
DEFCLASS accessor." "GRAY" NIL)
  (5 "Forward the value-cell of PACKAGE READTABLE APPLYHOOK EVALHOOK to equivalent Common-Lisp variables. 
Remove the SPECIAL property of above symbols.
This allows old ZETALISP xlds to run, and keeps CommonLisp usage intact." "SWEDE" NIL)
  (6 "Fix GLOBAL package" "SWEDE" NIL)
  (7 "Add DBG command to ZLC and ZL (for ACUFF and Symbolics compatability)" "SWEDE" NIL)
  (8 "Fixes for LCM [SPR 7112], (:PROPERTY COMPLEX TYPE-VALIDATOR) [SPR 8985], 
WHO-CALLS [SPR 8961], SPECIAL-FORM-P [SPR 6922], 
and INTERNAL-FUNCTION-SPEC-HANDLER [SPR 8669].
Update WHO-CALLS to recognize SETF and LOCF functions.
New functions for ANSI Common Lisp:   COMPLEMENT, CONSTANTLY, and  
UPGRADED-ARRAY-ELEMENT-TYPE; new types BASE-CHARACTER and BASE-STRING." "GRAY" NIL)
  (9 "Compiler update:
* Fixed SLOT-VALUE optimization to handle a THE form as the object argument.
* Added optimizations for COMPLEMENT and CONSTANTLY.
* Warn about use of undefined SETF functions.
* When (> (- SAFETY (MAX SPEED SPACE)) 1), generate run-time code to check 
  bindings and assignments to make sure the value is consistent with any type 
  declarations.
* Use the microcoded version of &KEY argument decoding.
* Other assorted minor fixes and optimizations." "GRAY" NIL)
  (10 "Remove old definition of PROFILE and set MADE-P on PROFILE system to be t." "swede" NIL)
  (11 "Faster UNION with :TEST #'EQ.  Export MEMQ from SYS.
Update INSTANTIATE-FLAVOR to permit instantation-flavor-function to return an actual instance." "GRAY" NIL)
  (12 "Update compiler to enable value propagation for variables initialized by SETQ." "GRAY" NIL)
  (13 "Export MAKE-PIXEL-ARRAY, PIXEL-ARRAY-WIDTH, and PIXEL-ARRAY-HEIGHT from the 
TICL package. [SPR 4675 and 5653]" "GRAY" NIL)
  (14 "Update the compiler to accept DEFAULT-TYPE declarations used by TICLOS:PARSE-METHOD." "GRAY" NIL)
  (15 "A couple more minor compiler fixes." "GRAY" NIL)
  (16 "Fix compiler bug in propagation of SETQ values to not propagate values set in 
the body of an UNWIND-PROTECT, CATCH, or BLOCK, since they could be exited 
prematurely." "GRAY" NIL)
  (17 "Fix compiler bookkeeping bug on SETQ in a TAGBODY in a DEFMETHOD [problem 
introduced by patch 6.12]." "GRAY" NIL)
  (18 "Fix compiler for recording of compile-time definition of DEFWRAPPER and other 
macros whose name is a list." "GRAY" NIL)
  ))