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