diff options
| author | Ian Lynagh <ian@well-typed.com> | 2012-09-13 19:12:30 +0100 |
|---|---|---|
| committer | Ian Lynagh <ian@well-typed.com> | 2012-09-13 19:12:30 +0100 |
| commit | 4279ab5050df28ba7abd79296a788d1ddb9eb5df (patch) | |
| tree | a8272030704b755e28f99496582fba0b797a048e /compiler/codeGen/CgStackery.lhs | |
| parent | 07c3777105e9e7292b472af9277cf8710492e038 (diff) | |
| download | haskell-4279ab5050df28ba7abd79296a788d1ddb9eb5df.tar.gz | |
Use sIZEOF_* from platformConstants rather than Constants
Diffstat (limited to 'compiler/codeGen/CgStackery.lhs')
| -rw-r--r-- | compiler/codeGen/CgStackery.lhs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/codeGen/CgStackery.lhs b/compiler/codeGen/CgStackery.lhs index 04fce86f2f..51c0b9095d 100644 --- a/compiler/codeGen/CgStackery.lhs +++ b/compiler/codeGen/CgStackery.lhs @@ -289,7 +289,7 @@ pushSpecUpdateFrame lbl updatee code ; MASSERT(case sequel of { OnStack -> True; _ -> False}) } ; dflags <- getDynFlags ; allocStackTop (fixedHdrSize dflags + - sIZEOF_StgUpdateFrame_NoHdr `quot` wORD_SIZE) + sIZEOF_StgUpdateFrame_NoHdr dflags `quot` wORD_SIZE) ; vsp <- getVirtSp ; setStackFrame vsp ; frame_addr <- getSpRelOffset vsp |