comparison src/floatfns.c @ 1715:cd23f7ef1bd0

* floatfns.c (Flog): Fix unescaped newline in string. * frame.c (Fnext_frame): Same. * textprop.c (Fprevious_single_property_change): Same. (syms_of_textprop): Same, for DEFVAR for `interval_balance_threshold'.

1714:2a1dbc7de507

  IN_FLOAT (f1 = pow (f1, f2), num1);
  return make_float (f1);
}

DEFUN ("log", Flog, Slog, 1, 2, 0,
  "Return the natural logarithm of NUM.
If second optional argument BASE is given, return log NUM using that base.")
  (num, base)
     register Lisp_Object num, base;
{
  double d = extract_float (num);

1715:cd23f7ef1bd0

  IN_FLOAT (f1 = pow (f1, f2), num1);
  return make_float (f1);
}

DEFUN ("log", Flog, Slog, 1, 2, 0,
  "Return the natural logarithm of NUM.\n\
If second optional argument BASE is given, return log NUM using that base.")
  (num, base)
     register Lisp_Object num, base;
{
  double d = extract_float (num);