Pristine Ack-5.5
[Ack-5.5.git] / modules / src / string / btscat.c
1 /* $Id: btscat.c,v 1.5 1994/06/24 11:22:24 ceriel Exp $ */
2 /*
3  * (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
4  * See the copyright notice in the ACK home directory, in the file "Copyright".
5  */
6 /* btscat()
7 */
8
9 #include "ack_string.h"
10
11 char *
12 btscat(b1, n1, b2, n2)
13         char *b1;
14         int n1;
15         register char *b2;
16         register int n2;
17 {
18         register char *b = b1 + n1;
19
20         while (n2-- > 0)
21                 *b++ = *b2++;
22         return b1;
23 }