fix longdouble ulong->double unconditionally

use gcc style asm

Author: rainers

dmd/root/longdouble.d

@@ -342,17 +342,14 @@ void ld_setull(longdouble_soft* pthis, ulong d)
     {
         // emulator accuracy not good enough when running on Windows on ARM,
         // so avoid chopping off small numbers
-        version(LDC)
+        if (!(d & (1L << 63)))
         {
-            if (!(d & (1L << 63)))
+            asm nothrow @nogc pure @trusted
             {
-                asm nothrow @nogc pure @trusted
-                {
-                    fild qword ptr d;
-                }
-                mixin(fstp_parg!("pthis"));
-                return;
+                fild qword ptr d;
             }
+            mixin(fstp_parg!("pthis"));
+            return;
         }
         d ^= (1L << 63);
         auto pTwoPow63 = &twoPow63;

runtime/druntime/src/core/thread/fiber.d

@@ -363,59 +363,59 @@ private
         else version (AsmAArch64_Windows)
         {
             pragma(LDC_never_inline);
-            __asm(
+            asm pure nothrow @nogc
+            {
                 `// save current stack state (similar to posix version in threadasm.S)
-                stp x19, x20, [sp, #-16]!
-                stp x21, x22, [sp, #-16]!
-                stp x23, x24, [sp, #-16]!
-                stp x25, x26, [sp, #-16]!
-                stp x27, x28, [sp, #-16]!
-                stp fp,  lr,  [sp, #-16]!
-                mov x19, sp               // no need to scan FP registers, so snapshot sp here
-
-                stp d8,  d9,  [sp, #-16]!
-                stp d10, d11, [sp, #-16]!
-                stp d12, d13, [sp, #-16]!
-                stp d14, d15, [sp, #-16]!
-
-                ldr x20, [x18, #8]        // read stack range from TEB
-                ldr x21, [x18, #16]
-                stp x20, x21, [sp, #-16]!
-
-                ldr x20, [x18, #0x1478]   // read Deallocation Stack
-                ldr w21, [x18, #0x1748]   // read GuaranteedStackBytes
-                stp x20, x21, [sp, #-16]!
+                stp x19, x20, [sp, #-16]!;
+                stp x21, x22, [sp, #-16]!;
+                stp x23, x24, [sp, #-16]!;
+                stp x25, x26, [sp, #-16]!;
+                stp x27, x28, [sp, #-16]!;
+                stp fp,  lr,  [sp, #-16]!;
+                mov x19, sp;               // no need to scan FP registers, so snapshot sp here
+
+                stp d8,  d9,  [sp, #-16]!;
+                stp d10, d11, [sp, #-16]!;
+                stp d12, d13, [sp, #-16]!;
+                stp d14, d15, [sp, #-16]!;
+
+                ldr x20, [x18, #8];        // read stack range from TEB
+                ldr x21, [x18, #16];
+                stp x20, x21, [sp, #-16]!;
+
+                ldr x20, [x18, #0x1478];   // read Deallocation Stack
+                ldr w21, [x18, #0x1748];   // read GuaranteedStackBytes
+                stp x20, x21, [sp, #-16]!;
 
                 // store oldp
-                str x19, [x0]
+                str x19, [x0];
                 // load newp to begin context switch
-                sub x1, x1, #6*16
-                mov sp, x1
+                sub x1, x1, #6*16;
+                mov sp, x1;
 
-                ldp x20, x21, [sp], #16   // restore Deallocation/GuaranteedStackBytes
-                str x20, [x18, #0x1478]
-                str w21, [x18, #0x1748]   // word only
+                ldp x20, x21, [sp], #16;   // restore Deallocation/GuaranteedStackBytes
+                str x20, [x18, #0x1478];
+                str w21, [x18, #0x1748];   // word only
 
-                ldp x20, x21, [sp], #16   // restore stack range
-                str x20, [x18, #8]
-                str x21, [x18, #16]
+                ldp x20, x21, [sp], #16;   // restore stack range
+                str x20, [x18, #8];
+                str x21, [x18, #16];
 
                 // load saved state from new stack
-                ldp d14, d15, [sp], #16
-                ldp d12, d13, [sp], #16
-                ldp d10, d11, [sp], #16
-                ldp d8,  d9,  [sp], #16
-
-                ldp fp,  lr,  [sp], #16
-                ldp x27, x28, [sp], #16
-                ldp x25, x26, [sp], #16
-                ldp x23, x24, [sp], #16
-                ldp x21, x22, [sp], #16
-                ldp x19, x20, [sp], #16
-
-                ret`,
-                ""
-            );
+                ldp d14, d15, [sp], #16;
+                ldp d12, d13, [sp], #16;
+                ldp d10, d11, [sp], #16;
+                ldp d8,  d9,  [sp], #16;
+
+                ldp fp,  lr,  [sp], #16;
+                ldp x27, x28, [sp], #16;
+                ldp x25, x26, [sp], #16;
+                ldp x23, x24, [sp], #16;
+                ldp x21, x22, [sp], #16;
+                ldp x19, x20, [sp], #16;
+
+                ret;`;
+            }
         }
         else
             static assert(false);

runtime/druntime/src/ldc/eh_msvc.d

@@ -542,27 +542,28 @@ void msvc_eh_terminate() nothrow @naked
     }
     else version (AArch64)
     {
-        __asm(`
-            bl _D3ldc7eh_msvc21tlsUncaughtExceptionsFNbZm
-            cmp w0, #0
-            ble 1f
+        asm pure nothrow @nogc
+        {`
+            bl _D3ldc7eh_msvc21tlsUncaughtExceptionsFNbZm;
+            cmp w0, #0;
+            ble 1f;
 
             // hacking into the call chain to return EXCEPTION_EXECUTE_HANDLER
             //  as the return value of __FrameUnwindFilter so that
             // __FrameUnwindToState continues with the next unwind block
-            ldr x0, [fp] // __FrameUnwindFilter's fp
-            mov sp, x0
-            mov w0, #1   // return EXCEPTION_EXECUTE_HANDLER
-            ldp fp,lr,[sp],#16
-            ldp x19,x20,[sp],#0x10
-            autibsp      // uses lr,sp and x19 as input to hash
-            ret
+            ldr x0, [fp]; // __FrameUnwindFilter's fp
+            mov sp, x0;
+            mov w0, #1;   // return EXCEPTION_EXECUTE_HANDLER
+            ldp fp,lr,[sp],#16;
+            ldp x19,x20,[sp],#0x10;
+            autibsp;      // uses lr,sp and x19 as input to hash
+            ret;
 
         1:
-            ldp fp,lr,[sp],#16
-            ret`,
-            "~{memory},~{x0},~{x19},~{x20}"
-        );
+            ldp fp,lr,[sp],#16;
+            ret;`
+            : : : "x0", "x19", "x20";
+        }
     }
 }