xref: /csrg-svn/usr.bin/pascal/src/opc.c (revision 761)
1*761Speter /* Copyright (c) 1979 Regents of the University of California */
2*761Speter 
3*761Speter static	char sccsid[] = "@(#)opc.c 1.1 08/27/80";
4*761Speter 
5*761Speter #include "OPnames.h"
6*761Speter 
7*761Speter main()  {
8*761Speter 	register int i;
9*761Speter 
10*761Speter 	for (i = 0;  i < 256;  i++)
11*761Speter 		if (otext[i])
12*761Speter 			printf("#define O_%s %04o\n", otext[i]+1, i);
13*761Speter 	exit(0);
14*761Speter }
15