diff options
Diffstat (limited to 'src/fns.c')
| -rw-r--r-- | src/fns.c | 3 |
1 files changed, 0 insertions, 3 deletions
| @@ -532,14 +532,12 @@ Do NOT use this function to compare file names for equality. */) | |||
| 532 | static Lisp_Object concat (ptrdiff_t nargs, Lisp_Object *args, | 532 | static Lisp_Object concat (ptrdiff_t nargs, Lisp_Object *args, |
| 533 | enum Lisp_Type target_type, bool last_special); | 533 | enum Lisp_Type target_type, bool last_special); |
| 534 | 534 | ||
| 535 | /* ARGSUSED */ | ||
| 536 | Lisp_Object | 535 | Lisp_Object |
| 537 | concat2 (Lisp_Object s1, Lisp_Object s2) | 536 | concat2 (Lisp_Object s1, Lisp_Object s2) |
| 538 | { | 537 | { |
| 539 | return concat (2, ((Lisp_Object []) {s1, s2}), Lisp_String, 0); | 538 | return concat (2, ((Lisp_Object []) {s1, s2}), Lisp_String, 0); |
| 540 | } | 539 | } |
| 541 | 540 | ||
| 542 | /* ARGSUSED */ | ||
| 543 | Lisp_Object | 541 | Lisp_Object |
| 544 | concat3 (Lisp_Object s1, Lisp_Object s2, Lisp_Object s3) | 542 | concat3 (Lisp_Object s1, Lisp_Object s2, Lisp_Object s3) |
| 545 | { | 543 | { |
| @@ -2577,7 +2575,6 @@ This makes STRING unibyte and may change its length. */) | |||
| 2577 | return Qnil; | 2575 | return Qnil; |
| 2578 | } | 2576 | } |
| 2579 | 2577 | ||
| 2580 | /* ARGSUSED */ | ||
| 2581 | Lisp_Object | 2578 | Lisp_Object |
| 2582 | nconc2 (Lisp_Object s1, Lisp_Object s2) | 2579 | nconc2 (Lisp_Object s1, Lisp_Object s2) |
| 2583 | { | 2580 | { |