|
|
Initial revision
\File{figure31.c},{13:12},{Feb 28 1988}
\L{\LB{\Proc{do\_error}do\_error (sd, id, error, parameter, roi)}}
\L{\LB{\K{int}}\Tab{8}{sd;}}
\L{\LB{\K{int}}\Tab{8}{id,}}
\L{\LB{}\Tab{8}{error;}}
\L{\LB{caddr\_t parameter;}}
\L{\LB{\K{struct} RoSAPindication *roi;}}
\L{\LB{\{}}
\L{\LB{ \K{switch} (error) \{}}
\L{\LB{}\Tab{8}{\K{case} RY\_REJECT:}}
\L{\LB{}\Tab{8}{\{}}
\L{\LB{}\Tab{8}{ \K{int}}\Tab{16}{ reason = (\K{int}) parameter;}}
\L{\LB{}}
\L{\LB{}\Tab{8}{ \C{}\/* do something with ``reason\'\' here... *\/\CE{}}}
\L{\LB{}}
\L{\LB{}\Tab{8}{ \K{break};}}
\L{\LB{}\Tab{8}{\}}}
\L{\LB{}\Tab{8}{}}
\L{\LB{...}}
\L{\LB{}}
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.