diff options
Diffstat (limited to 'Build/source/texk/kpathsea/concatn.c')
-rw-r--r-- | Build/source/texk/kpathsea/concatn.c | 72 |
1 files changed, 0 insertions, 72 deletions
diff --git a/Build/source/texk/kpathsea/concatn.c b/Build/source/texk/kpathsea/concatn.c deleted file mode 100644 index 4e0b9eb923d..00000000000 --- a/Build/source/texk/kpathsea/concatn.c +++ /dev/null @@ -1,72 +0,0 @@ -/* concatn.c: concatenate an arbitrary number of strings. - - Copyright 1993, 1995, 2008, 2009 Karl Berry. - Copyright 1999, 2005 Olaf Weber. - - This library is free software; you can redistribute it and/or - modify it under the terms of the GNU Lesser General Public - License as published by the Free Software Foundation; either - version 2.1 of the License, or (at your option) any later version. - - This library is distributed in the hope that it will be useful, - but WITHOUT ANY WARRANTY; without even the implied warranty of - MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU - Lesser General Public License for more details. - - You should have received a copy of the GNU Lesser General Public License - along with this library; if not, see <http://www.gnu.org/licenses/>. */ - -#include <kpathsea/config.h> - -#include <kpathsea/concatn.h> - - -/* OK, it would be epsilon more efficient to compute the total length - and then do the copying ourselves, but I doubt it matters in reality. */ - -string -concatn (const_string str1, ...) -{ - string arg; - string ret; - va_list ap; - - if (!str1) - return NULL; - - ret = xstrdup (str1); - - va_start (ap, str1); - while ((arg = va_arg (ap, string)) != NULL) - { - string temp = concat (ret, arg); - free (ret); - ret = temp; - } - va_end (ap); - - return ret; -} - -#ifdef TEST -int -main () -{ - printf ("null = \"%s\"\n", concatn (NULL)); - printf ("\"a\" = \"%s\"\n", concatn ("a", NULL)); - printf ("\"ab\" = \"%s\"\n", concatn ("a", "b", NULL)); - printf ("\"abc\" = \"%s\"\n", concatn ("a", "b", "c", NULL)); - printf ("\"abcd\" = \"%s\"\n", concatn ("ab", "cd", NULL)); - printf ("\"abcde\" = \"%s\"\n", concatn ("ab", "c", "de", NULL)); - printf ("\"abcdef\" = \"%s\"\n", concatn ("", "a", "", "bcd", "ef", NULL)); - return 0; -} - -#endif /* TEST */ - - -/* -Local variables: -standalone-compile-command: "gcc -posix -g -I. -I.. -DTEST concatn.c kpathsea.a" -End: -*/ |