|
|
1.1 ! root 1: \File{grind5b\-4.c},{12:26},{Oct 14 1989} ! 2: \L{\LB{...}} ! 3: \L{\LB{}} ! 4: \L{\LB{\Proc{while} \K{while} (fgets (buffer, \K{sizeof} buffer, stdin))}} ! 5: \L{\LB{\Proc{if}}\Tab{8}{\K{if} (SDataRequest (sd, buffer, strlen (buffer) + 1, si) == NOTOK)}} ! 6: \L{\LB{}\Tab{8}{ error (\S{}\"S\-DATA.REQUEST: \%s\"\SE{}, SErrString (sa \-\> sa\_reason));}} ! 7: \L{\LB{}} ! 8: \L{\LB{\Proc{if} \K{if} (SRelRequest (sd, NULLCP, 0, NOTOK, sr, si) == NOTOK)}} ! 9: \L{\LB{}\Tab{8}{error (\S{}\"S\-RELEASE.REQUEST: \%s\"\SE{}, SErrString (sa \-\> sa\_reason));}} ! 10: \L{\LB{}} ! 11: \L{\LB{\Proc{if} \K{if} (!sr \-\> sr\_affirmative) \{}} ! 12: \L{\LB{}\Tab{8}{(\K{void}) SUAbortRequest (sd, NULLCP, 0, si);}} ! 13: \L{\LB{}\Tab{8}{error (\S{}\"release rejected by sink\"\SE{});}} ! 14: \L{\LB{ \}}} ! 15: \ProcCont{if}\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.