Changeset 14006


Ignore:
Timestamp:
Jul 21, 2010, 10:37:10 AM (9 years ago)
Author:
gb
Message:

%FIXNUM-REF-NATURAL doesn't need a 0-valued offset arg.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/arm/level-1/arm-threads-utils.lisp

    r13968 r14006  
    3333  (and (typep x 'fixnum)
    3434       (evenp x)
    35        (eql (%fixnum-ref-natural x 0)
     35       (eql (%fixnum-ref-natural x)
    3636            (logior (ash (ash (- arm::fake-stack-frame.size arm::node-size)
    3737                              (- arm::word-shift))
Note: See TracChangeset for help on using the changeset viewer.