Changeset 7306


Ignore:
Timestamp:
Sep 26, 2007, 6:44:09 PM (14 years ago)
Author:
palter
Message:

Fix vector-decode-function for :US-ASCII encoding

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/ccl/level-1/l1-unicode.lisp

    r6945 r7306  
    318318         (when (>= code 128)
    319319           (setq code (char-code #\Sub)))
    320          (setf (schar string i) code)))))
     320         (setf (schar string i) (code-char code))))))
    321321  :memory-encode-function
    322322  (nfunction
Note: See TracChangeset for help on using the changeset viewer.