Changeset 15134


Ignore:
Timestamp:
Dec 13, 2011, 5:23:33 PM (8 years ago)
Author:
gb
Message:

REQUIRE-S8 was shifting in the right direction (for once), but
by the wrong amount.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/compiler/ARM/arm-vinsns.lisp

    r15120 r15134  
    10181018                              ((tag :u32)))
    10191019  (mov tag (:lsl object (:$ (- arm::nbits-in-word (+ 8 arm::fixnumshift)))))
    1020   (mov tag (:asr tag (:$ (- arm::nbits-in-word (+ 8 arm::fixnumshift)))))
     1020  (mov tag (:asr tag (:$ (- arm::nbits-in-word 8))))
    10211021  (cmp object (:lsl tag (:$ arm::fixnumshift)))
    10221022  (beq :ok)
Note: See TracChangeset for help on using the changeset viewer.