Changeset 13935 for branches


Ignore:
Timestamp:
Jul 7, 2010, 12:44:07 PM (14 years ago)
Author:
R. Matthew Emerson
Message:

New TCR flag bit TCR_FLAG_BIT_FOREIGN_FPE. Move definitions
of TCR flags bits to x86-constants.s.

Location:
branches/rme-fpe/lisp-kernel
Files:
3 edited

Legend:

Unmodified
Added
Removed

  • branches/rme-fpe/lisp-kernel/x86-constants.s

    r13337 r13935  
    136136mxcsr_pe_bit = 5
    137137num_mxcsr_exception_bits = 6
    138        
     138
    139139mxcsr_all_exceptions = ((1<<num_mxcsr_exception_bits)-1)
    140        
     140
     141TCR_FLAG_BIT_FOREIGN = fixnum_shift
     142TCR_FLAG_BIT_AWAITING_PRESET = (fixnum_shift+1)
     143TCR_FLAG_BIT_ALT_SUSPEND = (fixnumshift+2)
     144TCR_FLAG_BIT_PROPAGATE_EXCEPTION = (fixnumshift+3)
     145TCR_FLAG_BIT_SUSPEND_ACK_PENDING = (fixnumshift+4)
     146TCR_FLAG_BIT_PENDING_EXCEPTION = (fixnumshift+5)
     147TCR_FLAG_BIT_FOREIGN_EXCEPTION = (fixnumshift+6)
     148TCR_FLAG_BIT_PENDING_SUSPEND = (fixnumshift+7)       
     149TCR_FLAG_BIT_FOREIGN_FPE = (fixnumshift+8)       

  • branches/rme-fpe/lisp-kernel/x86-constants32.s

    r13406 r13935  
    602602         _ends
    603603       
    604 TCR_FLAG_BIT_FOREIGN = fixnum_shift
    605 TCR_FLAG_BIT_AWAITING_PRESET = (fixnum_shift+1)
    606 TCR_FLAG_BIT_ALT_SUSPEND = (fixnumshift+2)
    607 TCR_FLAG_BIT_PROPAGATE_EXCEPTION = (fixnumshift+3)
    608 TCR_FLAG_BIT_SUSPEND_ACK_PENDING = (fixnumshift+4)
    609 TCR_FLAG_BIT_PENDING_EXCEPTION = (fixnumshift+5)
    610 TCR_FLAG_BIT_FOREIGN_EXCEPTION = (fixnumshift+6)
    611 TCR_FLAG_BIT_PENDING_SUSPEND = (fixnumshift+7)
    612 
    613604target_most_positive_fixnum = 536870911
    614605target_most_negative_fixnum = -536870912

  • branches/rme-fpe/lisp-kernel/x86-constants64.s

    r13406 r13935  
    10261026
    10271027       
    1028 TCR_FLAG_BIT_FOREIGN = fixnum_shift
    1029 TCR_FLAG_BIT_AWAITING_PRESET = (fixnum_shift+1)
    1030 TCR_FLAG_BIT_ALT_SUSPEND = (fixnumshift+2)
    1031 TCR_FLAG_BIT_PROPAGATE_EXCEPTION = (fixnumshift+3)
    1032 TCR_FLAG_BIT_SUSPEND_ACK_PENDING = (fixnumshift+4)
    1033 TCR_FLAG_BIT_PENDING_EXCEPTION = (fixnumshift+5)
    1034 TCR_FLAG_BIT_FOREIGN_EXCEPTION = (fixnumshift+6)
    1035 TCR_FLAG_BIT_PENDING_SUSPEND = (fixnumshift+7)       
    1036        
    10371028target_most_positive_fixnum = 1152921504606846975
    10381029target_most_negative_fixnum = -1152921504606846976
Note: See TracChangeset for help on using the changeset viewer.