|
|
1.1 root 1: \File{grind2c\-3.c},{22:23},{Jun 12 1988}
2: \L{\LB{...}}
3: \L{\LB{}}
4: \L{\LB{\K{static} \K{int} ros\_finish (sd, rof)}}
5: \L{\LB{\K{int} sd;}}
6: \L{\LB{\K{struct} AcSAPfinish *acf;}}
7: \L{\LB{\{}}
8: \L{\LB{ \K{struct} RtSAPindication rtis;}}
9: \L{\LB{ \K{register} \K{struct} RtSAPabort *rta = \&rtis.rti\_abort;}}
10: \L{\LB{}}
11: \L{\LB{ \K{if} (RtCloseResponse (sd, ACR\_NORMAL, NULLPE, \&rtis) == NOTOK)}}
12: \L{\LB{}\Tab{8}{error (\S{}\"RT\-CLOSE.RESPONSE: \%s\"\SE{}, RtErrString (rta \-\> rta\_reason));}}
13: \L{\LB{}}
14: \L{\LB{ ACFFREE (acf);}}
15: \L{\LB{}}
16: \L{\LB{ exit (0);}}
17: \L{\LB{\}}}
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.