Commit 12a03c44 authored by kgardas's avatar kgardas
Browse files

fix bus error (misaligned data access) on SPARC in __decodeDouble_Int64

Reviewers: austin

Subscribers: thomie

Differential Revision: https://phabricator.haskell.org/D749
parent e25ad042
...@@ -182,9 +182,9 @@ __decodeDouble_Int64 (StgInt64 *const mantissa, const StgDouble dbl) ...@@ -182,9 +182,9 @@ __decodeDouble_Int64 (StgInt64 *const mantissa, const StgDouble dbl)
I_ exp = 0; I_ exp = 0;
__decodeDouble_2Int (&man_sign, &man_high, &man_low, &exp, dbl); __decodeDouble_2Int (&man_sign, &man_high, &man_low, &exp, dbl);
ASSIGN_Int64((W_*)mantissa, ((((StgInt64)man_high << 32)
*mantissa = ((((StgInt64)man_high << 32) | (StgInt64)man_low) | (StgInt64)man_low)
* (StgInt64)man_sign); * (StgInt64)man_sign));
return exp; return exp;
#endif #endif
} }
......
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