;;; -*- Mode:Lisp; Readtable:ZL; Package:USER; Base:8; Patch-File:T -*-
;;; Patch file for System version 124.32
;;; Reason:
;;;  Put (ZWEI:CLEAR-ALL-HISTORIES) onto :gc-system-release initialization list.
;;; Written 7-Jun-88 13:27:40 by pld (Peter L. DeWolf) at site Gigamos Cambridge
;;; while running on Azathoth from band 1
;;; with Experimental System 124.25, Experimental Local-File 74.1, Experimental File-Server 23.1, Experimental Unix-Interface 12.0, Experimental ZMail 72.1, Experimental Tape 23.6, Experimental Lambda-Diag 16.1, microcode 1756, SDU Boot Tape 3.14, SDU ROM 8, the old ones.



; From modified file DJ: L.ZWEI; HISTORY.LISP#20 at 7-Jun-88 13:27:41
#8R ZWEI#: 
(COMPILER-LET ((*PACKAGE* (PKG-FIND-PACKAGE "ZWEI")))
  (COMPILER::PATCH-SOURCE-FILE "SYS: ZWEI; HISTORY  "

(ADD-INITIALIZATION "Clear History Lists" '(CLEAR-ALL-HISTORIES) '(:gc-system-release))

))