xref: /csrg-svn/usr.bin/pascal/src/opc.c (revision 62213)
148116Sbostic /*-
2*62213Sbostic  * Copyright (c) 1980, 1993
3*62213Sbostic  *	The Regents of the University of California.  All rights reserved.
448116Sbostic  *
548116Sbostic  * %sccs.include.redist.c%
622179Sdist  */
7761Speter 
814737Sthien #ifndef lint
9*62213Sbostic static char copyright[] =
10*62213Sbostic "@(#) Copyright (c) 1980, 1993\n\
11*62213Sbostic 	The Regents of the University of California.  All rights reserved.\n";
1248116Sbostic #endif /* not lint */
13761Speter 
1448116Sbostic #ifndef lint
15*62213Sbostic static char sccsid[] = "@(#)opc.c	8.1 (Berkeley) 06/06/93";
1648116Sbostic #endif /* not lint */
1748116Sbostic 
18761Speter #include "OPnames.h"
19761Speter 
main()20761Speter main()  {
21761Speter 	register int i;
22761Speter 
23761Speter 	for (i = 0;  i < 256;  i++)
24761Speter 		if (otext[i])
25761Speter 			printf("#define O_%s %04o\n", otext[i]+1, i);
26761Speter 	exit(0);
27761Speter }
28