xref: /csrg-svn/usr.bin/pascal/src/yycopy.c (revision 12393)
1782Speter /* Copyright (c) 1979 Regents of the University of California */
2782Speter 
3*12393Speter static	char sccsid[] = "@(#)yycopy.c 1.2 05/11/83";
4782Speter 
5*12393Speter #include	"whoami.h"
6782Speter #include	"0.h"
7782Speter #include	"yy.h"
8782Speter 
9782Speter OYcopy ()
10782Speter     {
11782Speter 	register int	*r0 = & OY;
12782Speter 	register int	*r1 = & Y;
13782Speter 	register int	r2 = ( sizeof ( struct yytok ) ) / ( sizeof ( int ) );
14782Speter 
15782Speter 	do
16782Speter 	    {
17782Speter 		* r0 ++ = * r1 ++ ;
18782Speter 	    }
19782Speter 	    while ( -- r2 > 0 );
20782Speter     }
21