xref: /original-bsd/usr.bin/pascal/src/yycopy.c (revision d25e1985)
1 /* Copyright (c) 1979 Regents of the University of California */
2 
3 static	char sccsid[] = "@(#)yycopy.c 1.1 08/27/80";
4 
5 #include	"0.h"
6 #include	"yy.h"
7 
8 OYcopy ()
9     {
10 	register int	*r0 = & OY;
11 	register int	*r1 = & Y;
12 	register int	r2 = ( sizeof ( struct yytok ) ) / ( sizeof ( int ) );
13 
14 	do
15 	    {
16 		* r0 ++ = * r1 ++ ;
17 	    }
18 	    while ( -- r2 > 0 );
19     }
20