(U-000221C7): Add `sound@ja/on'; integrate BC-8BD8.
[chise/xemacs-chise.git] / src / strcat.c
1 /* Copyright (C) 1991 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
3
4 The GNU C Library is free software; you can redistribute it and/or
5 modify it under the terms of the GNU Library General Public License as
6 published by the Free Software Foundation; either version 2 of the
7 License, or (at your option) any later version.
8
9 The GNU C Library is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12 Library General Public License for more details.
13
14 You should have received a copy of the GNU Library General Public
15 License along with the GNU C Library; see the file COPYING.LIB.  If
16 not, write to the Free Software Foundation, Inc., 675 Mass Ave,
17 Cambridge, MA 02139, USA.  */
18
19 /* Synched up with: Not in FSF. */
20
21 # include <config.h>
22 # ifndef REGISTER       /* Strictly enforced in 20.3 */
23 # define REGISTER
24 # endif
25
26 /* In HPUX 10 the strcat function references memory past the last byte of 
27    the string!  This will core dump if the memory following the last byte is 
28    not mapped.
29
30    Here is a correct version from, glibc 1.09.
31 */
32
33 char *strcat (char *dest, const char *src);
34
35 /* Append SRC on the end of DEST.  */
36 char *
37 strcat (char *dest, const char *src)
38 {
39   REGISTER char *s1 = dest;
40   REGISTER const char *s2 = src;
41   char c;
42
43   /* Find the end of the string.  */
44   do
45     c = *s1++;
46   while (c != '\0');
47
48   /* Make S1 point before the next character, so we can increment
49      it while memory is read (wins on pipelined cpus).  */
50   s1 -= 2;
51
52   do
53     {
54       c = *s2++;
55       *++s1 = c;
56     }
57   while (c != '\0');
58
59   return dest;
60 }