summaryrefslogtreecommitdiff
path: root/utils/deriveConstants
diff options
context:
space:
mode:
authorJohan Tibell <johan.tibell@gmail.com>2014-03-12 07:20:19 +0100
committerJohan Tibell <johan.tibell@gmail.com>2014-03-14 00:01:28 +0100
commit210ccabc9489bfbf814939e8b45646c8d0c7ce5f (patch)
tree3ce5e2af9f13639fc1b0c202ec7f9ee80fe7bee8 /utils/deriveConstants
parentcbdd83288bc3d3d2f07eadf800e9f2b27916c168 (diff)
downloadhaskell-210ccabc9489bfbf814939e8b45646c8d0c7ce5f.tar.gz
codeGen: allocate small byte arrays of statically known size inline
This results in a 57% runtime decrease when allocating an array of 128 bytes on a 64-bit machine. Fixes #8876.
Diffstat (limited to 'utils/deriveConstants')
-rw-r--r--utils/deriveConstants/DeriveConstants.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/utils/deriveConstants/DeriveConstants.hs b/utils/deriveConstants/DeriveConstants.hs
index 10df61ca7d..293fe65492 100644
--- a/utils/deriveConstants/DeriveConstants.hs
+++ b/utils/deriveConstants/DeriveConstants.hs
@@ -392,7 +392,7 @@ wanteds = concat
,closureField Both "StgMutArrPtrs" "size"
,closureSize Both "StgArrWords"
- ,closureField C "StgArrWords" "bytes"
+ ,closureField Both "StgArrWords" "bytes"
,closurePayload C "StgArrWords" "payload"
,closureField C "StgTSO" "_link"