;;; -*- Mode:Lisp; Readtable:ZL; Package:USER; Base:8; Patch-File:T -*-
;;; Patch file for System version 124.91
;;; Reason:
;;;  SIgh.  Create ARRAY: package so that QCOPT, with its K-only modifications,
;;;  loads successfully.  Completely meaningless to the Lambda...
;;; Written 23-Jun-88 11:32:35 by pld (Peter L. DeWolf) at site Gigamos Cambridge
;;; while running on Cthulhu from band 1
;;; with Experimental System 124.90, Experimental Local-File 74.2, Experimental File-Server 23.1, Experimental Unix-Interface 12.0, Experimental ZMail 72.1, Experimental Tape 23.6, Experimental Lambda-Diag 16.2, microcode 1760, SDU Boot Tape 3.14, SDU ROM 8, the old ones.


(unless (find-package "ARRAY")
  (make-package "ARRAY" :size 10.))