fix

Issue 13998 - Wrong code with -O -inline, loops, and taking address of double

src/backend/cod1.c

@@ -1438,6 +1438,11 @@ code *getlvalue(code *pcs,elem *e,regm_t keepmsk)
         }
         else if (e->EV.sp.Voffset)
             s->Sflags &= ~GTregcand;
+
+        if (config.fpxmmregs && tyfloating(s->ty()) && !tyfloating(ty))
+            // Can't successfully mix XMM register variables accessed as integers
+            s->Sflags &= ~GTregcand;
+
         if (!(keepmsk & RMstore))               // if not store only
             s->Sflags |= SFLread;               // assume we are doing a read
         break;

test/runnable/testxmm.d

@@ -1260,6 +1260,22 @@ void test12776()
 
 /*****************************************/
 
+void foo13988(double[] arr)
+{
+    static ulong repr(double d) { return *cast(ulong*)&d; }
+    foreach (x; arr)
+	assert(repr(arr[0]) == *cast(ulong*)&(arr[0]));
+}
+
+
+void test13988()
+{
+    double[] arr = [3.0];
+    foo13988(arr);
+}
+
+/*****************************************/
+
 int main()
 {
     test1();
@@ -1290,6 +1306,7 @@ int main()
     test12852();
     test9449();
     test9449_2();
+    test13988();
 
     return 0;
 }