anchor.diff:              ((< code #x180)
                (svref +unicode-a0-180-to-iso-8859-4+
                       (the fixnum (- code #xa0))))
  -            ((and (>= code #x2c0) (< code #x2e0))
  +            ((<= #x2c0 code #x2df)
                (svref +unicode-2c0-2e0-to-iso-8859-4+
                       (the fixnum (- code #x2c0)))))
         (handle-error)))
  
positive.code:             ((< code #xb0)
               (svref +unicode-a0-b0-to-iso-8859-5+
                      (the fixnum (- code #xa0))))
              ((and (>= code #x400) (< code #x460))
               (svref +unicode-400-460-to-iso-8859-5+
                      (the fixnum (- code #x400))))
              ;; the Numero sign
  
negative.code:       nil #xac #xbc #xaf #xbf #xae #xbe nil) ; #x178-#x17f
    :test #'equalp)
  
  (define-constant +unicode-02c0-02e0-to-iso-8859-2+
      #(nil nil nil nil nil nil nil #xb7  ; #x2c0-#x2c7
        nil nil nil nil nil nil nil nil   ; #x2c8-#x2cf
        nil nil nil nil nil nil nil nil   ; #x2d0-#x2d7
        #xa2 #xff nil #xb2 nil #xbd nil nil) ; #x2d8-#x2df
    :test #'equalp)
  
  (define-unibyte-encoder :iso-8859-2 (code)
  