CAMLprim value caml_log1p_float(value f) { return caml_copy_double(caml_log1p(Double_val(f))); }
CAMLprim value caml_log1p_float_r(CAML_R, value f) { return caml_copy_double_r(ctx, caml_log1p(Double_val(f))); }