\File{grindB\-6.c},{22:23},{Jun 12 1988}
\L{\LB{...}}
\L{\LB{}}
\L{\LB{\K{static} \K{int}  ros\_end (sd, roe)}}
\L{\LB{\K{int}     sd;}}
\L{\LB{\K{struct} RoSAPend *roe;}}
\L{\LB{\{}}
\L{\LB{    \K{struct} RtSAPindication  rtis;}}
\L{\LB{    \K{register} \K{struct} RtSAPindication *rti = \&rtis;}}
\L{\LB{    \K{register} \K{struct} RtSAPabort   *rta = \&rti \-\> rti\_abort;}}
\L{\LB{}}
\L{\LB{    \K{if} (RtEndResponse (sd, rti) == NOTOK)}}
\L{\LB{}\Tab{8}{error (\S{}\"RT\-END.RESPONSE: \%s\"\SE{}, RtErrString (rta \-\> rta\_reason));}}
\L{\LB{}}
\L{\LB{    exit (0);}}
\L{\LB{\}}}
