diff --git a/src/c/number.d b/src/c/number.d index 09ce0597f..380ec4cd8 100644 --- a/src/c/number.d +++ b/src/c/number.d @@ -815,7 +815,7 @@ ratio_to_long_double(cl_object num, cl_object den) #ifdef WITH_GMP cl_fixnum scale; cl_object bits = prepare_ratio_to_float(num, den, LDBL_MANT_DIG, &scale); - long double output = ecl_to_lon_double(bits); + long double output = ecl_to_long_double(bits); return ldexpl(output, scale); #else return (long double)(FIXNUMP(num) ? fix(num) : num->big.big_num) /