xref: /original-bsd/usr.bin/pascal/src/opc.c (revision 2598cae2)
1 /*-
2  * Copyright (c) 1980, 1993
3  *	The Regents of the University of California.  All rights reserved.
4  *
5  * %sccs.include.redist.c%
6  */
7 
8 #ifndef lint
9 static char copyright[] =
10 "@(#) Copyright (c) 1980, 1993\n\
11 	The Regents of the University of California.  All rights reserved.\n";
12 #endif /* not lint */
13 
14 #ifndef lint
15 static char sccsid[] = "@(#)opc.c	8.1 (Berkeley) 06/06/93";
16 #endif /* not lint */
17 
18 #include "OPnames.h"
19 
20 main()  {
21 	register int i;
22 
23 	for (i = 0;  i < 256;  i++)
24 		if (otext[i])
25 			printf("#define O_%s %04o\n", otext[i]+1, i);
26 	exit(0);
27 }
28