fixes to PPC version of cas(), from David Kirkman <dkirkman@gmail.com>

[ghc-hetmet.git] / includes / SMP.h

diff --git a/includes/SMP.h b/includes/SMP.h
index 68f1690..515516a 100644 (file)
--- a/includes/SMP.h
+++ b/includes/SMP.h
@@ -76,8 +76,9 @@ cas(StgVolatilePtr p, StgWord o, StgWord n)
         "       stwcx.    %2, 0, %3\n"
         "       bne-      1b\n"
         "2:"
-        :"=r" (result)
+        :"=&r" (result)
         :"r" (o), "r" (n), "r" (p)
+        :"cc", "memory"
     );
     return result;
 #else