diff options
| author | Lukas Larsson <[email protected]> | 2012-08-24 12:02:58 +0200 |
|---|---|---|
| committer | Lukas Larsson <[email protected]> | 2012-08-24 12:02:58 +0200 |
| commit | 0342137176c653c51cc3a78781888cfca8568650 (patch) | |
| tree | b3f2b462589a7d574a80e4557a8a05a222184a3e /erts/emulator/test/float_SUITE.erl | |
| parent | dd12380a68f4692c1aba2e972b84de89f3df46df (diff) | |
| parent | 85283dc19ceea2905ff39aa0615d1a99d7aea16c (diff) | |
| download | otp-0342137176c653c51cc3a78781888cfca8568650.tar.gz otp-0342137176c653c51cc3a78781888cfca8568650.tar.bz2 otp-0342137176c653c51cc3a78781888cfca8568650.zip | |
Merge branch 'msp/double_middle_endian/OTP-10209' into maint
* msp/double_middle_endian/OTP-10209:
Configure now assumed normal doubles
Revise the autoconf tests for double middle endianness.
Add test for floating-point output to float_SUITE.
Unbreak floating point on middle-endian machines.
Diffstat (limited to 'erts/emulator/test/float_SUITE.erl')
| -rw-r--r-- | erts/emulator/test/float_SUITE.erl | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/erts/emulator/test/float_SUITE.erl b/erts/emulator/test/float_SUITE.erl index 8e6923ce9f..abe01bf5ec 100644 --- a/erts/emulator/test/float_SUITE.erl +++ b/erts/emulator/test/float_SUITE.erl @@ -25,7 +25,7 @@ init_per_group/2,end_per_group/2, init_per_testcase/2,end_per_testcase/2, fpe/1,fp_drv/1,fp_drv_thread/1,denormalized/1,match/1, - bad_float_unpack/1,cmp_zero/1, cmp_integer/1, cmp_bignum/1]). + bad_float_unpack/1, write/1, cmp_zero/1, cmp_integer/1, cmp_bignum/1]). -export([otp_7178/1]). -export([hidden_inf/1]). @@ -42,7 +42,7 @@ suite() -> [{ct_hooks,[ts_install_cth]}]. all() -> [fpe, fp_drv, fp_drv_thread, otp_7178, denormalized, - match, bad_float_unpack, {group, comparison} + match, bad_float_unpack, write, {group, comparison} ,hidden_inf ]. @@ -190,6 +190,11 @@ bad_float_unpack(Config) when is_list(Config) -> bad_float_unpack_match(<<F:64/float>>) -> F; bad_float_unpack_match(<<I:64/integer-signed>>) -> I. +%% Exposes endianness issues. + +write(Config) when is_list(Config) -> + "1.0" = io_lib:write(1.0). + cmp_zero(_Config) -> cmp(0.5e-323,0). |