Diff for /np2/i286c/i286c_sf.mcr between versions 1.1.1.1 and 1.8

version 1.1.1.1, 2003/10/16 17:57:44 version 1.8, 2003/12/11 04:03:35
Line 2 Line 2
   
   
 #define BYTE_ROL1(d, s) {                                                                                       \  #define BYTE_ROL1(d, s) {                                                                                       \
                 DWORD tmp = ((s) >> 7);                                                                         \                  UINT tmp = ((s) >> 7);                                                                          \
                 (d) = ((s) << 1) | tmp;                                                                         \                  (d) = ((s) << 1) + tmp;                                                                         \
                 I286_FLAGL &= ~C_FLAG;                                                                          \                  I286_FLAGL &= ~C_FLAG;                                                                          \
                 I286_FLAGL |= tmp;                                                                                      \                  I286_FLAGL |= tmp;                                                                                      \
                 I286_OV = ((s) ^ (d)) & 0x80;                                                           \                  I286_OV = ((s) ^ (d)) & 0x80;                                                           \
         }          }
   
 #define BYTE_ROR1(d, s) {                                                                                       \  #define BYTE_ROR1(d, s) {                                                                                       \
                 DWORD tmp = ((s) & 1);                                                                          \                  UINT tmp = ((s) & 1);                                                                           \
                 (d) = ((tmp << 8) | (s)) >> 1;                                                          \                  (d) = ((tmp << 8) + (s)) >> 1;                                                          \
                 I286_FLAGL &= ~C_FLAG;                                                                          \                  I286_FLAGL &= ~C_FLAG;                                                                          \
                 I286_FLAGL |= tmp;                                                                                      \                  I286_FLAGL |= tmp;                                                                                      \
                 I286_OV = ((s) ^ (d)) & 0x80;                                                           \                  I286_OV = ((s) ^ (d)) & 0x80;                                                           \
Line 32 Line 32
 #define BYTE_SHL1(d, s)                                                                                         \  #define BYTE_SHL1(d, s)                                                                                         \
                 (d) = (s) << 1;                                                                                         \                  (d) = (s) << 1;                                                                                         \
                 I286_OV = ((s) ^ (d)) & 0x80;                                                           \                  I286_OV = ((s) ^ (d)) & 0x80;                                                           \
                 I286_FLAGL = szpcflag[(d)] | A_FLAG;                  I286_FLAGL = BYTESZPCF(d) | A_FLAG;
   
 #define BYTE_SHR1(d, s)                                                                                         \  #define BYTE_SHR1(d, s)                                                                                         \
                 (d) = (s) >> 1;                                                                                         \                  (d) = (s) >> 1;                                                                                         \
                 I286_OV = (s) & 0x80;                                                                           \                  I286_OV = (s) & 0x80;                                                                           \
                 I286_FLAGL = (BYTE)(szpcflag[(d)] | A_FLAG | ((s) & 1));                  I286_FLAGL = (BYTE)(BYTESZPF(d) | A_FLAG | ((s) & 1));
   
   #if 1
 #define BYTE_SAR1(d, s)                                                                                         \  #define BYTE_SAR1(d, s)                                                                                         \
                 (d) = (BYTE)(((char)s) >> 1);                                                           \                  (d) = ((s) & 0x80) + ((s) >> 1);                                                        \
                 I286_OV = 0;                                                                                            \                  I286_OV = 0;                                                                                            \
                 I286_FLAGL = (BYTE)(szpcflag[(d)] | A_FLAG | ((s) & 1));                  I286_FLAGL = (BYTE)(BYTESZPF(d) | A_FLAG | ((s) & 1));
   #else   // eVC3/4 compiler bug
   #define BYTE_SAR1(d, s)                                                                                         \
                   (d) = (BYTE)(((SINT8)(s)) >> 1);                                                        \
                   I286_OV = 0;                                                                                            \
                   I286_FLAGL = (BYTE)(BYTESZPF(d) | A_FLAG | ((s) & 1));
   #endif
   
   
 #define WORD_ROL1(d, s) {                                                                                       \  #define WORD_ROL1(d, s) {                                                                                       \
                 DWORD tmp = ((s) >> 15);                                                                        \                  UINT32 tmp = ((s) >> 15);                                                                       \
                 (d) = ((s) << 1) | tmp;                                                                         \                  (d) = ((s) << 1) + tmp;                                                                         \
                 I286_FLAGL &= ~C_FLAG;                                                                          \                  I286_FLAGL &= ~C_FLAG;                                                                          \
                 I286_FLAGL |= tmp;                                                                                      \                  I286_FLAGL |= tmp;                                                                                      \
                 I286_OV = ((s) ^ (d)) & 0x8000;                                                         \                  I286_OV = ((s) ^ (d)) & 0x8000;                                                         \
         }          }
   
 #define WORD_ROR1(d, s) {                                                                                       \  #define WORD_ROR1(d, s) {                                                                                       \
                 DWORD tmp = ((s) & 1);                                                                          \                  UINT32 tmp = ((s) & 1);                                                                         \
                 (d) = ((tmp << 16) | (s)) >> 1;                                                         \                  (d) = ((tmp << 16) + (s)) >> 1;                                                         \
                 I286_FLAGL &= ~C_FLAG;                                                                          \                  I286_FLAGL &= ~C_FLAG;                                                                          \
                 I286_FLAGL |= tmp;                                                                                      \                  I286_FLAGL |= tmp;                                                                                      \
                 I286_OV = ((s) ^ (d)) & 0x8000;                                                         \                  I286_OV = ((s) ^ (d)) & 0x8000;                                                         \
Line 69 Line 75
                 I286_OV = ((s) ^ (d)) & 0x8000;                  I286_OV = ((s) ^ (d)) & 0x8000;
   
 #define WORD_RCR1(d, s)                                                                                         \  #define WORD_RCR1(d, s)                                                                                         \
                 (d) = (((I286_FLAGL & 1) << 16) | (s)) >> 1;                            \                  (d) = (((I286_FLAGL & 1) << 16) + (s)) >> 1;                            \
                 I286_FLAGL &= ~C_FLAG;                                                                          \                  I286_FLAGL &= ~C_FLAG;                                                                          \
                 I286_FLAGL |= ((s) & 1);                                                                        \                  I286_FLAGL |= ((s) & 1);                                                                        \
                 I286_OV = ((s) ^ (d)) & 0x8000;                  I286_OV = ((s) ^ (d)) & 0x8000;
Line 77 Line 83
 #define WORD_SHL1(d, s)                                                                                         \  #define WORD_SHL1(d, s)                                                                                         \
                 (d) = (s) << 1;                                                                                         \                  (d) = (s) << 1;                                                                                         \
                 I286_OV = ((s) ^ (d)) & 0x8000;                                                         \                  I286_OV = ((s) ^ (d)) & 0x8000;                                                         \
                 I286_FLAGL = (BYTE)(szpflag_w[(d) & 0xffff] | A_FLAG | ((d) >> 16));                  I286_FLAGL = WORDSZPCF(d) + A_FLAG;
   
 #define WORD_SHR1(d, s)                                                                                         \  #define WORD_SHR1(d, s)                                                                                         \
                 (d) = (s) >> 1;                                                                                         \                  (d) = (s) >> 1;                                                                                         \
                 I286_OV = (s) & 0x8000;                                                                         \                  I286_OV = (s) & 0x8000;                                                                         \
                 I286_FLAGL = (BYTE)(szpflag_w[(d)] | A_FLAG | ((s) & 1));                  I286_FLAGL = (BYTE)(WORDSZPF(d) | A_FLAG | ((s) & 1));
   
   #if 1
 #define WORD_SAR1(d, s)                                                                                         \  #define WORD_SAR1(d, s)                                                                                         \
                 (d) = (WORD)(((short)s) >> 1);                                                          \                  (d) = ((s) & 0x8000) + ((s) >> 1);                                                      \
                 I286_OV = 0;                                                                                            \                  I286_OV = 0;                                                                                            \
                 I286_FLAGL = (BYTE)(szpflag_w[(d)] | A_FLAG | ((s) & 1));                  I286_FLAGL = (BYTE)(WORDSZPF(d) | A_FLAG | ((s) & 1));
   #else   // eVC3/4 compiler bug
   #define WORD_SAR1(d, s)                                                                                         \
                   (d) = (UINT16)(((SINT16)(s)) >> 1);                                                     \
                   I286_OV = 0;                                                                                            \
                   I286_FLAGL = (BYTE)(WORDSZPF(d) | A_FLAG | ((s) & 1));
   #endif
   
   
   
Line 123 Line 135
 #define BYTE_RCLCL(d, s, c)                                                                                     \  #define BYTE_RCLCL(d, s, c)                                                                                     \
                 (c) &= 0x1f;                                                                                            \                  (c) &= 0x1f;                                                                                            \
                 if (c) {                                                                                                        \                  if (c) {                                                                                                        \
                         DWORD   tmp;                                                                                    \                          UINT tmp;                                                                                               \
                         tmp = I286_FLAGL & C_FLAG;                                                              \                          tmp = I286_FLAGL & C_FLAG;                                                              \
                         I286_FLAGL &= ~C_FLAG;                                                                  \                          I286_FLAGL &= ~C_FLAG;                                                                  \
                         while((c)--) {                                                                                  \                          while((c)--) {                                                                                  \
Line 138 Line 150
 #define BYTE_RCRCL(d, s, c)                                                                                     \  #define BYTE_RCRCL(d, s, c)                                                                                     \
                 (c) &= 0x1f;                                                                                            \                  (c) &= 0x1f;                                                                                            \
                 if (c) {                                                                                                        \                  if (c) {                                                                                                        \
                         DWORD   tmp;                                                                                    \                          UINT tmp;                                                                                               \
                         tmp = I286_FLAGL & C_FLAG;                                                              \                          tmp = I286_FLAGL & C_FLAG;                                                              \
                         I286_FLAGL &= ~C_FLAG;                                                                  \                          I286_FLAGL &= ~C_FLAG;                                                                  \
                         while((c)--) {                                                                                  \                          while((c)--) {                                                                                  \
Line 160 Line 172
                         }                                                                                                               \                          }                                                                                                               \
                         (s) <<= (c);                                                                                    \                          (s) <<= (c);                                                                                    \
                         (s) &= 0x1ff;                                                                                   \                          (s) &= 0x1ff;                                                                                   \
                         I286_FLAGL = szpcflag[(s)] | A_FLAG;                                    \                          I286_FLAGL = BYTESZPCF(s) + A_FLAG;                                             \
                         I286_OV = ((s) ^ ((s) >> 1)) & 0x80;                                    \                          I286_OV = ((s) ^ ((s) >> 1)) & 0x80;                                    \
                 }                                                                                                                       \                  }                                                                                                                       \
                 (d) = (s);                  (d) = (s);
Line 176 Line 188
                         I286_FLAGL = (BYTE)((s) & 1);                                                   \                          I286_FLAGL = (BYTE)((s) & 1);                                                   \
                         (s) >>= 1;                                                                                              \                          (s) >>= 1;                                                                                              \
                         I286_OV = ((s) ^ ((s) >> 1)) & 0x40;                                    \                          I286_OV = ((s) ^ ((s) >> 1)) & 0x40;                                    \
                         I286_FLAGL |= szpcflag[(s)] | A_FLAG;                                   \                          I286_FLAGL |= BYTESZPF(s) + A_FLAG;                                             \
                 }                                                                                                                       \                  }                                                                                                                       \
                 (d) = (s);                  (d) = (s);
   
 #define BYTE_SARCL(d, s, c)                                                                                     \  #define BYTE_SARCL(d, s, c)                                                                                     \
                 (c) &= 0x1f;                                                                                            \                  (c) &= 0x1f;                                                                                            \
                 if (c) {                                                                                                        \                  if (c) {                                                                                                        \
                         (s) = ((char)(s)) >> ((c) - 1);                                                 \                          (s) = ((SINT8)(s)) >> ((c) - 1);                                                \
                         I286_FLAGL = (BYTE)((s) & 1);                                                   \                          I286_FLAGL = (BYTE)((s) & 1);                                                   \
                         (s) = (BYTE)(((char)s) >> 1);                                                   \                          (s) = (BYTE)(((SINT8)s) >> 1);                                                  \
                         I286_OV = 0;                                                                                    \                          I286_OV = 0;                                                                                    \
                         I286_FLAGL |= szpcflag[(s)] | A_FLAG;                                   \                          I286_FLAGL |= BYTESZPF(s) | A_FLAG;                                             \
                 }                                                                                                                       \                  }                                                                                                                       \
                 (d) = (s);                  (d) = (s);
   
Line 195 Line 207
 #define WORD_ROLCL(d, s, c)                                                                                     \  #define WORD_ROLCL(d, s, c)                                                                                     \
                 (c) &= 0x1f;                                                                                            \                  (c) &= 0x1f;                                                                                            \
                 if (c) {                                                                                                        \                  if (c) {                                                                                                        \
                         DWORD tmp;                                                                                              \                          UINT tmp;                                                                                               \
                         (c)--;                                                                                                  \                          (c)--;                                                                                                  \
                         if (c) {                                                                                                \                          if (c) {                                                                                                \
                                 (c) &= 0x0f;                                                                            \                                  (c) &= 0x0f;                                                                            \
                                 (s) = ((s) << (c)) | ((s) >> (16 - (c)));                       \                                  (s) = ((s) << (c)) | ((s) >> (16 - (c)));                       \
                                 (s) &= 0xffff;                                                                          \                                  (s) &= 0xffff;                                                                          \
                                 I286_OV = 0;                                                                            \  
                         }                                                                                                               \                          }                                                                                                               \
                         else {                                                                                                  \                          else {                                                                                                  \
                                 I286_OV = ((s) + 0x4000) & 0x8000;                                      \                                  I286_OV = ((s) + 0x4000) & 0x8000;                                      \
                         }                                                                                                               \                          }                                                                                                               \
                         tmp = ((s) >> 15);                                                                              \                          tmp = ((s) >> 15);                                                                              \
                         (s) = ((s) << 1) | tmp;                                                                 \                          (s) = ((s) << 1) + tmp;                                                                 \
                         I286_FLAGL &= ~C_FLAG;                                                                  \                          I286_FLAGL &= ~C_FLAG;                                                                  \
                         I286_FLAGL |= tmp;                                                                              \                          I286_FLAGL |= tmp;                                                                              \
                 }                                                                                                                       \                  }                                                                                                                       \
Line 216 Line 227
 #define WORD_RORCL(d, s, c)                                                                                     \  #define WORD_RORCL(d, s, c)                                                                                     \
                 (c) &= 0x1f;                                                                                            \                  (c) &= 0x1f;                                                                                            \
                 if (c) {                                                                                                        \                  if (c) {                                                                                                        \
                         DWORD tmp;                                                                                              \                          UINT32 tmp;                                                                                             \
                         (c)--;                                                                                                  \                          (c)--;                                                                                                  \
                         if (c) {                                                                                                \                          if (c) {                                                                                                \
                                 (c) &= 0x0f;                                                                            \                                  (c) &= 0x0f;                                                                            \
                                 (s) = ((s) >> (c)) | ((s) << (16 - (c)));                       \                                  (s) = ((s) >> (c)) | ((s) << (16 - (c)));                       \
                                 (s) &= 0xffff;                                                                          \                                  (s) &= 0xffff;                                                                          \
                                 I286_OV = 0;                                                                            \  
                         }                                                                                                               \                          }                                                                                                               \
                         else {                                                                                                  \                          else {                                                                                                  \
                                 I286_OV = ((s) >> 15) ^ ((s) & 1);                                      \                                  I286_OV = ((s) >> 15) ^ ((s) & 1);                                      \
                         }                                                                                                               \                          }                                                                                                               \
                         tmp = ((s) & 1);                                                                                \                          tmp = (s) & 1;                                                                                  \
                         (s) = ((tmp << 16) | (s)) >> 1;                                                 \                          (s) = ((tmp << 16) + (s)) >> 1;                                                 \
                         I286_FLAGL &= ~C_FLAG;                                                                  \                          I286_FLAGL &= ~C_FLAG;                                                                  \
                         I286_FLAGL |= tmp;                                                                              \                          I286_FLAGL |= tmp;                                                                              \
                 }                                                                                                                       \                  }                                                                                                                       \
Line 237 Line 247
 #define WORD_RCLCL(d, s, c)                                                                                     \  #define WORD_RCLCL(d, s, c)                                                                                     \
                 (c) &= 0x1f;                                                                                            \                  (c) &= 0x1f;                                                                                            \
                 if (c) {                                                                                                        \                  if (c) {                                                                                                        \
                         DWORD   tmp;                                                                                    \                          UINT tmp;                                                                                               \
                         tmp = I286_FLAGL & C_FLAG;                                                              \                          tmp = I286_FLAGL & C_FLAG;                                                              \
                         I286_FLAGL &= ~C_FLAG;                                                                  \                          I286_FLAGL &= ~C_FLAG;                                                                  \
                         I286_OV = 0;                                                                                    \                          if ((c) == 1) {                                                                                 \
                         if (((c) == 1) || ((c) == 1+17)) {                                              \  
                                 I286_OV = ((s) + 0x4000) & 0x8000;                                      \                                  I286_OV = ((s) + 0x4000) & 0x8000;                                      \
                         }                                                                                                               \                          }                                                                                                               \
                         while((c)--) {                                                                                  \                          while((c)--) {                                                                                  \
                                 (s) = (((s) << 1) | tmp) & 0x1ffff;                                     \                                  (s) = (((s) << 1) + tmp) & 0x1ffff;                                     \
                                 tmp = (s) >> 16;                                                                        \                                  tmp = (s) >> 16;                                                                        \
                         }                                                                                                               \                          }                                                                                                               \
                         I286_FLAGL |= tmp;                                                                              \                          I286_FLAGL |= tmp;                                                                              \
Line 255 Line 264
 #define WORD_RCRCL(d, s, c)                                                                                     \  #define WORD_RCRCL(d, s, c)                                                                                     \
                 (c) &= 0x1f;                                                                                            \                  (c) &= 0x1f;                                                                                            \
                 if (c) {                                                                                                        \                  if (c) {                                                                                                        \
                         DWORD   tmp;                                                                                    \                          UINT32 tmp;                                                                                             \
                         tmp = I286_FLAGL & C_FLAG;                                                              \                          tmp = I286_FLAGL & C_FLAG;                                                              \
                         I286_FLAGL &= ~C_FLAG;                                                                  \                          I286_FLAGL &= ~C_FLAG;                                                                  \
                         I286_OV = 0;                                                                                    \                          if ((c) == 1) {                                                                                 \
                         if (((c) == 1) || ((c) == 1+17)) {                                              \  
                                 I286_OV = ((s) >> 15) ^ tmp;                                            \                                  I286_OV = ((s) >> 15) ^ tmp;                                            \
                         }                                                                                                               \                          }                                                                                                               \
                         while((c)--) {                                                                                  \                          while((c)--) {                                                                                  \
Line 280 Line 288
                         }                                                                                                               \                          }                                                                                                               \
                         (s) <<= (c);                                                                                    \                          (s) <<= (c);                                                                                    \
                         (s) &= 0x1ffff;                                                                                 \                          (s) &= 0x1ffff;                                                                                 \
                         I286_FLAGL = szpflag_w[(s) & 0xffff];                                   \                          I286_FLAGL = WORDSZPCF(s);                                                              \
                         I286_FLAGL |= (WORD)((s) >> 16);                                                \  
                 }                                                                                                                       \                  }                                                                                                                       \
                 (d) = (s);                  (d) = (s);
   
Line 298 Line 305
                         }                                                                                                               \                          }                                                                                                               \
                         I286_FLAGL = (BYTE)((s) & 1);                                                   \                          I286_FLAGL = (BYTE)((s) & 1);                                                   \
                         (s) >>= 1;                                                                                              \                          (s) >>= 1;                                                                                              \
                         I286_FLAGL |= szpflag_w[(s)];                                                   \                          I286_FLAGL |= WORDSZPF(s);                                                              \
                 }                                                                                                                       \                  }                                                                                                                       \
                 (d) = (s);                  (d) = (s);
   
   #if !defined(_WIN32_WCE) || (_WIN32_WCE < 300)
 #define WORD_SARCL(d, s, c)                                                                                     \  #define WORD_SARCL(d, s, c)                                                                                     \
                 (c) &= 0x1f;                                                                                            \                  (c) &= 0x1f;                                                                                            \
                 if (c) {                                                                                                        \                  if (c) {                                                                                                        \
                         (s) = ((short)(s)) >> ((c) - 1);                                                \                          (s) = ((SINT16)(s)) >> ((c) - 1);                                               \
                         I286_FLAGL = (BYTE)((s) & 1);                                                   \                          I286_FLAGL = (BYTE)((s) & 1);                                                   \
                         (s) = (WORD)(((short)s) >> 1);                                                  \                          (s) = (UINT16)(((SINT16)s) >> 1);                                               \
                           I286_OV = 0;                                                                                    \
                           I286_FLAGL |= WORDSZPF(s);                                                              \
                   }                                                                                                                       \
                   (d) = (s);
   #else   // eVC¡Á
   #define WORD_SARCL(d, s, c)                                                                                     \
                   (c) &= 0x1f;                                                                                            \
                   if (c) {                                                                                                        \
                           SINT32 tmp;                                                                                             \
                           tmp = (s) << 16;                                                                                \
                           tmp = tmp >> (16 + (c) - 1);                                                    \
                           I286_FLAGL = (BYTE)(tmp & 1);                                                   \
                           (s) = (UINT16)(tmp >> 1);                                                               \
                         I286_OV = 0;                                                                                    \                          I286_OV = 0;                                                                                    \
                         I286_FLAGL |= szpflag_w[(s)];                                                   \                          I286_FLAGL |= WORDSZPF(s);                                                              \
                 }                                                                                                                       \                  }                                                                                                                       \
                 (d) = (s);                  (d) = (s);
   #endif
   

Removed from v.1.1.1.1  
changed lines
  Added in v.1.8


RetroPC.NET-CVS <cvs@retropc.net>