Changeset 829

Timestamp:

12/31/10 07:23:29 (14 years ago)

Author:

walter

Message:

more 64

Files:

• branches/dmd-1.x/src/backend/evalu8.c (modified) (1 diff)
• trunk/src/backend/evalu8.c (modified) (1 diff)

branches/dmd-1.x/src/backend/evalu8.c

@@ -1557 +1557 @@
-        break;
-
-#if MARS
-    case OPashr:
-        if ((targ_ullong) i2 > sizeof(targ_ullong) * 8)
-            i2 = sizeof(targ_ullong) * 8;
-        // Always signed
-        e->EV.Vllong = l1 >> i2;
-        break;
-#endif
-
-    case OPpair:
-        switch (tysize[tym])
-        {
-            case 2:
-                e->EV.Vlong = (i2 << 16) | (i1 & 0xFFFF);
-                break;
-            case 4:
-                e->EV.Vllong = (l2 << 32) | (l1 & 0xFFFFFFFF);
-                break;
+            case 8:
+                e->EV.Vcent.lsw = l1;
+                e->EV.Vcent.msw = l2;
+                break;
-            default:
-                assert(0);
-        }
-        break;
-
-    case OPneg:
-#if TX86
-        // Avoid converting NANS to NAN
-        memcpy(&e->EV.Vcldouble,&e1->EV.Vcldouble,sizeof(e->EV.Vcldouble));
-        switch (tym)
-        {   case TYdouble:
-            case TYidouble:
-            case TYdouble_alias:
-                e->EV.Vdouble = -e->EV.Vdouble;
-                break;
-            case TYfloat:
-            case TYifloat:
-                e->EV.Vfloat = -e->EV.Vfloat;
-                break;
-            case TYldouble:

trunk/src/backend/evalu8.c

@@ -1557 +1557 @@
-        break;
-
-#if MARS
-    case OPashr:
-        if ((targ_ullong) i2 > sizeof(targ_ullong) * 8)
-            i2 = sizeof(targ_ullong) * 8;
-        // Always signed
-        e->EV.Vllong = l1 >> i2;
-        break;
-#endif
-
-    case OPpair:
-        switch (tysize[tym])
-        {
-            case 2:
-                e->EV.Vlong = (i2 << 16) | (i1 & 0xFFFF);
-                break;
-            case 4:
-                e->EV.Vllong = (l2 << 32) | (l1 & 0xFFFFFFFF);
-                break;
+            case 8:
+                e->EV.Vcent.lsw = l1;
+                e->EV.Vcent.msw = l2;
+                break;
-            default:
-                assert(0);
-        }
-        break;
-
-    case OPneg:
-#if TX86
-        // Avoid converting NANS to NAN
-        memcpy(&e->EV.Vcldouble,&e1->EV.Vcldouble,sizeof(e->EV.Vcldouble));
-        switch (tym)
-        {   case TYdouble:
-            case TYidouble:
-            case TYdouble_alias:
-                e->EV.Vdouble = -e->EV.Vdouble;
-                break;
-            case TYfloat:
-            case TYifloat:
-                e->EV.Vfloat = -e->EV.Vfloat;
-                break;
-            case TYldouble: