Repository : ssh://[email protected]/ghc

On branch  : ghc-parmake-gsoc
Link       : 
http://ghc.haskell.org/trac/ghc/changeset/81bafceb14dfae45a59566c232b6b6eb4e4ffd09/ghc

>---------------------------------------------------------------

commit 81bafceb14dfae45a59566c232b6b6eb4e4ffd09
Author: Patrick Palka <[email protected]>
Date:   Wed Sep 4 13:33:14 2013 -0400

    genSym: atomic_inc() now takes two arguments


>---------------------------------------------------------------

81bafceb14dfae45a59566c232b6b6eb4e4ffd09
 compiler/cbits/genSym.c |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/compiler/cbits/genSym.c b/compiler/cbits/genSym.c
index 8614e97..4217e63 100644
--- a/compiler/cbits/genSym.c
+++ b/compiler/cbits/genSym.c
@@ -7,7 +7,7 @@ HsInt genSym(void) {
     if (n_capabilities == 1) {
         return GenSymCounter++;
     } else {
-        return atomic_inc((StgWord *)&GenSymCounter);
+        return atomic_inc((StgWord *)&GenSymCounter, 1);
     }
 }
 


_______________________________________________
ghc-commits mailing list
[email protected]
http://www.haskell.org/mailman/listinfo/ghc-commits

Reply via email to