;;; -*- Mode:Lisp; Readtable:ZL; Package:USER; Base:10; Patch-File:T -*-
;;; Patch file for System version 126.5
;;; Reason:
;;;  PROCLAIM-UNSPECIAL was completely brain damaged.  Apparently
;;;  it had never been exercised.  Now it and (PROCLAIM '(UNSPECIAL FOO))
;;;  both work.
;;; Written 29-Jul-88 18:07:38 by smh (Steve Haflich) at site Gigamos Cambridge
;;; while running on Harpo from band 1
;;; with ZWEI 125.6, ZMail 73.0, Local-File 75.1, File-Server 24.0, Unix-Interface 13.0, Tape 24.2, Lambda-Diag 17.0, Experimental System 126.3, microcode 1761, SDU Boot Tape 3.12, SDU ROM 102, 126.2 + k-sys.



; From modified file DJ: L.SYS; EVAL.LISP#189 at 29-Jul-88 18:07:43
#10R SYSTEM-INTERNALS#: 
(COMPILER-LET ((*PACKAGE* (PKG-FIND-PACKAGE "SYSTEM-INTERNALS")))
  (COMPILER::PATCH-SOURCE-FILE "SYS: SYS; EVAL  "

(defun proclaim-unspecial (symbol)
  (remprop symbol 'special))

))