Changeset 10777


Ignore:
Timestamp:
Sep 16, 2008, 11:47:06 PM (11 years ago)
Author:
rme
Message:

Out-of-line %scharcode: character codes aren't 8 bits long any more.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/level-0/l0-array.lisp

    r10153 r10777  
    646646      (locally
    647647        (declare (optimize (speed 3) (safety 0)))
    648         (aref (the (simple-array (unsigned-byte 8) (*)) s) i))
     648        (aref (the (simple-array (unsigned-byte 32) (*)) s) i))
    649649        (report-bad-arg s 'simple-string))))
    650650
Note: See TracChangeset for help on using the changeset viewer.