anchor.diff:  (define-unibyte-decoder :iso-8859-5 (octet)
     (if (< octet #xa0)
         octet
  -      (svref +iso-8859-5-to-unicode+ (the fixnum (- octet #xa0)))))
  +      (svref +iso-8859-5-to-unicode+ (the ub8 (- octet #xa0)))))
   
   (define-character-encoding :iso-8859-6
       "An 8-bit, fixed-width character encoding in which codes #x00-#x9f
  
positive.code: (define-unibyte-decoder :iso-8859-4 (octet)
    (if (< octet #xa0)
        octet
        (svref +iso-8859-4-to-unicode+ (the fixnum (- octet #xa0)))))
  
  (define-character-encoding :iso-8859-5
      "An 8-bit, fixed-width character encoding in which codes
  
negative.code: (define-unibyte-decoder :iso-8859-3 (octet)
    (if (< octet #xa0)
        octet
        (svref +iso-8859-3-to-unicode+ (the ub8 (- octet #xa0)))))
  
  (define-character-encoding :iso-8859-4
      "An 8-bit, fixed-width character encoding in which codes
  