diff options
| author | Ben Gamari <ben@smart-cactus.org> | 2015-08-27 00:36:59 +0200 |
|---|---|---|
| committer | Ben Gamari <ben@smart-cactus.org> | 2015-11-01 15:19:47 +0100 |
| commit | 159a1a2b7501b149fadfc0cd1940fab6bf030691 (patch) | |
| tree | 8f62c8322dfe7118c901438fa735e170963438f4 /compiler/codeGen | |
| parent | 76611d750247c1f6fd1323ef5564af16b97e8157 (diff) | |
| download | haskell-159a1a2b7501b149fadfc0cd1940fab6bf030691.tar.gz | |
cmm: Expose machine's stack and return address register
We will need to use these to setup proper unwinding information for the
stg_stop_thread closure. This pokes a hole in the STG abstraction,
exposing the machine's stack pointer register so that we can accomplish
this. We also expose a dummy return address register, which corresponds
to the register used to hold the DWARF return address.
Differential Revision: https://phabricator.haskell.org/D1225
Diffstat (limited to 'compiler/codeGen')
| -rw-r--r-- | compiler/codeGen/CgUtils.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/compiler/codeGen/CgUtils.hs b/compiler/codeGen/CgUtils.hs index 51b8ed9ec8..a19731295a 100644 --- a/compiler/codeGen/CgUtils.hs +++ b/compiler/codeGen/CgUtils.hs @@ -86,6 +86,8 @@ baseRegOffset dflags GCEnter1 = oFFSET_stgGCEnter1 dflags baseRegOffset dflags GCFun = oFFSET_stgGCFun dflags baseRegOffset _ BaseReg = panic "baseRegOffset:BaseReg" baseRegOffset _ PicBaseReg = panic "baseRegOffset:PicBaseReg" +baseRegOffset _ MachSp = panic "baseRegOffset:MachSp" +baseRegOffset _ UnwindReturnReg = panic "baseRegOffset:UnwindReturnReg" -- ----------------------------------------------------------------------------- |