--- np2/i386c/ia32/instructions/shift_rotate.mcr 2004/02/20 16:09:05 1.4 +++ np2/i386c/ia32/instructions/shift_rotate.mcr 2004/03/10 15:38:51 1.7 @@ -1,4 +1,4 @@ -/* $Id: shift_rotate.mcr,v 1.4 2004/02/20 16:09:05 monaka Exp $ */ +/* $Id: shift_rotate.mcr,v 1.7 2004/03/10 15:38:51 monaka Exp $ */ /* * Copyright (c) 2003 NONAKA Kimihiro @@ -97,8 +97,7 @@ do { \ CPU_OV = 0; \ if ((s) == 0) { \ CPU_FLAGL |= Z_FLAG; \ - } \ - if ((s) & 0x80000000) { \ + } else if ((s) & 0x80000000) { \ CPU_FLAGL |= S_FLAG; \ } \ CPU_FLAGL |= (szpcflag[(UINT8)(s)] & P_FLAG); \ @@ -139,13 +138,17 @@ do { \ (c) &= 0x1f; \ if (c) { \ if ((c) >= 0x10) { \ - (c) &= 7; \ - (c) |= 8; \ + (c) = 10; \ + } \ + (c)--; \ + if (c) { \ + (s) >>= (c); \ + } \ + else { \ + CPU_OV = (s) & 0x80; \ } \ - (s) >>= (c) - 1; \ CPU_FLAGL = (UINT8)((s) & 1); \ (s) >>= 1; \ - CPU_OV = ((s) ^ ((s) >> 1)) & 0x40; \ CPU_FLAGL |= (szpcflag[(UINT8)(s)] | A_FLAG); \ } \ (d) = (s); \ @@ -158,7 +161,6 @@ do { \ (c)--; \ if (c) { \ (s) >>= (c); \ - CPU_OV = 0; \ } else { \ CPU_OV = (s) & 0x8000; \ } \ @@ -176,7 +178,6 @@ do { \ (c)--; \ if (c) { \ (s) >>= (c); \ - CPU_OV = 0; \ } else { \ CPU_OV = (s) & 0x80000000; \ } \ @@ -217,8 +218,7 @@ do { \ } \ if ((d) == 0) { \ CPU_FLAGL |= Z_FLAG; \ - } \ - if ((d) & 0x80000000) { \ + } else if ((d) & 0x80000000) { \ CPU_FLAGL |= S_FLAG; \ } \ } while (/*CONSTCOND*/ 0) @@ -227,14 +227,15 @@ do { \ do { \ (c) &= 0x1f; \ if (c) { \ - if ((c) >= 0x10) { \ - (c) &= 7; \ - (c) |= 8; \ + if ((c) > 0x10) { \ + (c) = 10; \ + } \ + if ((c) == 1) { \ + CPU_OV = ((s) + 0x40) & 0x80; \ } \ (s) <<= (c); \ (s) &= 0x1ff; \ CPU_FLAGL = (UINT8)(szpcflag[(s) & 0x1ff] | A_FLAG); \ - CPU_OV = ((s) ^ ((s) >> 1)) & 0x80; \ } \ (d) = (s); \ } while (/*CONSTCOND*/ 0) @@ -288,15 +289,16 @@ do { \ #define _WORD_SHRD(d, s, c) \ do { \ (c) &= 0x1f; \ - if ((c)) { \ - if ((c) < 16) { \ - CPU_FLAGL = (UINT8)(((d) >> ((c) - 1)) & 1); /*C_FLAG*/ \ - (d) |= (s) << 16; \ - (d) >>= (c); \ - (d) &= 0xffff; \ - CPU_FLAGL |= szpflag_w[(UINT16)(d)] | A_FLAG; \ - CPU_OV = (d) & 0x8000; \ + if (((c)) && ((c) < 16)) { \ + CPU_OV = 0; \ + if ((c) == 1) { \ + CPU_OV = (((d) >> 15) ^ (s)) & 1; \ } \ + CPU_FLAGL = (UINT8)(((d) >> ((c) - 1)) & 1); /*C_FLAG*/ \ + (d) |= (s) << 16; \ + (d) >>= (c); \ + (d) &= 0xffff; \ + CPU_FLAGL |= szpflag_w[(UINT16)(d)] | A_FLAG; \ } \ } while (/*CONSTCOND*/ 0) @@ -304,6 +306,10 @@ do { \ do { \ (c) &= 0x1f; \ if ((c)) { \ + CPU_OV = 0; \ + if ((c) == 1) { \ + CPU_OV = (((d) >> 31) ^ (s)) & 1; \ + } \ CPU_FLAGL = (UINT8)(((d) >> ((c) - 1)) & 1); /* C_FLAG */ \ (d) >>= (c); \ (d) |= (s) << (32 - (c)); \ @@ -314,7 +320,6 @@ do { \ CPU_FLAGL |= S_FLAG; \ } \ CPU_FLAGL |= (szpcflag[(UINT8)(d)] & P_FLAG); \ - CPU_OV = (d) & 0x80000000; \ } \ } while (/*CONSTCOND*/ 0) @@ -324,15 +329,16 @@ do { \ #define _WORD_SHLD(d, s, c) \ do { \ (c) &= 0x1f; \ - if ((c)) { \ - if ((c) < 16) { \ - CPU_FLAGL = (UINT8)(((d) >> (16 - (c))) & 1); /*C_FLAG*/\ - (d) = ((d) << 16) | (s); \ - (d) <<= (c); \ - (d) >>= 16; \ - CPU_FLAGL |= szpflag_w[(d)] | A_FLAG; \ - CPU_OV = (d) & 0x8000; \ + if (((c)) && ((c) < 16)) { \ + CPU_OV = 0; \ + if ((c) == 1) { \ + CPU_OV = ((d) ^ ((d) << 1)) & 0x8000; \ } \ + CPU_FLAGL = (UINT8)(((d) >> (16 - (c))) & 1); /*C_FLAG*/\ + (d) = ((d) << 16) | (s); \ + (d) <<= (c); \ + (d) >>= 16; \ + CPU_FLAGL |= szpflag_w[(d)] | A_FLAG; \ } \ } while (/*CONSTCOND*/ 0) @@ -340,6 +346,10 @@ do { \ do { \ (c) &= 0x1f; \ if ((c)) { \ + CPU_OV = 0; \ + if ((c) == 1) { \ + CPU_OV = ((d) ^ ((d) << 1)) & 0x80000000; \ + } \ CPU_FLAGL = (UINT8)(((d) >> (32 - (c))) & 1); /* C_FLAG */ \ (d) <<= (c); \ (d) |= ((s) >> (32 - (c))); \ @@ -350,7 +360,6 @@ do { \ CPU_FLAGL |= S_FLAG; \ } \ CPU_FLAGL |= (szpcflag[(UINT8)(d)] & P_FLAG); \ - CPU_OV = (d) & 0x80000000; \ } \ } while (/*CONSTCOND*/ 0) @@ -744,6 +753,10 @@ do { \ #define WORD_RCLCL(d, s, c) XC_WORD_RCLCL(d, s, c) #define DWORD_RCLCL(d, s, c) XC_DWORD_RCLCL(d, s, c) +#elif defined(IA32_CROSS_CHECK) && defined(_MSC_VER) + +#include "shift_rotatexc_msc.mcr" + #else /* !(IA32_CROSS_CHECK && __GNUC__ && (i386) || __i386__)) */ #define BYTE_SAR1(d, s) _BYTE_SAR1(d, s)