|
|
1.1 root 1: \File{grind4\-5a.py},{11:13},{Jul 4 1988}
2: \L{\LB{SalaryDefs \K{DEFINITIONS} ::=}}
3: \L{\LB{}}
4: \L{\LB{\%\{}}
5: \L{\LB{\#include \<stdio.h\>}}
6: \L{\LB{}}
7: \L{\LB{char *myname;}}
8: \L{\LB{}}
9: \L{\LB{static struct salary\_record \{}}
10: \L{\LB{ char *name;}}
11: \L{\LB{ int salary;}}
12: \L{\LB{\}}\Tab{8}{salary;}}
13: \L{\LB{}}
14: \L{\LB{\#define PEPYPARM struct salary\_record *}}
15: \L{\LB{}}
16: \L{\LB{}}
17: \L{\LB{main (argc, argv)}}
18: \L{\LB{int argc;}}
19: \L{\LB{char **argv;}}
20: \L{\LB{\{}}
21: \L{\LB{ PE}\Tab{8}{ pe;}}
22: \L{\LB{}}
23: \L{\LB{ myname = argv[0];}}
24: \L{\LB{}}
25: \L{\LB{ salary.name = argv[1];}}
26: \L{\LB{ salary.salary = atoi (argv[2]);}}
27: \L{\LB{ build\_SalaryDefs\_Salary (\&pe, 1, 0, NULLCP, \&salary);}}
28: \L{\LB{}}
29: \L{\LB{ salary.name = \K{NULL};}}
30: \L{\LB{ salary.salary = 0;}}
31: \L{\LB{ unbuild\_SalaryDefs\_Salary (pe, 1, NULLIP, NULLVP, \&salary);}}
32: \L{\LB{}}
33: \L{\LB{ exit (0);}}
34: \L{\LB{\}}}
35: \L{\LB{\%\}}}
36: \L{\LB{}}
37: \L{\LB{...}}
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.