diff options
| author | Patrick Palka <patrick@parcs.ath.cx> | 2013-09-04 13:33:14 -0400 |
|---|---|---|
| committer | Patrick Palka <patrick@parcs.ath.cx> | 2013-09-04 14:40:29 -0400 |
| commit | 81bafceb14dfae45a59566c232b6b6eb4e4ffd09 (patch) | |
| tree | ad60e63f6153d6ca881a946cfe407e9c93267cca | |
| parent | d127a697192851ea6bf308525a8a8895da71b639 (diff) | |
| download | haskell-81bafceb14dfae45a59566c232b6b6eb4e4ffd09.tar.gz | |
genSym: atomic_inc() now takes two arguments
| -rw-r--r-- | compiler/cbits/genSym.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/cbits/genSym.c b/compiler/cbits/genSym.c index 8614e97e75..4217e636e1 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); } } |