2 * This file has been modified for the cdrkit suite.
4 * The behaviour and appearence of the program code below can differ to a major
5 * extent from the version distributed by the original author(s).
7 * For details, see Changelog file distributed with the cdrkit package. If you
8 * received this file from another source then ask the distributing person for
9 * a log of modifications.
13 /* @(#)strcatl.c 1.12 03/10/29 Copyright 1985, 1989, 1995-2003 J. Schilling */
15 * list version of strcat()
17 * concatenates all past first parameter until a NULL pointer is reached
19 * WARNING: a NULL constant is not a NULL pointer, so a caller must
20 * cast a NULL constant to a pointer: (char *)NULL
22 * returns pointer past last character (to '\0' byte)
24 * Copyright (c) 1985, 1989, 1995-2003 J. Schilling
27 * This program is free software; you can redistribute it and/or modify
28 * it under the terms of the GNU General Public License version 2
29 * as published by the Free Software Foundation.
31 * This program is distributed in the hope that it will be useful,
32 * but WITHOUT ANY WARRANTY; without even the implied warranty of
33 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
34 * GNU General Public License for more details.
36 * You should have received a copy of the GNU General Public License along with
37 * this program; see the file COPYING. If not, write to the Free Software
38 * Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
49 strcatl(char *to, ...)
59 register char *tor = to;
66 while ((p = va_arg(args, char *)) != NULL) {
67 while ((*tor = *p++) != '\0') {