use FAST-READ-BYTE in LOAD-S-INTEGER