diff options
| author | Paul Eggert | 2016-03-10 07:34:52 -0800 |
|---|---|---|
| committer | Paul Eggert | 2016-03-10 07:59:19 -0800 |
| commit | 7352c6c695db8b90b63c2601277d64a32507d2bb (patch) | |
| tree | 1dc5f7af755a70f67efe13882099ff4920230571 /src/floatfns.c | |
| parent | a589e9aed5255fb1ebfb38fa4b3c9df5f6ef7448 (diff) | |
| download | emacs-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.c | 14 |
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 @@ | |||
| 3 | Copyright (C) 1988, 1993-1994, 1999, 2001-2016 Free Software Foundation, | 3 | Copyright (C) 1988, 1993-1994, 1999, 2001-2016 Free Software Foundation, |
| 4 | Inc. | 4 | Inc. |
| 5 | 5 | ||
| 6 | Author: Wolfgang Rupprecht | 6 | Author: Wolfgang Rupprecht (ac |
| 7 | (according to ack.texi) | 7 | ording to ack.texi) |
| 8 | 8 | ||
| 9 | This file is part of GNU Emacs. | 9 | This file is part of GNU Emacs. |
| 10 | 10 | ||
| 11 | GNU Emacs is free software: you can redistribute it and/or modify | 11 | GNU Emacs is free software: you can redistribute it and/or modify |
| 12 | it under the terms of the GNU General Public License as published by | 12 | it under the terms of the GNU General Public License as published by |
| 13 | the Free Software Foundation, either version 3 of the License, or | 13 | the Free Software Foundation, either version 3 of the License, or (at |
| 14 | (at your option) any later version. | 14 | your option) any later version. |
| 15 | 15 | ||
| 16 | GNU Emacs is distributed in the hope that it will be useful, | 16 | GNU Emacs is distributed in the hope that it will be useful, |
| 17 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 17 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -170,7 +170,7 @@ Cause an error if X1 or X2 is not a float. */) | |||
| 170 | DEFUN ("frexp", Ffrexp, Sfrexp, 1, 1, 0, | 170 | DEFUN ("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. |
| 172 | Breaks the floating point number X into its binary significand SGNFCAND | 172 | Breaks 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)) |
| 174 | and an integral exponent EXP for 2, such that: | 174 | and 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 | ||
| 492 | DEFUN ("fceiling", Ffceiling, Sfceiling, 1, 1, 0, | 492 | DEFUN ("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 | ||
| 502 | DEFUN ("ffloor", Fffloor, Sffloor, 1, 1, 0, | 502 | DEFUN ("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); |