git.chise.org Git - chise/xemacs-chise.git.1/blob - 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 /* CONST IS LOSING, but const is part of the interface of strcat */
  37 char *
  38 strcat (char *dest, const char *src)
  39 {
  40   REGISTER char *s1 = dest;
  41   REGISTER CONST char *s2 = src;
  42   char c;
  43
  44   /* Find the end of the string.  */
  45   do
  46     c = *s1++;
  47   while (c != '\0');
  48
  49   /* Make S1 point before the next character, so we can increment
  50      it while memory is read (wins on pipelined cpus).  */
  51   s1 -= 2;
  52
  53   do
  54     {
  55       c = *s2++;
  56       *++s1 = c;
  57     }
  58   while (c != '\0');
  59
  60   return dest;
  61 }