Pristine Ack-5.5
[Ack-5.5.git] / lang / cem / cemcom / stb.c
1 /*
2  * (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
3  * See the copyright notice in the ACK home directory, in the file "Copyright".
4  */
5 /* $Id: stb.c,v 3.2 1994/06/24 12:06:15 ceriel Exp $ */
6 /* library routine for copying structs */
7
8 __stb(n, f, t)
9         register char *f, *t; register n;
10 {
11         if (n > 0)
12                 do
13                         *t++ = *f++;
14                 while (--n);
15 }