xref: /csrg-svn/usr.bin/pascal/src/yycopy.c (revision 22202)
1*22202Sdist /*
2*22202Sdist  * Copyright (c) 1980 Regents of the University of California.
3*22202Sdist  * All rights reserved.  The Berkeley software License Agreement
4*22202Sdist  * specifies the terms and conditions for redistribution.
5*22202Sdist  */
6782Speter 
714747Sthien #ifndef lint
8*22202Sdist static char sccsid[] = "@(#)yycopy.c	5.1 (Berkeley) 06/05/85";
9*22202Sdist #endif not lint
10782Speter 
1112393Speter #include	"whoami.h"
12782Speter #include	"0.h"
1314747Sthien #include 	"tree_ty.h"		/* must be included for yy.h */
14782Speter #include	"yy.h"
15782Speter 
16782Speter OYcopy ()
17782Speter     {
1814747Sthien 	register int	*r0 = ((int *) & OY);
1914747Sthien 	register int	*r1 = ((int *) & Y);
20782Speter 	register int	r2 = ( sizeof ( struct yytok ) ) / ( sizeof ( int ) );
21782Speter 
22782Speter 	do
23782Speter 	    {
24782Speter 		* r0 ++ = * r1 ++ ;
25782Speter 	    }
26782Speter 	    while ( -- r2 > 0 );
27782Speter     }
28