X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=includes%2FSMP.h;h=74fbf9ad2d8b993f98d05e9257b4682fe8ce7463;hb=d7230e532eb485db85d4e446d7fba4192507b3ba;hp=bba80f78cf2a2375b1fed3dbe1978eb36dc1a853;hpb=ebafc217f9c3f932965c0581f4dbc8f19a26b37e;p=ghc-hetmet.git

diff --git a/includes/SMP.h b/includes/SMP.h
index bba80f7..74fbf9a 100644
--- a/includes/SMP.h
+++ b/includes/SMP.h
@@ -75,7 +75,7 @@ xchg(StgPtr p, StgWord w)
         "1:     lwarx     %0, 0, %2\n"
         "       stwcx.    %1, 0, %2\n"
         "       bne-      1b"
-        :"=r" (result)
+        :"=&r" (result)
         :"r" (w), "r" (p)
     );
 #elif sparc_HOST_ARCH