(FILECREATED " 6-Nov-87 16:59:54" {QV}<NOTECARDS>1.3KNEXT>RHTPATCH295.;2
 826    

      changes to:  (VARS RHTPATCH295COMS)

      previous date: " 6-Nov-87 16:53:51" {QV}<NOTECARDS>1.3KNEXT>RHTPATCH295.;1)


(* Copyright (c) 1987 by Xerox Corporation. All rights reserved.)

(PRETTYCOMPRINT RHTPATCH295COMS)

(RPAQQ RHTPATCH295COMS
 ((* * Just grabbed HPRINTSP and recompiled so that won't turn up undefined 
			     under calls to HPRINT1.)
			  (* * Addition to KOTOSYSTEMPATCHES)
			  (FNS HPRINTSP)))
(* * Just grabbed HPRINTSP and recompiled so that won't turn up undefined under calls to 
HPRINT1.)


(* * Addition to KOTOSYSTEMPATCHES)


(DEFINEQ

(HPRINTSP

  (LAMBDA (X)
    (
HPRINT1
 X)
    (
PRIN1
 " ")))
)
(PUTPROPS RHTPATCH295 COPYRIGHT ("Xerox Corporation" 1987))
(DECLARE: DONTCOPY
  (FILEMAP (NIL (663 744 (HPRINTSP 673 . 742)))))
STOP