aboutsummaryrefslogtreecommitdiffstats
path: root/src/floatfns.c
diff options
context:
space:
mode:
authorPaul Eggert2016-03-10 07:34:52 -0800
committerPaul Eggert2016-03-10 07:59:19 -0800
commit7352c6c695db8b90b63c2601277d64a32507d2bb (patch)
tree1dc5f7af755a70f67efe13882099ff4920230571 /src/floatfns.c
parenta589e9aed5255fb1ebfb38fa4b3c9df5f6ef7448 (diff)
downloademacs-7352c6c695db8b90b63c2601277d64a32507d2bb.tar.gz
emacs-7352c6c695db8b90b63c2601277d64a32507d2bb.zip
Rework C source files to avoid ^(
Work around Bug#22884 by rewording comments and strings to avoid ‘(’ at the start of a line unless it starts a function. This change is a short-term hack; in the longer run we plan to fix cc-mode’s performance for C files that have ‘(’ at the start of a line in a comment or string.
Diffstat (limited to 'src/floatfns.c')
-rw-r--r--src/floatfns.c14
1 files changed, 7 insertions, 7 deletions
diff --git a/src/floatfns.c b/src/floatfns.c
index cf485b6fcea..b9af03b3431 100644
--- a/src/floatfns.c
+++ b/src/floatfns.c
@@ -3,15 +3,15 @@
3Copyright (C) 1988, 1993-1994, 1999, 2001-2016 Free Software Foundation, 3Copyright (C) 1988, 1993-1994, 1999, 2001-2016 Free Software Foundation,
4Inc. 4Inc.
5 5
6Author: Wolfgang Rupprecht 6Author: Wolfgang Rupprecht (ac
7(according to ack.texi) 7ording to ack.texi)
8 8
9This file is part of GNU Emacs. 9This file is part of GNU Emacs.
10 10
11GNU Emacs is free software: you can redistribute it and/or modify 11GNU Emacs is free software: you can redistribute it and/or modify
12it under the terms of the GNU General Public License as published by 12it under the terms of the GNU General Public License as published by
13the Free Software Foundation, either version 3 of the License, or 13the Free Software Foundation, either version 3 of the License, or (at
14(at your option) any later version. 14your option) any later version.
15 15
16GNU Emacs is distributed in the hope that it will be useful, 16GNU Emacs is distributed in the hope that it will be useful,
17but WITHOUT ANY WARRANTY; without even the implied warranty of 17but WITHOUT ANY WARRANTY; without even the implied warranty of
@@ -170,7 +170,7 @@ Cause an error if X1 or X2 is not a float. */)
170DEFUN ("frexp", Ffrexp, Sfrexp, 1, 1, 0, 170DEFUN ("frexp", Ffrexp, Sfrexp, 1, 1, 0,
171 doc: /* Get significand and exponent of a floating point number. 171 doc: /* Get significand and exponent of a floating point number.
172Breaks the floating point number X into its binary significand SGNFCAND 172Breaks the floating point number X into its binary significand SGNFCAND
173(a floating point value between 0.5 (included) and 1.0 (excluded)) 173\(a floating point value between 0.5 (included) and 1.0 (excluded))
174and an integral exponent EXP for 2, such that: 174and an integral exponent EXP for 2, such that:
175 175
176 X = SGNFCAND * 2^EXP 176 X = SGNFCAND * 2^EXP
@@ -491,7 +491,7 @@ fmod_float (Lisp_Object x, Lisp_Object y)
491 491
492DEFUN ("fceiling", Ffceiling, Sfceiling, 1, 1, 0, 492DEFUN ("fceiling", Ffceiling, Sfceiling, 1, 1, 0,
493 doc: /* Return the smallest integer no less than ARG, as a float. 493 doc: /* Return the smallest integer no less than ARG, as a float.
494(Round toward +inf.) */) 494\(Round toward +inf.) */)
495 (Lisp_Object arg) 495 (Lisp_Object arg)
496{ 496{
497 double d = extract_float (arg); 497 double d = extract_float (arg);
@@ -501,7 +501,7 @@ DEFUN ("fceiling", Ffceiling, Sfceiling, 1, 1, 0,
501 501
502DEFUN ("ffloor", Fffloor, Sffloor, 1, 1, 0, 502DEFUN ("ffloor", Fffloor, Sffloor, 1, 1, 0,
503 doc: /* Return the largest integer no greater than ARG, as a float. 503 doc: /* Return the largest integer no greater than ARG, as a float.
504(Round towards -inf.) */) 504\(Round towards -inf.) */)
505 (Lisp_Object arg) 505 (Lisp_Object arg)
506{ 506{
507 double d = extract_float (arg); 507 double d = extract_float (arg);