| blob | c9c274a61bf0ac7e1094b0dd42eea7d17e39175f |
1 %!PS-Adobe-2.0
2 statusdict /setduplexmode known {
3 false statusdict /setduplexmode get exec
4 } if
5 /Ps 10 def
6 /SPs 7 def
7 /Lh 11 def
8 /Rm 575 def
9 /Tm 746 def
10 /Bh 15 def
11 /Bf 15 def
12 /CF /Courier findfont Ps scalefont def
13 /IF /Courier-Oblique findfont Ps scalefont def
14 /BF /Courier-Bold findfont Ps scalefont def
15 /CFs /Courier findfont SPs scalefont def
16 /IFs /Courier-Oblique findfont SPs scalefont def
17 /BFs /Courier-Bold findfont SPs scalefont def
18 /HF /Helvetica findfont Ps scalefont def
19 /Li CFs setfont (1234567890) stringwidth pop def
20 /Nl { /Vpos Vpos Lh sub def } def
21 /Lpt { 0 Vpos moveto } def
22 /Gb {
23 } def
24 /Ip { Gb .5 setlinewidth
25 0 Tm moveto 0 Bh neg rlineto Rm 0 rlineto 0 Bh rlineto closepath
26 gsave .98 setgray fill grestore stroke
27 0 0 moveto 0 Bf rlineto Rm 0 rlineto 0 Bf neg rlineto closepath
28 gsave .98 setgray fill grestore stroke
29 0 Bf moveto 0 Tm Bh sub lineto stroke newpath
30 } def
31 /Cp { Ip .3 setlinewidth newpath
32 Li 0 Bf add moveto Li Tm Bh sub lineto stroke newpath
33 } def
34 /So { gsave dup stringwidth pop Ps 3 div 0 exch rmoveto 0 rlineto fill grestore } def
35 /Ul { gsave dup stringwidth pop 0 -1 rmoveto 0 rlineto fill grestore } def
36 /Bs { gsave dup show grestore 0.5 0.5 rmoveto show } def
37 <</PageSize [605 806]>> setpagedevice
38 %%Page: Cover 1
39 70 70 moveto
40 /Helvetica findfont 10 scalefont setfont
41 (Trueprint 3.6.5) show
42 70 725 moveto
43 /Helvetica-Bold findfont 20 scalefont setfont
44 (For: testuser) show
45 70 700 moveto
46 (Printed on: Fri Apr 16 03:00:00 1982) show
47 70 675 moveto
48 (Last page number: 3) show
49 70 650 moveto (File: test1.c) show
50 70 625 moveto (File: test2.c) show
51 showpage
52 %%Page: 1 2
53 15 30 translate
54 Ip gsave
55 .9 setgray
56 Rm 2 div Tm 2 div translate 60 rotate
57 /Courier-Bold findfont 41 scalefont setfont -216 0 moveto (Login-testuser) show
58 grestore
59 HF setfont /Ypos Tm Bh sub Ps 2 div add def
60 Ps Ypos moveto
61 (Fri Apr 16 03:00:00 1982) show currentpoint pop dup Rm Ps sub (Page 1) stringwidth pop sub dup Ypos moveto
62 (Page 1) show
63 exch sub 2 div add (Function Index) stringwidth pop 2 div sub Ypos moveto
64 (Function Index) show
65 HF setfont /Ypos Ps 2 div def
66 Ps Ypos moveto
67 (Fri Apr 16 03:00:00 1982) show currentpoint pop dup Rm Ps sub (Page 1) stringwidth pop sub dup Ypos moveto
68 (Page 1) show
69 exch sub 2 div add (Function Index) stringwidth pop 2 div sub Ypos moveto
70 (Function Index) show
71 CF setfont /Vpos Tm Bh sub Ps sub def
72 Lpt( closepipe 2 (test1.c)
73 ) show Nl
74 Lpt( fclosepipe..................2 (test1.c)) show Nl
75 Lpt( fopenpipe 2 (test1.c)
76 ) show Nl
77 Lpt( getopt......................3 (test2.c)) show Nl
78 Lpt( openpipe 1 (test1.c)
79 ) show Nl
80 showpage
81 %%Page: 2 3
82 15 30 translate
83 Ip gsave
84 .9 setgray
85 Rm 2 div Tm 2 div translate 60 rotate
86 /Courier-Bold findfont 41 scalefont setfont -216 0 moveto (Login-testuser) show
87 grestore
88 HF setfont /Ypos Tm Bh sub Ps 2 div add def
89 Ps Ypos moveto
90 (Fri Apr 16 03:00:00 1982) show currentpoint pop dup Rm Ps sub (Page 1) stringwidth pop sub dup Ypos moveto
91 (Page 1) show
92 exch sub 2 div add (File Index) stringwidth pop 2 div sub Ypos moveto
93 (File Index) show
94 HF setfont /Ypos Ps 2 div def
95 Ps Ypos moveto
96 (Fri Apr 16 03:00:00 1982) show currentpoint pop dup Rm Ps sub (Page 1) stringwidth pop sub dup Ypos moveto
97 (Page 1) show
98 exch sub 2 div add (File Index) stringwidth pop 2 div sub Ypos moveto
99 (File Index) show
100 CF setfont /Vpos Tm Bh sub Ps sub def
101 Lpt( test1.c 1) BF setfont show CF setfont Nl
102 Lpt( closepipe...................2) show Nl
103 Lpt( fclosepipe 2) show Nl
104 Lpt( fopenpipe...................2) show Nl
105 Lpt( openpipe 1) show Nl
106 Lpt( test2.c 3) BF setfont show CF setfont Nl
107 Lpt( getopt 3) show Nl
108 showpage
109 %%Page: 3 4
110 15 30 translate
111 Cp gsave
112 .9 setgray
113 Rm 2 div Tm 2 div translate 60 rotate
114 /Courier-Bold findfont 41 scalefont setfont -216 0 moveto (Login-testuser) show
115 grestore
116 HF setfont /Ypos Tm Bh sub Ps 2 div add def
117 Ps Ypos moveto
118 (Fri-Apr-03:00am-1) show currentpoint pop dup Rm Ps sub (2-3-test1.c-openpipe) stringwidth pop sub dup Ypos moveto
119 (2-3-test1.c-openpipe) show
120 exch sub 2 div add (Apr-03:00am-1-1) stringwidth pop 2 div sub Ypos moveto
121 (Apr-03:00am-1-1) show
122 HF setfont /Ypos Ps 2 div def
123 Ps Ypos moveto
124 (Test-%-04-16-1982) show currentpoint pop dup Rm Ps sub (00-03:00:00-105-5) stringwidth pop sub dup Ypos moveto
125 (00-03:00:00-105-5) show
126 exch sub 2 div add (04/16/82-Fri Apr 16 03:00:00 1982-03-00) stringwidth pop 2 div sub Ypos moveto
127 (04/16/82-Fri Apr 16 03:00:00 1982-03-00) show
128 /Vpos Tm Bh sub Ps sub def
129 Lpt CFs setfont ( 1 ) show (/*) IF setfont show Nl
130 Lpt CFs setfont ( 2 ) show ( * Source file:) IF setfont show Nl
131 Lpt CFs setfont ( 3 ) show ( * openpipe.c) IF setfont show Nl
132 Lpt CFs setfont ( 4 ) show ( *) IF setfont show Nl
133 Lpt CFs setfont ( 5 ) show ( * Contains openpipe - a replacement for the non-POSIX function popen.) IF setfont show Nl
134 Lpt CFs setfont ( 6 ) show ( * This returns an int rather than a FILE * to make it general purpose -) IF setfont show Nl
135 Lpt CFs setfont ( 7 ) show ( * fdopen can be used outside to convert this to a FILE *) IF setfont show Nl
136 Lpt CFs setfont ( 8 ) show ( */) IF setfont show Nl
137 Lpt CFs setfont ( ) show () IF setfont show Nl
138 Lpt CFs setfont ( 10 ) show (#define _POSIX_SOURCE) CF setfont show Nl
139 Lpt CFs setfont ( ) show () CF setfont show Nl
140 Lpt CFs setfont ( 12 ) show (#include <errno.h>) CF setfont show Nl
141 Lpt CFs setfont ( 13 ) show (#include <stdio.h>) CF setfont show Nl
142 Lpt CFs setfont ( 14 ) show (#include <stdlib.h>) CF setfont show Nl
143 Lpt CFs setfont ( 15 ) show (#include <string.h>) CF setfont show Nl
144 Lpt CFs setfont ( 16 ) show (#include <sys/types.h>) CF setfont show Nl
145 Lpt CFs setfont ( 17 ) show (#include <sys/wait.h>) CF setfont show Nl
146 Lpt CFs setfont ( ) show () CF setfont show Nl
147 Lpt CFs setfont ( 19 ) show (#ifdef _ultrix) CF setfont show Nl
148 Lpt CFs setfont ( 20 ) show (extern int close\(int fildes\);) CF setfont show Nl
149 Lpt CFs setfont ( 21 ) show (extern int dup\(int fildes\);) CF setfont show Nl
150 Lpt CFs setfont ( 22 ) show (extern pid_t fork\(void\);) CF setfont show Nl
151 Lpt CFs setfont ( 23 ) show (extern int pipe\(int fildes[2]\);) CF setfont show Nl
152 Lpt CFs setfont ( 24 ) show (#else) CF setfont show Nl
153 Lpt CFs setfont ( 25 ) show (#include <unistd.h>) CF setfont show Nl
154 Lpt CFs setfont ( 26 ) show (#endif) CF setfont show Nl
155 Lpt CFs setfont ( ) show () CF setfont show Nl
156 Lpt CFs setfont ( 28 ) show (#include "trueprint.h") CF setfont show Nl
157 Lpt CFs setfont ( 29 ) show (#include "main.h") CF setfont show Nl
158 Lpt CFs setfont ( 30 ) show (#include "openpipe.h") CF setfont show Nl
159 Lpt CFs setfont ( ) show () CF setfont show Nl
160 Lpt CFs setfont ( 32 ) show (int) CF setfont show Nl
161 Lpt CFs setfont ( 33 ) show (openpipe) BF setfont show (\(const char *command, char *mode\)) CF setfont show Nl
162 Lpt CFs setfont ( ) show () BF setfont show Nl
163 Lpt CFs setfont ( 35 1 ) show ({) CF setfont show Nl
164 Lpt CFs setfont ( 36 1 ) show ( int fildes[2];) CF setfont show Nl
165 Lpt CFs setfont ( 37 1 ) show ( int parent_pipe_end;) CF setfont show Nl
166 Lpt CFs setfont ( 38 1 ) show ( int child_pipe_end;) CF setfont show Nl
167 Lpt CFs setfont ( 39 1 ) show ( char *child_pipe_mode;) CF setfont show Nl
168 Lpt CFs setfont ( ) show () CF setfont show Nl
169 Lpt CFs setfont ( 41 2 ) show ( if \(strcmp\(mode, "w"\) == 0\) {) CF setfont show Nl
170 Lpt CFs setfont ( 42 2 ) show ( parent_pipe_end = 1; child_pipe_end = 0;) CF setfont show Nl
171 Lpt CFs setfont ( 43 2 ) show ( child_pipe_mode = "read";) CF setfont show Nl
172 Lpt CFs setfont ( 44 2 ) show ( } else if \(strcmp\(mode, "r"\) == 0\) {) CF setfont show Nl
173 Lpt CFs setfont ( 45 2 ) show ( parent_pipe_end = 0; child_pipe_end = 1;) CF setfont show Nl
174 Lpt CFs setfont ( 46 2 ) show ( child_pipe_mode = "write";) CF setfont show Nl
175 Lpt CFs setfont ( 47 2 ) show ( } else {) CF setfont show Nl
176 Lpt CFs setfont ( 48 2 ) show ( \(void\)fprintf\(stderr, "%s: Internal error: popen\() CF setfont show Nl
177 Lpt CFs setfont ( ) show ( \) called with bad mode %s", cmd_name, mode\);) CF setfont show Nl
178 Lpt CFs setfont ( 49 2 ) show ( exit\(2\);) CF setfont show Nl
179 Lpt CFs setfont ( 50 1 ) show ( }) CF setfont show Nl
180 Lpt CFs setfont ( ) show () CF setfont show Nl
181 Lpt CFs setfont ( 52 2 ) show ( if \(pipe\(fildes\) != 0\) {) CF setfont show Nl
182 Lpt CFs setfont ( 53 2 ) show ( \(void\)fprintf\(stderr, "%s: Cannot create pipe, %s\\n", cmd_name, strerror\(errno\)\);) CF setfont show Nl
183 Lpt CFs setfont ( 54 2 ) show ( exit\(2\);) CF setfont show Nl
184 Lpt CFs setfont ( 55 1 ) show ( }) CF setfont show Nl
185 Lpt CFs setfont ( ) show () CF setfont show Nl
186 Lpt CFs setfont ( 57 2 ) show ( switch \(fork\(\)\) {) CF setfont show Nl
187 Lpt CFs setfont ( 58 2 ) show ( case -1:) CF setfont show Nl
188 Lpt CFs setfont ( 59 2 ) show ( ) CF setfont show (/* Error */) IF setfont show Nl
189 Lpt CFs setfont ( 60 2 ) show ( \(void\)fprintf\(stderr, "%s: Cannot fork, %s\\n", cmd_name, strerror\(errno\)\);) CF setfont show Nl
190 Lpt CFs setfont ( 61 2 ) show ( exit\(2\);) CF setfont show Nl
191 Lpt CFs setfont ( 62 2 ) show ( ) CF setfont show (/*NOTREACHED*/) IF setfont show Nl
192 Lpt CFs setfont ( ) show () CF setfont show Nl
193 Lpt CFs setfont ( 64 2 ) show ( case 0:) CF setfont show Nl
194 showpage
195 %%Page: 4 5
196 15 30 translate
197 Cp gsave
198 .9 setgray
199 Rm 2 div Tm 2 div translate 60 rotate
200 /Courier-Bold findfont 41 scalefont setfont -216 0 moveto (Login-testuser) show
201 grestore
202 HF setfont /Ypos Tm Bh sub Ps 2 div add def
203 Ps Ypos moveto
204 (Fri-Apr-03:00am-2) show currentpoint pop dup Rm Ps sub (2-3-test1.c-openpipe) stringwidth pop sub dup Ypos moveto
205 (2-3-test1.c-openpipe) show
206 exch sub 2 div add (Apr-03:00am-2-2) stringwidth pop 2 div sub Ypos moveto
207 (Apr-03:00am-2-2) show
208 HF setfont /Ypos Ps 2 div def
209 Ps Ypos moveto
210 (Test-%-04-16-1982) show currentpoint pop dup Rm Ps sub (00-03:00:00-105-5) stringwidth pop sub dup Ypos moveto
211 (00-03:00:00-105-5) show
212 exch sub 2 div add (04/16/82-Fri Apr 16 03:00:00 1982-03-00) stringwidth pop 2 div sub Ypos moveto
213 (04/16/82-Fri Apr 16 03:00:00 1982-03-00) show
214 /Vpos Tm Bh sub Ps sub def
215 Lpt CFs setfont ( 65 2 ) show ( ) CF setfont show (/* Child process */) IF setfont show Nl
216 Lpt CFs setfont ( 66 2 ) show ( if \(!\(\(close\(fildes[parent_pipe_end]\) == 0\) &&) CF setfont show Nl
217 Lpt CFs setfont ( 67 2 ) show ( \(close\(child_pipe_end\) == 0\) &&) CF setfont show Nl
218 Lpt CFs setfont ( 68 3 ) show ( \(dup\(fildes[child_pipe_end]\) == child_pipe_end\)\)\) {) CF setfont show Nl
219 Lpt CFs setfont ( 69 3 ) show ( \(void\)fprintf\() CF setfont show Nl
220 Lpt CFs setfont ( ) show ( stderr,"%s: Cannot redirect %s for child, %s\\n", cmd_name, child_pipe_mode, strerror\() CF setfont show Nl
221 Lpt CFs setfont ( ) show ( errno\)\);) CF setfont show Nl
222 Lpt CFs setfont ( 70 3 ) show ( exit\(2\);) CF setfont show Nl
223 Lpt CFs setfont ( 71 2 ) show ( }) CF setfont show Nl
224 Lpt CFs setfont ( ) show () CF setfont show Nl
225 Lpt CFs setfont ( 73 3 ) show ( if \(system\(command\) < 0\) {) CF setfont show Nl
226 Lpt CFs setfont ( 74 3 ) show ( \(void\)fprintf\(stderr,"%s: Cannot start pipe, %s\\n",cmd_name, strerror\(errno\)\);) CF setfont show Nl
227 Lpt CFs setfont ( 75 3 ) show ( exit\(2\);) CF setfont show Nl
228 Lpt CFs setfont ( 76 2 ) show ( } else exit\(0\);) CF setfont show Nl
229 Lpt CFs setfont ( 77 2 ) show ( ) CF setfont show (/*NOTREACHED*/) IF setfont show Nl
230 Lpt CFs setfont ( ) show () CF setfont show Nl
231 Lpt CFs setfont ( 79 2 ) show ( default:) CF setfont show Nl
232 Lpt CFs setfont ( 80 2 ) show ( ) CF setfont show (/* Parent process */) IF setfont show Nl
233 Lpt CFs setfont ( ) show () CF setfont show Nl
234 Lpt CFs setfont ( 82 3 ) show ( if \(close\(fildes[child_pipe_end]\) != 0\) {) CF setfont show Nl
235 Lpt CFs setfont ( 83 3 ) show ( \(void\)fprintf\() CF setfont show Nl
236 Lpt CFs setfont ( ) show ( stderr,"%s: Cannot close %s end of pipe for parent, %s\\n",cmd_name, child_pipe_mode,) CF setfont show Nl
237 Lpt CFs setfont ( ) show ( strerror\(errno\)\);) CF setfont show Nl
238 Lpt CFs setfont ( 84 3 ) show ( exit\(2\);) CF setfont show Nl
239 Lpt CFs setfont ( 85 2 ) show ( }) CF setfont show Nl
240 Lpt CFs setfont ( ) show () CF setfont show Nl
241 Lpt CFs setfont ( 87 2 ) show ( return fildes[parent_pipe_end];) CF setfont show Nl
242 Lpt CFs setfont ( 88 1 ) show ( }) CF setfont show Nl
243 Lpt CFs setfont ( 89 ) show (}) CF setfont show Nl
244 Lpt CFs setfont ( ) show () CF setfont show Nl
245 Lpt CFs setfont ( 91 ) show (FILE *) CF setfont show Nl
246 Lpt CFs setfont ( 92 ) show (fopenpipe) BF setfont show (\(const char *command, char *mode\)) CF setfont show Nl
247 Lpt CFs setfont ( ) show () BF setfont show Nl
248 Lpt CFs setfont ( 94 1 ) show ({) CF setfont show Nl
249 Lpt CFs setfont ( 95 1 ) show ( int handle;) CF setfont show Nl
250 Lpt CFs setfont ( ) show () CF setfont show Nl
251 Lpt CFs setfont ( 97 1 ) show ( handle = openpipe\(command, mode\);) CF setfont show Nl
252 Lpt CFs setfont ( ) show () CF setfont show Nl
253 Lpt CFs setfont ( 99 1 ) show ( return fdopen\(handle, mode\);) CF setfont show Nl
254 Lpt CFs setfont ( 100 ) show (}) CF setfont show Nl
255 Lpt CFs setfont ( ) show () CF setfont show Nl
256 Lpt CFs setfont ( 102 ) show (void) CF setfont show Nl
257 Lpt CFs setfont ( 103 ) show (closepipe) BF setfont show (\(int handle\)) CF setfont show Nl
258 Lpt CFs setfont ( ) show () BF setfont show Nl
259 Lpt CFs setfont ( 105 1 ) show ({) CF setfont show Nl
260 Lpt CFs setfont ( 106 1 ) show ( int statloc;) CF setfont show Nl
261 Lpt CFs setfont ( ) show () CF setfont show Nl
262 Lpt CFs setfont ( 108 1 ) show ( \(void\)close\(handle\);) CF setfont show Nl
263 Lpt CFs setfont ( 109 1 ) show ( \(void\)waitpid\(-1, &statloc, WNOHANG\);) CF setfont show Nl
264 Lpt CFs setfont ( 110 ) show (}) CF setfont show Nl
265 Lpt CFs setfont ( ) show () CF setfont show Nl
266 Lpt CFs setfont ( 112 ) show (void) CF setfont show Nl
267 Lpt CFs setfont ( 113 ) show (fclosepipe) BF setfont show (\(FILE *fp\)) CF setfont show Nl
268 Lpt CFs setfont ( ) show () BF setfont show Nl
269 Lpt CFs setfont ( 115 1 ) show ({) CF setfont show Nl
270 Lpt CFs setfont ( 116 1 ) show ( closepipe\(fileno\(fp\)\);) CF setfont show Nl
271 Lpt CFs setfont ( 117 ) show (}) CF setfont show Nl
272 showpage
273 %%Page: 5 6
274 15 30 translate
275 Cp gsave
276 .9 setgray
277 Rm 2 div Tm 2 div translate 60 rotate
278 /Courier-Bold findfont 41 scalefont setfont -216 0 moveto (Login-testuser) show
279 grestore
280 HF setfont /Ypos Tm Bh sub Ps 2 div add def
281 Ps Ypos moveto
282 (Fri-Apr-03:00am-1) show currentpoint pop dup Rm Ps sub (1-3-test2.c-getopt) stringwidth pop sub dup Ypos moveto
283 (1-3-test2.c-getopt) show
284 exch sub 2 div add (Apr-03:00am-1-3) stringwidth pop 2 div sub Ypos moveto
285 (Apr-03:00am-1-3) show
286 HF setfont /Ypos Ps 2 div def
287 Ps Ypos moveto
288 (Test-%-04-16-1982) show currentpoint pop dup Rm Ps sub (00-03:00:00-105-5) stringwidth pop sub dup Ypos moveto
289 (00-03:00:00-105-5) show
290 exch sub 2 div add (04/16/82-Fri Apr 16 03:00:00 1982-03-00) stringwidth pop 2 div sub Ypos moveto
291 (04/16/82-Fri Apr 16 03:00:00 1982-03-00) show
292 /Vpos Tm Bh sub Ps sub def
293 Lpt CFs setfont ( 1 ) show (/* @\(#\)getopt.c */) IF setfont show Nl
294 Lpt CFs setfont ( ) show () IF setfont show Nl
295 Lpt CFs setfont ( 3 ) show (#define _POSIX_SOURCE) CF setfont show Nl
296 Lpt CFs setfont ( ) show () CF setfont show Nl
297 Lpt CFs setfont ( 5 ) show (#include <stdio.h>) CF setfont show Nl
298 Lpt CFs setfont ( 6 ) show (#include <string.h>) CF setfont show Nl
299 Lpt CFs setfont ( ) show () CF setfont show Nl
300 Lpt CFs setfont ( 8 ) show (#include "trueprint.h") CF setfont show Nl
301 Lpt CFs setfont ( 9 ) show (#include "main.h") CF setfont show Nl
302 Lpt CFs setfont ( ) show () CF setfont show Nl
303 Lpt CFs setfont ( 11 ) show (/*) IF setfont show Nl
304 Lpt CFs setfont ( 12 ) show ( * get option letter from argument vector) IF setfont show Nl
305 Lpt CFs setfont ( 13 ) show ( */) IF setfont show Nl
306 Lpt CFs setfont ( 14 ) show (int optind = 1; ) CF setfont show (/* index into parent argv vector */) IF setfont show Nl
307 Lpt CFs setfont ( 15 ) show (char *optarg; ) CF setfont show (/* argument associated with option */) IF setfont show Nl
308 Lpt CFs setfont ( ) show () CF setfont show Nl
309 Lpt CFs setfont ( 17 ) show (static int optopt; ) CF setfont show (/* character checked for validity */) IF setfont show Nl
310 Lpt CFs setfont ( ) show () CF setfont show Nl
311 Lpt CFs setfont ( 19 ) show (int) CF setfont show Nl
312 Lpt CFs setfont ( 20 ) show (getopt) BF setfont show (\(int nargc, char **nargv, char *ostr\)) CF setfont show Nl
313 Lpt CFs setfont ( 21 1 ) show ({) CF setfont show Nl
314 Lpt CFs setfont ( 22 1 ) show ( register char *oli; ) CF setfont show (/* option letter list index */) IF setfont show Nl
315 Lpt CFs setfont ( 23 1 ) show ( static char *place = ""; ) CF setfont show (/* option letter processing */) IF setfont show Nl
316 Lpt CFs setfont ( ) show () CF setfont show Nl
317 Lpt CFs setfont ( 25 2 ) show ( if\(!*place\) { ) CF setfont show (/* update scanning pointer */) IF setfont show Nl
318 Lpt CFs setfont ( 26 3 ) show ( if\(optind >= nargc || *\(place = nargv[optind]\) != '-' || !*++place\) {) CF setfont show Nl
319 Lpt CFs setfont ( 27 3 ) show ( place = "";) CF setfont show Nl
320 Lpt CFs setfont ( 28 3 ) show ( return\(EOF\);) CF setfont show Nl
321 Lpt CFs setfont ( 29 2 ) show ( }) CF setfont show Nl
322 Lpt CFs setfont ( 30 3 ) show ( if \(*place == '-'\) { ) CF setfont show (/* found "--" */) IF setfont show Nl
323 Lpt CFs setfont ( 31 3 ) show ( ++optind;) CF setfont show Nl
324 Lpt CFs setfont ( 32 3 ) show ( place = "";) CF setfont show Nl
325 Lpt CFs setfont ( 33 3 ) show ( return EOF;) CF setfont show Nl
326 Lpt CFs setfont ( 34 2 ) show ( }) CF setfont show Nl
327 Lpt CFs setfont ( 35 1 ) show ( } ) CF setfont show (/* option letter okay? */) IF setfont show Nl
328 Lpt CFs setfont ( 36 2 ) show ( if \(\(optopt = \(int\)*place++\) == \(int\)':' || !\(oli = strchr\(ostr,optopt\)\)\) {) CF setfont show Nl
329 Lpt CFs setfont ( 37 2 ) show ( if\(!*place\) ++optind;) CF setfont show Nl
330 Lpt CFs setfont ( 38 2 ) show ( \(void\)fprintf\(stderr, "%s: illegal option -- %c\\n", cmd_name, optopt\);) CF setfont show Nl
331 Lpt CFs setfont ( 39 2 ) show ( return '?';) CF setfont show Nl
332 Lpt CFs setfont ( 40 1 ) show ( }) CF setfont show Nl
333 Lpt CFs setfont ( 41 2 ) show ( if \(*++oli != ':'\) { ) CF setfont show (/* don't need argument */) IF setfont show Nl
334 Lpt CFs setfont ( 42 2 ) show ( optarg = NULL;) CF setfont show Nl
335 Lpt CFs setfont ( 43 2 ) show ( if \(!*place\) ++optind;) CF setfont show Nl
336 Lpt CFs setfont ( 44 2 ) show ( } else { ) CF setfont show (/* need an argument */) IF setfont show Nl
337 Lpt CFs setfont ( 45 3 ) show ( if \(*place\) { ) CF setfont show (/* no white space */) IF setfont show Nl
338 Lpt CFs setfont ( 46 3 ) show ( optarg = place;) CF setfont show Nl
339 Lpt CFs setfont ( 47 3 ) show ( } else if \(nargc <= ++optind\) { ) CF setfont show (/* no arg */) IF setfont show Nl
340 Lpt CFs setfont ( 48 3 ) show ( place = "";) CF setfont show Nl
341 Lpt CFs setfont ( 49 3 ) show ( \(void\)fprintf\() CF setfont show Nl
342 Lpt CFs setfont ( ) show ( stderr, "%s: option requires an argument -- %c\\n", cmd_name, optopt\);) CF setfont show Nl
343 Lpt CFs setfont ( 50 3 ) show ( optopt = '?';) CF setfont show Nl
344 Lpt CFs setfont ( 51 3 ) show ( } else {) CF setfont show Nl
345 Lpt CFs setfont ( 52 3 ) show ( optarg = nargv[optind]; ) CF setfont show (/* white space */) IF setfont show Nl
346 Lpt CFs setfont ( 53 2 ) show ( }) CF setfont show Nl
347 Lpt CFs setfont ( 54 2 ) show ( place = "";) CF setfont show Nl
348 Lpt CFs setfont ( 55 2 ) show ( ++optind;) CF setfont show Nl
349 Lpt CFs setfont ( 56 1 ) show ( }) CF setfont show Nl
350 Lpt CFs setfont ( 57 1 ) show ( return optopt; ) CF setfont show (/* dump back option letter */) IF setfont show Nl
351 Lpt CFs setfont ( 58 ) show (}) CF setfont show Nl
352 showpage
353 %%Trailer
354 %%EOF