anchor.diff:  ;;;           Arnaud Rouanet (rouanet@emi.u-bordeaux.fr)
   ;;;           Lionel Salabartan (salabart@emi.u-bordeaux.fr)
   ;;;  (c) copyright 2001, 2002 by Alexey Dejneka (adejneka@comail.ru)
  +;;;  (c) copyright 2003 by Gilbert Baumann <unk6@rz.uni-karlsruhe.de>
   
   ;;; This library is free software; you can redistribute it and/or
   ;;; modify it under the terms of the GNU Library General Public
  
positive.code: 					  (handle-repaint s region))
  				      sheet
  				      region))
  
negative.code:             (when errorp
                (error "~S is not contained in ~S." record stream)))))))
  
  ;;; 16.4.3. Text Output Recording
  (defmethod stream-text-output-record
      ((stream standard-output-recording-stream) text-style)
  