Mercurial > hg > xemacs-beta

comparison src/strcat.c @ 2:ac2d302a0011 r19-15b2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-15b2
author cvs
date Mon, 13 Aug 2007 08:46:35 +0200
parents
children 850242ba4a81
comparison
equal deleted inserted replaced
1:c0c6a60d29db 2:ac2d302a0011
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 /* In HPUX 10 the strcat function references memory past the last byte of
22 the string! This will core dump if the memory following the last byte is
23 not mapped.
24
25 Here is a correct version from glibc 1.09.
26 */
27
28 char *strcat (char *dest, const char *src);
29
30 /* Append SRC on the end of DEST. */
31 char *
32 strcat (char *dest, const char *src)
33 {
34 register char *s1 = dest;
35 register const char *s2 = src;
36 char c;
37
38 /* Find the end of the string. */
39 do
40 c = *s1++;
41 while (c != '\0');
42
43 /* Make S1 point before the next character, so we can increment
44 it while memory is read (wins on pipelined cpus). */
45 s1 -= 2;
46
47 do
48 {
49 c = *s2++;
50 *++s1 = c;
51 }
52 while (c != '\0');
53
54 return dest;
55 }