Index: /branches/rme-fpe/lisp-kernel/x86-constants.s
===================================================================
--- /branches/rme-fpe/lisp-kernel/x86-constants.s	(revision 13934)
+++ /branches/rme-fpe/lisp-kernel/x86-constants.s	(revision 13935)
@@ -136,5 +136,14 @@
 mxcsr_pe_bit = 5
 num_mxcsr_exception_bits = 6
-        
+
 mxcsr_all_exceptions = ((1<<num_mxcsr_exception_bits)-1)
-        
+
+TCR_FLAG_BIT_FOREIGN = fixnum_shift
+TCR_FLAG_BIT_AWAITING_PRESET = (fixnum_shift+1)	
+TCR_FLAG_BIT_ALT_SUSPEND = (fixnumshift+2)
+TCR_FLAG_BIT_PROPAGATE_EXCEPTION = (fixnumshift+3)
+TCR_FLAG_BIT_SUSPEND_ACK_PENDING = (fixnumshift+4)
+TCR_FLAG_BIT_PENDING_EXCEPTION = (fixnumshift+5)
+TCR_FLAG_BIT_FOREIGN_EXCEPTION = (fixnumshift+6)
+TCR_FLAG_BIT_PENDING_SUSPEND = (fixnumshift+7)        
+TCR_FLAG_BIT_FOREIGN_FPE = (fixnumshift+8)        
Index: /branches/rme-fpe/lisp-kernel/x86-constants32.s
===================================================================
--- /branches/rme-fpe/lisp-kernel/x86-constants32.s	(revision 13934)
+++ /branches/rme-fpe/lisp-kernel/x86-constants32.s	(revision 13935)
@@ -602,13 +602,4 @@
          _ends
         
-TCR_FLAG_BIT_FOREIGN = fixnum_shift
-TCR_FLAG_BIT_AWAITING_PRESET = (fixnum_shift+1)	
-TCR_FLAG_BIT_ALT_SUSPEND = (fixnumshift+2)
-TCR_FLAG_BIT_PROPAGATE_EXCEPTION = (fixnumshift+3)
-TCR_FLAG_BIT_SUSPEND_ACK_PENDING = (fixnumshift+4)
-TCR_FLAG_BIT_PENDING_EXCEPTION = (fixnumshift+5)
-TCR_FLAG_BIT_FOREIGN_EXCEPTION = (fixnumshift+6)
-TCR_FLAG_BIT_PENDING_SUSPEND = (fixnumshift+7)
-
 target_most_positive_fixnum = 536870911
 target_most_negative_fixnum = -536870912
Index: /branches/rme-fpe/lisp-kernel/x86-constants64.s
===================================================================
--- /branches/rme-fpe/lisp-kernel/x86-constants64.s	(revision 13934)
+++ /branches/rme-fpe/lisp-kernel/x86-constants64.s	(revision 13935)
@@ -1026,13 +1026,4 @@
 
 	
-TCR_FLAG_BIT_FOREIGN = fixnum_shift
-TCR_FLAG_BIT_AWAITING_PRESET = (fixnum_shift+1)	
-TCR_FLAG_BIT_ALT_SUSPEND = (fixnumshift+2)
-TCR_FLAG_BIT_PROPAGATE_EXCEPTION = (fixnumshift+3)
-TCR_FLAG_BIT_SUSPEND_ACK_PENDING = (fixnumshift+4)
-TCR_FLAG_BIT_PENDING_EXCEPTION = (fixnumshift+5)
-TCR_FLAG_BIT_FOREIGN_EXCEPTION = (fixnumshift+6)
-TCR_FLAG_BIT_PENDING_SUSPEND = (fixnumshift+7)        
-	
 target_most_positive_fixnum = 1152921504606846975
 target_most_negative_fixnum = -1152921504606846976