diff options
author | Ben Gamari <bgamari.foss@gmail.com> | 2015-11-03 16:16:27 -0600 |
---|---|---|
committer | Austin Seipp <austin@well-typed.com> | 2015-11-03 16:16:30 -0600 |
commit | 334fe4500c234e83f250f74679f7bbe20208abba (patch) | |
tree | 2fad3f32a81b9fe2a4b0eaa3dd4026728851ab1d /rts/FileLock.c | |
parent | b62605e53c167719b3bf8842eba628061cf22dd1 (diff) | |
download | haskell-334fe4500c234e83f250f74679f7bbe20208abba.tar.gz |
rts/Hash: Constify HashTable* in lookupHashTable
This seems like an obvious place to apply `const`
Reviewed By: simonmar, austin
Differential Revision: https://phabricator.haskell.org/D1416
Diffstat (limited to 'rts/FileLock.c')
-rw-r--r-- | rts/FileLock.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/FileLock.c b/rts/FileLock.c index cd2dc1d1dc..f8e11ee1bf 100644 --- a/rts/FileLock.c +++ b/rts/FileLock.c @@ -41,7 +41,7 @@ static int cmpLocks(StgWord w1, StgWord w2) return (l1->device == l2->device && l1->inode == l2->inode); } -static int hashLock(HashTable *table, StgWord w) +static int hashLock(const HashTable *table, StgWord w) { Lock *l = (Lock *)w; StgWord key = l->inode ^ (l->inode >> 32) ^ l->device ^ (l->device >> 32); |