another

[dan@alexandria perl6]$ MVM_SPESH_DISABLE=1 r --optimize=off -e 'use nqp; my $a = 0.777777777777777777777; say $a'
g == 310
h == C
g == 31C
g == 71C71C71C71C71B0
h == 8
g == 71C71C71C71C71B8
d == 1067517772614819069679695836449892990976.000000
d == 0.049018
0.0490180121527777755136
[dan@alexandria perl6]$ MVM_SPESH_DISABLE=1 r --optimize=off -e 'use nqp; my $a = 0.777777777777777777777; say $a'
a->dp[i] == 31C7
a->dp[i] == 1C71C71C71C71B8
MVM_mp_get_double_multiplier == 1152921504606846976.000000
d == 16938500042286714894382607039854500904960.000000
d == 0.777778
0.7777777777777777311744

gmp

[dan@alexandria perl6]$ MVM_SPESH_DISABLE=1 r --optimize=off -e 'use nqp; say nqp::div_In(9999999999999999999999, 10000000000000000000000)'
g == 3FF0
h == F
g == 3FFF
g == FFFFFFFFFFFFFFE0
h == 1
g == FFFFFFFFFFFFFFE1
d == 21798009902876835399749531981537370701824.000000
d == 0.062557
0.062557220458984375

master

[dan@alexandria perl6]$ MVM_SPESH_DISABLE=1 r --optimize=off -e 'use nqp; say nqp::div_In(9999999999999999999999, 10000000000000000000000)'
a->dp[i] == 3FFFF
a->dp[i] == FFFFFFFFFFFFFE1
MVM_mp_get_double_multiplier == 1152921504606846976.000000
d == 348449143727040986586495598010130648530944.000000
d == 1.000000
1