diff options
| author | 5outh <bkovach13@gmail.com> | 2017-06-22 10:29:53 -0400 |
|---|---|---|
| committer | 5outh <bkovach13@gmail.com> | 2017-06-22 10:29:53 -0400 |
| commit | a9bf7d42bb31d66e8669546e47191961bc03da03 (patch) | |
| tree | c7aebacdde221b69bae42da0134f0b9bab95bfcc | |
| parent | 76769bdf9e423d89518eae4a5a441ae172c54e96 (diff) | |
| download | haskell-a9bf7d42bb31d66e8669546e47191961bc03da03.tar.gz | |
Fix typo
| -rw-r--r-- | libraries/base/GHC/Conc/Sync.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libraries/base/GHC/Conc/Sync.hs b/libraries/base/GHC/Conc/Sync.hs index 44d34d8262..f9514d6681 100644 --- a/libraries/base/GHC/Conc/Sync.hs +++ b/libraries/base/GHC/Conc/Sync.hs @@ -731,7 +731,7 @@ atomically (STM m) = IO (\s -> (atomically# m) s ) -- values in TVars which mean that it should not continue (e.g. the TVars -- represent a shared buffer that is now empty). The implementation may -- block the thread until one of the TVars that it has read from has been --- udpated. (GHC only) +-- updated. (GHC only) retry :: STM a retry = STM $ \s# -> retry# s# |