Commit 2bc6efc5 authored by Simon Marlow's avatar Simon Marlow

Fix caching of pagesize

Summary: Spotted by @erikd

Test Plan: validate

Reviewers: austin, bgamari, erikd

Subscribers: thomie, erikd

Differential Revision: https://phabricator.haskell.org/D1345
parent 68a084f3
......@@ -2233,10 +2233,9 @@ static StgWord getPageSize(void)
{
static StgWord pagesize = 0;
if (pagesize == 0) {
return sysconf(_SC_PAGESIZE);
} else {
return pagesize;
pagesize = sysconf(_SC_PAGESIZE);
}
return pagesize;
}
static StgWord roundUpToPage (StgWord size)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment