anchor.diff:  
   test_fp_with_fp_exceptions() ->
     0.0 = math:log(1.0),
  -  badarith = try math:log(minus_one_float()) catch error:E1 -> E1 end,
  +  badarith = try math:log(float_minus_one()) catch error:E1 -> E1 end,
     0.0 = math:log(1.0),
  -  badarith = try math:log(zero_float()) catch error:E2 -> E2 end,
  +  badarith = try math:log(float_zero()) catch error:E2 -> E2 end,
     0.0 = math:log(1.0),
     %% An old-fashioned exception here just so as to test this case also
  -  {'EXIT',_} = (catch fp_mult(3.23e133, 3.57e257)),
  +  {'EXIT', _} = (catch fp_mult(3.23e133, 3.57e257)),
     0.0 = math:log(1.0),
  -  badarith = try fp_div(5.0,0.0) catch error:E3 -> E3 end,
  +  badarith = try fp_div(5.0, 0.0) catch error:E3 -> E3 end,
     0.0 = math:log(1.0),
     ok.
   
  
positive.code:   ok = test_catch_bad_fp_arith(),
    ok = test_catch_fp_conv(),
    ok = test_fp_with_fp_exceptions(),
    ok.
  
  %%--------------------------------------------------------------------
  
negative.code: -module(basic_floats).
  
  -export([test/0]).
  -export([test_fmt_double_fpe_leak/0]).   % suppress the unused warning
  
  test() ->
    ok = test_arith_ops(),
  