Commit d23da8bf authored by wolfgang's avatar wolfgang
Browse files

[project @ 2004-11-10 01:58:32 by wolfgang]

64-bit fix:
when loading the "era" global variable, convert it from cIntRep to
wordRep after loading (this is a no-op on all 32-bit platforms).
parent db35b905
......@@ -457,7 +457,8 @@ ldvEnter cl_ptr
(cmmOrWord loadEra (CmmLit (mkWordCLit lDV_STATE_USE)))
loadEra :: CmmExpr
loadEra = CmmLoad (mkLblExpr (mkRtsDataLabel SLIT("era"))) cIntRep
loadEra = CmmMachOp (MO_U_Conv cIntRep wordRep)
[CmmLoad (mkLblExpr (mkRtsDataLabel SLIT("era"))) cIntRep]
ldvWord :: CmmExpr -> CmmExpr
-- Takes the address of a closure, and returns
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