Changeset 11192


Ignore:
Timestamp:
Oct 21, 2008, 11:55:22 PM (11 years ago)
Author:
gb
Message:

fix more typos ...

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/level-1/x86-callback-support.lisp

    r11187 r11192  
    4747          (%get-unsigned-byte p 2) (ldb (byte 8 8) index)
    4848          (%get-unsigned-byte p 3) (ldb (byte 8 16) index)
    49           (%get-unsigned-byte p 4) (ldb (byte 8 24) (ash discard-stack (- x8632::word-shift)))
     49          (%get-unsigned-byte p 4) (ldb (byte 8 24) (ash (or discard-stack-bytes 0) (- x8632::word-shift)))
    5050          (%get-unsigned-byte p 5) #xff  ; jmp *
    5151          (%get-unsigned-byte p 6) #x24
Note: See TracChangeset for help on using the changeset viewer.