summaryrefslogtreecommitdiff
path: root/rts/sm/OSMem.h
diff options
context:
space:
mode:
authorBen Gamari <ben@well-typed.com>2019-01-30 01:06:12 -0500
committerBen Gamari <ben@well-typed.com>2019-01-30 01:06:12 -0500
commit76c8fd674435a652c75a96c85abbf26f1f221876 (patch)
treeb02a6f5307a20efc25ddb27c58977069b48972b6 /rts/sm/OSMem.h
parent7cdcd3e12a5c3a337e36fa80c64bd72e5ef79b24 (diff)
downloadhaskell-76c8fd674435a652c75a96c85abbf26f1f221876.tar.gz
Batch merge
Diffstat (limited to 'rts/sm/OSMem.h')
-rw-r--r--rts/sm/OSMem.h10
1 files changed, 8 insertions, 2 deletions
diff --git a/rts/sm/OSMem.h b/rts/sm/OSMem.h
index 7dd0efdc23..ea123e80c6 100644
--- a/rts/sm/OSMem.h
+++ b/rts/sm/OSMem.h
@@ -32,10 +32,16 @@ roundDownToPage (size_t x)
}
INLINE_HEADER size_t
+roundUpToAlign (size_t size, size_t align)
+{
+ /* alignment must always be a power of 2 */
+ return (size + align - 1) & ~(align - 1);
+}
+
+INLINE_HEADER size_t
roundUpToPage (size_t x)
{
- size_t size = getPageSize();
- return ((x + size - 1) & ~(size - 1));
+ return roundUpToAlign(x, getPageSize());
}