diff options
| author | Dmitry Antipov | 2013-09-11 11:20:20 +0400 |
|---|---|---|
| committer | Dmitry Antipov | 2013-09-11 11:20:20 +0400 |
| commit | 53482f41157f37a7f6afb7f19be8fc63b015f6ed (patch) | |
| tree | e5b18d5f114bcf9e0882d04f8deb35e57ab22e7c /src/data.c | |
| parent | 2a08047aed0017cc2b639e189fc3b5d41c46fcbd (diff) | |
| download | emacs-53482f41157f37a7f6afb7f19be8fc63b015f6ed.tar.gz emacs-53482f41157f37a7f6afb7f19be8fc63b015f6ed.zip | |
Fix last change.
* data.c (Feqlsign, Flss, Fgtr, Fleq, Fgeq): Add convenient
'usage' docstring entry to pacify make-docfile.
Diffstat (limited to 'src/data.c')
| -rw-r--r-- | src/data.c | 15 |
1 files changed, 10 insertions, 5 deletions
diff --git a/src/data.c b/src/data.c index 7f28028f604..51b0266eca1 100644 --- a/src/data.c +++ b/src/data.c | |||
| @@ -2321,21 +2321,24 @@ arithcompare_driver (ptrdiff_t nargs, Lisp_Object *args, | |||
| 2321 | } | 2321 | } |
| 2322 | 2322 | ||
| 2323 | DEFUN ("=", Feqlsign, Seqlsign, 1, MANY, 0, | 2323 | DEFUN ("=", Feqlsign, Seqlsign, 1, MANY, 0, |
| 2324 | doc: /* Return t if args, all numbers or markers, are equal. */) | 2324 | doc: /* Return t if args, all numbers or markers, are equal. |
| 2325 | usage: (= NUMBER-OR-MARKER &rest NUMBERS-OR-MARKERS) */) | ||
| 2325 | (ptrdiff_t nargs, Lisp_Object *args) | 2326 | (ptrdiff_t nargs, Lisp_Object *args) |
| 2326 | { | 2327 | { |
| 2327 | return arithcompare_driver (nargs, args, ARITH_EQUAL); | 2328 | return arithcompare_driver (nargs, args, ARITH_EQUAL); |
| 2328 | } | 2329 | } |
| 2329 | 2330 | ||
| 2330 | DEFUN ("<", Flss, Slss, 1, MANY, 0, | 2331 | DEFUN ("<", Flss, Slss, 1, MANY, 0, |
| 2331 | doc: /* Return t if each arg is less than the next arg. All must be numbers or markers. */) | 2332 | doc: /* Return t if each arg is less than the next arg. All must be numbers or markers. |
| 2333 | usage: (< NUMBER-OR-MARKER &rest NUMBERS-OR-MARKERS) */) | ||
| 2332 | (ptrdiff_t nargs, Lisp_Object *args) | 2334 | (ptrdiff_t nargs, Lisp_Object *args) |
| 2333 | { | 2335 | { |
| 2334 | return arithcompare_driver (nargs, args, ARITH_LESS); | 2336 | return arithcompare_driver (nargs, args, ARITH_LESS); |
| 2335 | } | 2337 | } |
| 2336 | 2338 | ||
| 2337 | DEFUN (">", Fgtr, Sgtr, 1, MANY, 0, | 2339 | DEFUN (">", Fgtr, Sgtr, 1, MANY, 0, |
| 2338 | doc: /* Return t if each arg is greater than the next arg. All must be numbers or markers. */) | 2340 | doc: /* Return t if each arg is greater than the next arg. All must be numbers or markers. |
| 2341 | usage: (> NUMBER-OR-MARKER &rest NUMBERS-OR-MARKERS) */) | ||
| 2339 | (ptrdiff_t nargs, Lisp_Object *args) | 2342 | (ptrdiff_t nargs, Lisp_Object *args) |
| 2340 | { | 2343 | { |
| 2341 | return arithcompare_driver (nargs, args, ARITH_GRTR); | 2344 | return arithcompare_driver (nargs, args, ARITH_GRTR); |
| @@ -2343,7 +2346,8 @@ DEFUN (">", Fgtr, Sgtr, 1, MANY, 0, | |||
| 2343 | 2346 | ||
| 2344 | DEFUN ("<=", Fleq, Sleq, 1, MANY, 0, | 2347 | DEFUN ("<=", Fleq, Sleq, 1, MANY, 0, |
| 2345 | doc: /* Return t if each arg is less than or equal to the next arg. | 2348 | doc: /* Return t if each arg is less than or equal to the next arg. |
| 2346 | All must be numbers or markers. */) | 2349 | All must be numbers or markers. |
| 2350 | usage: (<= NUMBER-OR-MARKER &rest NUMBERS-OR-MARKERS) */) | ||
| 2347 | (ptrdiff_t nargs, Lisp_Object *args) | 2351 | (ptrdiff_t nargs, Lisp_Object *args) |
| 2348 | { | 2352 | { |
| 2349 | return arithcompare_driver (nargs, args, ARITH_LESS_OR_EQUAL); | 2353 | return arithcompare_driver (nargs, args, ARITH_LESS_OR_EQUAL); |
| @@ -2351,7 +2355,8 @@ All must be numbers or markers. */) | |||
| 2351 | 2355 | ||
| 2352 | DEFUN (">=", Fgeq, Sgeq, 1, MANY, 0, | 2356 | DEFUN (">=", Fgeq, Sgeq, 1, MANY, 0, |
| 2353 | doc: /* Return t if each arg is greater than or equal to the next arg. | 2357 | doc: /* Return t if each arg is greater than or equal to the next arg. |
| 2354 | All must be numbers or markers. */) | 2358 | All must be numbers or markers. |
| 2359 | usage: (= NUMBER-OR-MARKER &rest NUMBERS-OR-MARKERS) */) | ||
| 2355 | (ptrdiff_t nargs, Lisp_Object *args) | 2360 | (ptrdiff_t nargs, Lisp_Object *args) |
| 2356 | { | 2361 | { |
| 2357 | return arithcompare_driver (nargs, args, ARITH_GRTR_OR_EQUAL); | 2362 | return arithcompare_driver (nargs, args, ARITH_GRTR_OR_EQUAL); |