register unsigned long _ry asm("4") = 0x10; /* storage configuration */
        int rc = -1;                                /* fail */
        unsigned long reg1, reg2;
-       psw_t old = S390_lowcore.program_new_psw;
+       psw_t old;
 
        asm volatile(
+               "       mvc     0(16,%[psw_old]),0(%[psw_pgm])\n"
                "       epsw    %0,%1\n"
-               "       st      %0,%[psw_pgm]\n"
-               "       st      %1,%[psw_pgm]+4\n"
+               "       st      %0,0(%[psw_pgm])\n"
+               "       st      %1,4(%[psw_pgm])\n"
                "       larl    %0,1f\n"
-               "       stg     %0,%[psw_pgm]+8\n"
+               "       stg     %0,8(%[psw_pgm])\n"
                "       diag    %[rx],%[ry],0x260\n"
                "       ipm     %[rc]\n"
                "       srl     %[rc],28\n"
-               "1:\n"
+               "1:     mvc     0(16,%[psw_pgm]),0(%[psw_old])\n"
                : "=&d" (reg1), "=&a" (reg2),
-                 [psw_pgm] "=Q" (S390_lowcore.program_new_psw),
+                 "+Q" (S390_lowcore.program_new_psw),
+                 "=Q" (old),
                  [rc] "+&d" (rc), [ry] "+d" (_ry)
-               : [rx] "d" (_rx1), "d" (_rx2)
+               : [rx] "d" (_rx1), "d" (_rx2),
+                 [psw_old] "a" (&old),
+                 [psw_pgm] "a" (&S390_lowcore.program_new_psw)
                : "cc", "memory");
-       S390_lowcore.program_new_psw = old;
        return rc == 0 ? _ry : -1;
 }